source: cprs/branches/GUI-config/BDK32/Samples/RPCBroker/SilentSignOn/fXWBAppHandle1.dfm@ 1727

Last change on this file since 1727 was 476, checked in by Kevin Toppenberg, 16 years ago

New WorldVistA Config Utility

File size: 4.1 KB
RevLine 
[476]1object Form1: TForm1
2 Left = 230
3 Top = 122
4 Width = 736
5 Height = 319
6 Caption =
7 'XWBAppHandle1 - UCX RPCBroker (see Options) use of lmAppHandle t' +
8 'o start a second application (p40)'
9 Color = clBtnFace
10 Font.Charset = DEFAULT_CHARSET
11 Font.Color = clWindowText
12 Font.Height = -11
13 Font.Name = 'MS Sans Serif'
14 Font.Style = []
15 Menu = mnuMainMenu
16 OldCreateOrder = True
17 PixelsPerInch = 96
18 TextHeight = 13
19 object lblOtherProgram: TLabel
20 Left = 44
21 Top = 176
22 Width = 71
23 Height = 13
24 Caption = 'Other Program:'
25 end
26 object lblOptional: TLabel
27 Left = 52
28 Top = 192
29 Width = 45
30 Height = 13
31 Caption = '(Optional)'
32 end
33 object lblWithFull: TLabel
34 Left = 124
35 Top = 200
36 Width = 232
37 Height = 13
38 Caption = 'With Full Directory Path if not on the System Path'
39 end
40 object btnConnect: TButton
41 Left = 201
42 Top = 232
43 Width = 75
44 Height = 25
45 Caption = '&Connect'
46 TabOrder = 0
47 OnClick = btnConnectClick
48 end
49 object btnStartApp2: TButton
50 Left = 326
51 Top = 232
52 Width = 75
53 Height = 25
54 Caption = 'Start App2'
55 TabOrder = 1
56 OnClick = btnStartApp2Click
57 end
58 object edtOtherProgram: TEdit
59 Left = 124
60 Top = 168
61 Width = 269
62 Height = 21
63 TabOrder = 2
64 end
65 object Memo1: TMemo
66 Left = 31
67 Top = 8
68 Width = 666
69 Height = 153
70 Lines.Strings = (
71
72 'This application can be used to start other programs, including ' +
73 'ones that use the '
74
75 'RPCBroker for connection to a server using a server generated to' +
76 'ken.'
77 ''
78
79 'To connect with the server, simply press the connect button to s' +
80 'elect a server/listener port '
81
82 'combination, then sign in. After you are signed in, you can sta' +
83 'rt another Broker application '
84
85 '(XWBAppHandle2) by simply clicking on the "Start App2" button (w' +
86 'ith the Other Program '
87 'edit box empty of text).'
88 ''
89
90 'A program such as Notepad with or without command line arguments' +
91 ', can be started at '
92
93 'any time by entering the name (and arguments if any) in the Othe' +
94 'r Program edit box, then '
95 'clicking on the Start App2 button.'
96 '')
97 TabOrder = 3
98 end
99 object btnExit: TButton
100 Left = 451
101 Top = 232
102 Width = 75
103 Height = 25
104 Caption = 'Exit'
105 TabOrder = 4
106 OnClick = btnExitClick
107 end
108 object brkrRPCB: TRPCBroker
109 ClearParameters = True
110 ClearResults = True
111 Connected = False
112 ListenerPort = 9500
113 RpcVersion = '0'
114 Server = 'NXT-Server'
115 KernelLogIn = True
116 LogIn.Mode = lmAVCodes
117 LogIn.PromptDivision = False
118 OldConnectionOnly = False
119 Left = 16
120 Top = 224
121 end
122 object mnuMainMenu: TMainMenu
123 Left = 8
124 Top = 184
125 object mnuFile: TMenuItem
126 Caption = '&File'
127 object mnuFileExit: TMenuItem
128 Caption = '&E&xit'
129 OnClick = mnuFileExitClick
130 end
131 end
132 object mnuOptions: TMenuItem
133 Caption = 'Options'
134 object OnlyOldConnection1: TMenuItem
135 Caption = 'OnlyOldConnection'
136 end
137 object BackwardsCompatible1: TMenuItem
138 Action = actBackwardsCompatible
139 end
140 object DebugMode1: TMenuItem
141 Action = actDebugMode
142 end
143 end
144 object Help1: TMenuItem
145 Caption = '&Help'
146 object mnuAbout: TMenuItem
147 Caption = '&About'
148 OnClick = mnuAboutClick
149 end
150 end
151 end
152 object ActionList1: TActionList
153 Left = 64
154 Top = 224
155 object actOldConnectionOnly: TAction
156 Caption = 'Old Connection Mode Only'
157 OnExecute = actOldConnectionOnlyExecute
158 end
159 object actBackwardsCompatible: TAction
160 Caption = 'Backwards Compatible'
161 Checked = True
162 OnExecute = actBackwardsCompatibleExecute
163 end
164 object actDebugMode: TAction
165 Caption = 'Debug Mode'
166 OnExecute = actDebugModeExecute
167 end
168 end
169end
Note: See TracBrowser for help on using the repository browser.