home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip: Shareware for Win 95
/
Chip-Shareware-Win95.bin
/
ostatni
/
delphi
/
ruzne
/
zcd30120.exe
/
Demo
/
V11_1.DFM
/
V11_1.txt
< prev
Wrap
Text File
|
1997-05-04
|
7KB
|
176 lines
object Form1: TForm1
Left = 204
Top = 102
Width = 435
Height = 225
Caption = 'Test'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
PixelsPerInch = 96
Scaled = False
TextHeight = 13
object zBigLabel1: TzBigLabel
Left = 244
Top = 112
Width = 169
Height = 13
Caption = 'This button-type can show a colorfill'
end
object zGauge1: TzGauge
Left = 112
Top = 153
Width = 209
Glyph.Data = {
C6050000424DC605000000000000360400002800000014000000140000000100
0800000000009001000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A600000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
0000000000000000000000000000000000000000000000000000000000000000
000000000000000000000000000000000000F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
0707070707070707070707070707070700000000F80707000000F807000000F8
0707070001F901F900F800FCFDFC000003FB0300F8070700F901F901F900FCFD
00FD0003FB00FB0300070700F9000000F9F90000FC00FD00000700FB00070700
F900F80704F900F80707FC040700FB0007070700F900F80700F900F807070005
00FB000707070700F900F80704F900F80707FC00FB00070707070700F9000000
F9F90000F80000FB00F80700F8070700F9F9F9F9F900FCFD00FD00FB000000FB
00070700F9F9F9F9000700FCFDFC0400FBFBFB00F8070707000000F80707F800
0000F8F8000000070707070700F80007070700F80007F800F800F80007070707
00F80007000700F8000700F8070700000707070700F80000F80000F800F80707
0707F8000707070700F800F800F800F80007F800000000070707070700F8F800
0700F8F8000700F807070707F807070700F80007070700F8000700F8F8F8F800
0707070700000707070707000007F800000000F8070707070707070707070707
07070707070707070707}
Font.Color = clWhite
Font.Height = -16
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
BarColor = clWhite
Caption = '%u%%'
end
object zColorBtn1: TzColorBtn
Left = 40
Top = 8
Height = 97
MultipleLines = True
WordWrap = True
Caption = 'The TzColorBtn can now split the caption over m&ultiple lines'
TabOrder = 0
OnClick = zColorBtn1Click
end
object Edit1: TEdit
Left = 16
Top = 112
Width = 145
Height = 20
TabOrder = 1
Text = 'Edit1'
end
object zGradBtn1: TzGradBtn
Left = 240
Top = 8
Width = 177
Height = 97
Caption = 'A new Button type'
Color = clGreen
ParentColor = False
TabOrder = 2
EndColor = clOlive
end
object zBitColBtn1: TzBitColBtn
Left = 8
Top = 152
Width = 97
Caption = '&Less'
TabOrder = 3
OnClick = zBitColBtn1Click
Glyph.Data = {
50010000424D500100000000000076000000280000001E0000000C0000000100
040000000000C000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777887777
7777777778877777770077777008777777777777778777777700777700087777
7777777777877777770077700008888888877777778888888800770000000000
0087777777777777780070000000000000877777777777777800F00000000000
008F7777777777777800FF0000000000008F77777777777778007FF00007FFFF
FF77FF77777FFFFFF70077FF0008777777777FF7778777777700777FF0087777
777777FF7787777777007777FFF777777777777FFF7777777700000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
TransparentColor = clSilver
BitmapWhere = z_BWLeft
end
object zBitColBtn2: TzBitColBtn
Left = 328
Top = 152
Width = 97
Caption = '&More'
TabOrder = 4
OnClick = zBitColBtn2Click
Glyph.Data = {
50010000424D500100000000000076000000280000001E0000000C0000000100
040000000000C000000000000000000000000000000000000000000000000000
80000080000000808000800000008000800080800000C0C0C000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00777777778877
777777777778877777007777777F00877777777777F7787777007777777F0008
7777777777F77787770078888887000087778888887777787700F00000000000
087F7777777777778700F00000000000008F7777777777777800F00000000000
007F7777777777777700F00000000000077F7777777777777700FFFFFFFF0000
777FFFFFFFF7777777007777777F00077777777777F7777777007777777F0077
7777777777F7777777007777777FF7777777777777FF77777700000000000000
0000000000000000000000000000000000000000}
NumGlyphs = 2
TransparentColor = clSilver
BitmapWhere = z_BWRight
end
object zMinMax1: TzMinMax
AutoTaskBarAjust = True
UseDefaultSize = True
Left = 8
Top = 8
end
object zShowApp1: TzShowApp
CPUType = 5
CPUString = 'Pentium'
UseCmdShow = False
HelpFile = 'DELPHI.HLP'
HintColor = 8454143
HintPause = 800
Icon.Data = {<image000.ico>}
ShowHint = True
Title = 'Test of version 1.10 of ZieglerCollection'
Left = 8
Top = 40
end
end