home *** CD-ROM | disk | FTP | other *** search
- object Form1: TForm1
- Left = 195
- Top = 106
- Width = 331
- Height = 217
- ActiveControl = Button3
- BorderIcons = [biSystemMenu, biHelp]
- Font.Color = clWindowText
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OnCreate = FormCreate
- PixelsPerInch = 96
- TextHeight = 13
- object Label1: TLabel
- Left = 24
- Top = 16
- Width = 32
- Height = 13
- Caption = 'Label1'
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- end
- object Label2: TLabel
- Left = 24
- Top = 48
- Width = 65
- Height = 13
- Caption = 'Label2'
- end
- object Label4: TLabel
- Left = 24
- Top = 80
- Width = 41
- Height = 13
- Caption = 'Browser:'
- end
- object Button1: TButton
- Left = 240
- Top = 40
- Width = 75
- Height = 25
- Caption = 'Button1'
- TabOrder = 2
- OnClick = Button1Click
- end
- object Button2: TButton
- Left = 240
- Top = 104
- Width = 75
- Height = 25
- Caption = 'Button2'
- TabOrder = 3
- OnClick = Button2Click
- end
- object Button3: TButton
- Left = 80
- Top = 152
- Width = 75
- Height = 25
- Caption = 'Button3'
- Default = True
- TabOrder = 0
- OnClick = Button3Click
- end
- object Button4: TButton
- Left = 192
- Top = 152
- Width = 75
- Height = 25
- Caption = 'Button4'
- TabOrder = 1
- OnClick = Button4Click
- end
- object Edit1: TEdit
- Left = 32
- Top = 104
- Width = 201
- Height = 21
- Color = clMenu
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 4
- Text = 'Label5'
- end
- object Edit2: TEdit
- Left = 112
- Top = 40
- Width = 121
- Height = 21
- Color = clMenu
- Font.Color = clBlack
- Font.Height = -11
- Font.Name = 'MS Sans Serif'
- Font.Style = []
- ParentFont = False
- ReadOnly = True
- TabOrder = 5
- Text = 'Label3'
- end
- object OpenDialog1: TOpenDialog
- FileEditStyle = fsEdit
- Options = [ofHideReadOnly, ofCreatePrompt]
- Left = 104
- Top = 8
- end
- object OpenDialog2: TOpenDialog
- FileEditStyle = fsEdit
- Options = [ofHideReadOnly, ofPathMustExist, ofFileMustExist]
- Left = 160
- Top = 8
- end
- object DDEClient: TDdeClientConv
- DdeService = 'progman'
- ConnectMode = ddeManual
- Left = 40
- Top = 144
- LinkInfo = (
- 'Service progman'
- 'Topic ')
- end
- end
-