home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1997 July & August
/
Pcwk7897.iso
/
forum
/
ank
/
ankwin
/
data.z
/
_ANK4WIN.EXE
/
0
/
RCDATA
/
TFORM1
/
TFORM1.txt
< prev
Wrap
Text File
|
1996-11-30
|
7KB
|
377 lines
object Form1: TForm1
Left = 213
Top = 72
BorderIcons = [biSystemMenu, biMinimize]
BorderStyle = bsSingle
Caption = 'Ankieter v2.0 for Win '#39'95'
ClientHeight = 439
ClientWidth = 420
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold, fsItalic]
Icon.Data = {<image000.ico>}
Position = poScreenCenter
Scaled = False
OnClose = FormClose
OnKeyPress = FormKeyPress
OnShow = FormShow
PixelsPerInch = 96
TextHeight = 13
object Memo1: TMemo
Left = 16
Top = 48
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Lines.Strings = (
'Memo1')
ParentFont = False
TabOrder = 0
OnClick = Memo1Click
end
object Memo2: TMemo
Left = 16
Top = 88
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo2')
ParentFont = False
TabOrder = 1
OnClick = Memo2Click
end
object Memo3: TMemo
Left = 16
Top = 128
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo3')
ParentFont = False
TabOrder = 2
OnClick = Memo3Click
end
object Memo4: TMemo
Left = 16
Top = 168
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo4')
ParentFont = False
TabOrder = 3
OnClick = Memo4Click
end
object Memo5: TMemo
Left = 16
Top = 208
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo5')
ParentFont = False
TabOrder = 4
OnClick = Memo5Click
end
object Memo6: TMemo
Left = 16
Top = 248
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo6')
ParentFont = False
TabOrder = 5
OnClick = Memo6Click
end
object Memo7: TMemo
Left = 16
Top = 288
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo7')
ParentFont = False
TabOrder = 6
OnClick = Memo7Click
end
object Memo8: TMemo
Left = 16
Top = 328
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo8')
ParentFont = False
TabOrder = 7
OnClick = Memo8Click
end
object Memo9: TMemo
Left = 16
Top = 368
Width = 385
Height = 33
Cursor = crCross
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'Memo9')
ParentFont = False
TabOrder = 8
OnClick = Memo9Click
end
object OK: TButton
Left = 304
Top = 410
Width = 89
Height = 25
Caption = 'Nast�pne'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 9
OnClick = OKClick
end
object dis0: TMemo
Left = 16
Top = 8
Width = 385
Height = 33
Alignment = taCenter
BorderStyle = bsNone
Color = clSilver
Enabled = False
Font.Color = clWhite
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis0')
ParentFont = False
TabOrder = 10
end
object dis1: TMemo
Left = 16
Top = 48
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis1')
ParentFont = False
TabOrder = 11
end
object dis2: TMemo
Left = 16
Top = 88
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 12
end
object dis3: TMemo
Left = 16
Top = 128
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 13
end
object dis4: TMemo
Left = 16
Top = 168
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 14
end
object dis5: TMemo
Left = 16
Top = 208
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 15
end
object dis6: TMemo
Left = 16
Top = 248
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 16
end
object dis7: TMemo
Left = 16
Top = 288
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 17
end
object dis8: TMemo
Left = 16
Top = 328
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 18
end
object dis9: TMemo
Left = 16
Top = 368
Width = 385
Height = 33
Color = clWhite
Enabled = False
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
Lines.Strings = (
'dis2')
ParentFont = False
TabOrder = 19
end
object Button1: TButton
Left = 24
Top = 410
Width = 89
Height = 25
Caption = 'Poprzednie'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 20
OnClick = Button1Click
end
object Button2: TButton
Left = 171
Top = 410
Width = 73
Height = 25
Caption = 'Koniec'
Font.Color = clBlack
Font.Height = -13
Font.Name = 'MS Sans Serif'
Font.Style = []
ParentFont = False
TabOrder = 21
OnClick = Button2Click
end
object OpenDialog1: TOpenDialog
DefaultExt = 'ANK'
FileEditStyle = fsEdit
Filter = 'Ankiety (*.ank)|*.ank'
Title = 'Wybierz Ankiet�...'
Left = 368
end
end