source: trunk/Packages/synapse/source/demo/sftp/Demo/Main.dfm

Last change on this file was 4, checked in by chronos, 12 years ago
  • Přidáno: Zkušební stažení stránky přes https.
File size: 3.4 KB
Line 
1object TestSFTPForm: TTestSFTPForm
2 Left = 207
3 Top = 107
4 Width = 696
5 Height = 480
6 Caption = 'Test SFTP'
7 Color = clBtnFace
8 Font.Charset = DEFAULT_CHARSET
9 Font.Color = clWindowText
10 Font.Height = -11
11 Font.Name = 'MS Sans Serif'
12 Font.Style = []
13 OldCreateOrder = False
14 OnCreate = FormCreate
15 OnDestroy = FormDestroy
16 PixelsPerInch = 96
17 TextHeight = 13
18 object Label1: TLabel
19 Left = 8
20 Top = 8
21 Width = 22
22 Height = 13
23 Caption = 'Host'
24 end
25 object Label2: TLabel
26 Left = 284
27 Top = 8
28 Width = 19
29 Height = 13
30 Caption = 'Port'
31 end
32 object Label3: TLabel
33 Left = 8
34 Top = 32
35 Width = 26
36 Height = 13
37 Caption = 'Login'
38 end
39 object Label4: TLabel
40 Left = 192
41 Top = 32
42 Width = 46
43 Height = 13
44 Caption = 'Password'
45 end
46 object Label5: TLabel
47 Left = 8
48 Top = 64
49 Width = 48
50 Height = 13
51 Caption = 'Current dir'
52 end
53 object HostEdit: TEdit
54 Left = 48
55 Top = 4
56 Width = 209
57 Height = 21
58 TabOrder = 0
59 Text = '212.24.37.138'
60 end
61 object PortEdit: TEdit
62 Left = 316
63 Top = 4
64 Width = 49
65 Height = 21
66 TabOrder = 1
67 Text = '22'
68 end
69 object LoginEdit: TEdit
70 Left = 48
71 Top = 28
72 Width = 113
73 Height = 21
74 TabOrder = 2
75 Text = 'atv'
76 end
77 object PasswordEdit: TEdit
78 Left = 252
79 Top = 28
80 Width = 113
81 Height = 21
82 PasswordChar = '*'
83 TabOrder = 3
84 Text = 'atv04040702'
85 end
86 object CurrentDirEdit: TEdit
87 Left = 64
88 Top = 60
89 Width = 301
90 Height = 21
91 TabOrder = 5
92 end
93 object ConnectButton: TButton
94 Left = 380
95 Top = 4
96 Width = 93
97 Height = 25
98 Caption = 'Connect'
99 TabOrder = 4
100 OnClick = ConnectButtonClick
101 end
102 object FileListBox: TListBox
103 Left = 8
104 Top = 92
105 Width = 673
106 Height = 353
107 Font.Charset = RUSSIAN_CHARSET
108 Font.Color = clWindowText
109 Font.Height = -11
110 Font.Name = 'Courier New'
111 Font.Style = []
112 ItemHeight = 14
113 ParentFont = False
114 TabOrder = 12
115 OnDblClick = FileListBoxDblClick
116 end
117 object SendFileButton: TButton
118 Left = 476
119 Top = 68
120 Width = 67
121 Height = 21
122 Caption = 'Send file...'
123 TabOrder = 7
124 OnClick = SendFileButtonClick
125 end
126 object GetFileButton: TButton
127 Left = 544
128 Top = 68
129 Width = 67
130 Height = 21
131 Caption = 'Get file'
132 TabOrder = 8
133 OnClick = GetFileButtonClick
134 end
135 object DeleteButton: TButton
136 Left = 612
137 Top = 68
138 Width = 67
139 Height = 21
140 Caption = 'Delete'
141 TabOrder = 9
142 OnClick = DeleteButtonClick
143 end
144 object ReloadButton: TButton
145 Left = 368
146 Top = 60
147 Width = 57
148 Height = 21
149 Caption = 'Reload'
150 TabOrder = 6
151 OnClick = ReloadButtonClick
152 end
153 object ProgressBar: TProgressBar
154 Left = 476
155 Top = 45
156 Width = 153
157 Height = 15
158 Min = 0
159 Max = 100
160 TabOrder = 10
161 end
162 object AbortButton: TButton
163 Left = 632
164 Top = 44
165 Width = 45
166 Height = 17
167 Caption = 'Abort'
168 TabOrder = 11
169 OnClick = AbortButtonClick
170 end
171 object OpenDialog: TOpenDialog
172 Options = [ofHideReadOnly, ofFileMustExist, ofEnableSizing]
173 Left = 492
174 Top = 12
175 end
176 object SaveDialog: TSaveDialog
177 Options = [ofOverwritePrompt, ofHideReadOnly, ofEnableSizing]
178 Left = 572
179 Top = 12
180 end
181end
Note: See TracBrowser for help on using the repository browser.