0001 function [dtype, server, port, rds, cal, stat] = ltpdv_server_get_server(mainfig)
0002
0003
0004
0005 sh = findobj(mainfig, 'Tag', 'LTPDVserverDataType');
0006 idx = get(sh, 'Value');
0007 strs = get(sh, 'String');
0008 dtype = strs{idx};
0009
0010
0011 sh = findobj(mainfig, 'Tag', 'LTPDVserverServerEdit');
0012 server = get(sh, 'String');
0013
0014
0015 sh = findobj(mainfig, 'Tag', 'LTPDVserverPortEdit');
0016 port = str2num(get(sh, 'String'));
0017
0018
0019 sh = findobj(mainfig, 'Tag', 'LTPDVserverRdsEdit');
0020 rds = str2num(get(sh, 'String'));
0021
0022
0023 sh = findobj(mainfig, 'Tag', 'LTPDVserverCalEdit');
0024 cal = str2num(get(sh, 'String'));
0025
0026
0027 sh = findobj(mainfig, 'Tag', 'LTPDVserverStat');
0028 idx = get(sh, 'Value');
0029 strs = get(sh, 'String');
0030 stat = strs{idx};
0031
0032
0033
0034
0035