home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 2001 February
/
Chip_2001-02_cd1.bin
/
oddech
/
anekdoty
/
Anekdoty.exe
/
0
/
RCDATA
/
TFORM4
/
TFORM4.txt
< prev
Wrap
Text File
|
1999-04-18
|
3KB
|
130 lines
object Form4: TForm4
Left = 334
Top = 249
BorderIcons = [biMinimize, biMaximize]
BorderStyle = bsNone
ClientHeight = 122
ClientWidth = 330
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Position = poScreenCenter
OnClose = FormClose
OnCreate = FormCreate
OnKeyPress = FormKeyPress
OnPaint = FormPaint
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Shape4: TShape
Left = 0
Top = 0
Width = 57
Height = 20
Brush.Color = clOlive
end
object Label9: TLabel
Left = 8
Top = 4
Width = 45
Height = 13
Caption = 'Ano/Ne'
Font.Charset = DEFAULT_CHARSET
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label10: TLabel
Left = 7
Top = 3
Width = 45
Height = 13
Caption = 'Ano/Ne'
Font.Charset = DEFAULT_CHARSET
Font.Color = clSilver
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Shape2: TShape
Left = 1
Top = 1
Width = 328
Height = 120
Brush.Style = bsClear
Pen.Color = clOlive
Pen.Width = 2
end
object Shape3: TShape
Left = 3
Top = 3
Width = 324
Height = 116
Brush.Style = bsClear
end
object Label1: TLabel
Left = 24
Top = 32
Width = 47
Height = 18
Caption = 'Label1'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clWhite
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Label2: TLabel
Left = 23
Top = 31
Width = 47
Height = 18
Caption = 'Label1'
Font.Charset = EASTEUROPE_CHARSET
Font.Color = clBlack
Font.Height = -15
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
end
object Shape1: TShape
Left = 0
Top = 0
Width = 330
Height = 122
Brush.Style = bsClear
OnMouseDown = Shape3MouseDown
OnMouseMove = Shape3MouseMove
OnMouseUp = Shape3MouseUp
end
object ImageTl4: TImageTl
Left = 298
Top = 4
Width = 26
Height = 26
Hint = 'Zav��t'
Posuv = 2
ParentShowHint = False
Picture.Data = {07544269746D617000000000}<image000.unknown>}
Pozadi = FormAnekdoty.ImagePozadi
BMS_cislo = 0
BMS_soubor = 'anekdot'
MouseClick = ImageTl1MouseClick
end
object ImageTl2: TImageTl
Left = 176
Top = 64
Width = 60
Height = 40
Posuv = 2
Picture.Data = {07544269746D617000000000}