Home > m > gui > ltpdv > callbacks > ltpdv_server_server_select.m

ltpdv_server_server_select

PURPOSE ^

Handles

SYNOPSIS ^

function ltpdv_server_server_select(varargin)

DESCRIPTION ^

 Handles

CROSS-REFERENCE INFORMATION ^

This function calls: This function is called by:

SOURCE CODE ^

0001 function ltpdv_server_server_select(varargin)
0002 
0003 % Handles
0004 myh     = varargin{1};
0005 mainfig = varargin{end};
0006 
0007 % Get selected server
0008 sh   = findobj(mainfig, 'Tag', 'LTPDVserverServer');
0009 idx  = get(sh, 'Value');
0010 strs = get(sh, 'String');
0011 srv  = strs{idx};
0012 
0013 % split port off
0014 [server, port] = strtok(srv, '/');
0015 if ~isempty(port)
0016    port = str2num(port(2:end));
0017 end
0018 
0019 % Set server edit box
0020 eh = findobj(mainfig, 'Tag', 'LTPDVserverServerEdit');
0021 set(eh, 'String', server);
0022 
0023 % Set port edit box
0024 eh = findobj(mainfig, 'Tag', 'LTPDVserverPortEdit');
0025 set(eh, 'String', port);
0026 
0027 
0028

Generated on Mon 08-Sep-2008 13:18:47 by m2html © 2003