home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Action 80
/
cdaction-80.iso
/
cda_menu.exe
/
0
/
RCDATA
/
TFORM3
/
TFORM3.txt
< prev
Wrap
Text File
|
2002-05-16
|
3KB
|
130 lines
object Form3: TForm3
Left = 226
Top = 187
BorderStyle = bsNone
Caption = 'rozpakuj'
ClientHeight = 223
ClientWidth = 358
Color = clBtnFace
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
OldCreateOrder = False
PixelsPerInch = 96
TextHeight = 13
object Image1: TImage
Left = 0
Top = 0
Width = 358
Height = 223
Align = alClient
Picture.Data = {<image000.bmp>}
OnMouseMove = Image1MouseMove
end
object wypakuj: TLabel
Left = 240
Top = 197
Width = 59
Height = 12
Caption = '[ wypakuj ]'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnClick = Button1Click
OnMouseMove = wypakujMouseMove
end
object przerwij: TLabel
Left = 298
Top = 197
Width = 57
Height = 12
Caption = '[ przerwij ]'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnClick = Button2Click
OnMouseMove = przerwijMouseMove
end
object PaintBox1: TPaintBox
Left = 0
Top = 0
Width = 361
Height = 19
OnMouseDown = PaintBox1MouseDown
OnMouseMove = PaintBox1MouseMove
OnMouseUp = PaintBox1MouseUp
end
object Label1: TLabel
Left = 140
Top = 197
Width = 92
Height = 12
Caption = '[ utw�rz katalog ]'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
OnClick = Label1Click
end
object katalog: TDirectoryListBox
Left = 72
Top = 80
Width = 265
Height = 100
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = []
ItemHeight = 16
ParentFont = False
TabOrder = 0
OnMouseMove = Image1MouseMove
end
object drajw: TDriveComboBox
Left = 72
Top = 58
Width = 265
Height = 18
Color = clWhite
DirList = katalog
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
TabOrder = 1
end
object nazwakatalogu: TEdit
Left = 24
Top = 48
Width = 121
Height = 20
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -9
Font.Name = 'Verdana'
Font.Style = []
ParentFont = False
TabOrder = 2
Text = 'nazwakatalogu'
Visible = False
OnKeyDown = nazwakataloguKeyDown
end
end