home *** CD-ROM | disk | FTP | other *** search
- object Form4: TForm4
- Left = 207
- Top = 262
- BorderIcons = []
- BorderStyle = bsNone
- Caption = 'Kopieren'
- ClientHeight = 424
- ClientWidth = 429
- Color = clBtnFace
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -19
- Font.Name = 'Arial'
- Font.Style = []
- Icon.Data = {<image000.ico>}
- OldCreateOrder = True
- Position = poScreenCenter
- Scaled = False
- OnShow = FormShow
- PixelsPerInch = 96
- TextHeight = 22
- object Panel1: TPanel
- Left = 0
- Top = 0
- Width = 429
- Height = 424
- Align = alClient
- BevelWidth = 4
- BorderWidth = 1
- BorderStyle = bsSingle
- Color = 6570558
- TabOrder = 0
- object LMDLabel1: TLMDLabel
- Left = 8
- Top = 16
- Width = 60
- Height = 392
- Bevel.BorderColor = 6570558
- Bevel.LightColor = 16119285
- Bevel.Mode = bmCustom
- Bevel.ShadowColor = 4259841
- Bevel.StandardStyle = lsSingleLowered
- FontFX.ShadowDepth = 2
- FontFX.ShadowColor = 4259841
- FontFX.Style = tdRaisedShadow
- FontFX.Angle = 90
- FontFX.PosX = 1
- FontFX.PosY = 388
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -48
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- Options = []
- ParentFont = False
- Caption = 'Dateien kopieren'
- end
- object Button2: TButton
- Left = 304
- Top = 254
- Width = 105
- Height = 31
- Caption = 'Schlie�en'
- TabOrder = 4
- OnClick = Button2Click
- end
- object GroupBox1: TGroupBox
- Left = 72
- Top = 16
- Width = 337
- Height = 225
- Caption = 'Zielverzeichnis ausw�hlen:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 0
- object FileListBox1: TFileListBox
- Left = 144
- Top = 80
- Width = 161
- Height = 97
- TabStop = False
- ItemHeight = 16
- TabOrder = 6
- end
- object DriveComboBox2: TDriveComboBox
- Left = 16
- Top = 192
- Width = 305
- Height = 22
- Color = clWhite
- DirList = DirectoryListBox2
- TabOrder = 1
- OnClick = DriveComboBox2Click
- end
- object ListBox1: TListBox
- Left = 160
- Top = 64
- Width = 113
- Height = 65
- ItemHeight = 16
- TabOrder = 3
- end
- object DirectoryListBox2: TDirectoryListBox
- Left = 16
- Top = 54
- Width = 305
- Height = 131
- Color = clWhite
- Ctl3D = True
- DirLabel = Label1
- ItemHeight = 16
- ParentCtl3D = False
- TabOrder = 2
- OnClick = DirectoryListBox2Click
- end
- object Panel2: TPanel
- Left = 16
- Top = 22
- Width = 305
- Height = 22
- BevelOuter = bvLowered
- Color = 16119285
- TabOrder = 4
- object Label1: TLabel
- Left = 8
- Top = 2
- Width = 297
- Height = 20
- AutoSize = False
- Caption = 'E:\Data\Delphi5\GS2000'
- Color = 16119285
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentColor = False
- ParentFont = False
- Transparent = True
- Visible = False
- end
- end
- object Memo1: TMemo
- Left = 16
- Top = 54
- Width = 305
- Height = 160
- Alignment = taCenter
- Color = 16119285
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- ReadOnly = True
- TabOrder = 5
- end
- object Button4: TButton
- Left = 144
- Top = 182
- Width = 49
- Height = 24
- Caption = 'Ok'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = [fsBold]
- ParentFont = False
- TabOrder = 0
- OnClick = Button4Click
- end
- end
- object Button1: TButton
- Left = 72
- Top = 254
- Width = 97
- Height = 31
- Hint =
- 'Kopiert die Datei(en) in das oben eingestellte (Spiele-) Verzeic' +
- 'hnis'
- Caption = 'Kopieren'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 1
- OnClick = Button1Click
- end
- object GroupBox2: TGroupBox
- Left = 72
- Top = 296
- Width = 335
- Height = 108
- Caption = 'Verarbeitete Dateien:'
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clWindowText
- Font.Height = -13
- Font.Name = 'Arial'
- Font.Style = []
- ParentFont = False
- TabOrder = 3
- object Memo2: TMemo
- Left = 16
- Top = 24
- Width = 305
- Height = 72
- TabStop = False
- Color = 4259841
- Font.Charset = DEFAULT_CHARSET
- Font.Color = clRed
- Font.Height = -9
- Font.Name = 'Arial'
- Font.Pitch = fpVariable
- Font.Style = [fsBold]
- ParentFont = False
- ReadOnly = True
- ScrollBars = ssVertical
- TabOrder = 0
- WordWrap = False
- end
- end
- object Button3: TButton
- Left = 184
- Top = 254
- Width = 105
- Height = 31
- Hint = 'Startet die kopierte Programmdatei (z.B. einen Patch)'
- Caption = 'Ausf�hren'
- Enabled = False
- ParentShowHint = False
- ShowHint = True
- TabOrder = 2
- OnClick = Button3Click
- end
- end
- end
-