home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC World Komputer 1998 January
/
Pcwk0198.iso
/
Zadarmo
/
CYBERCON
/
_SETUP.1
/
Ccontact.exe
/
0
/
RCDATA
/
TFRMACTIVITY
/
TFRMACTIVITY.txt
< prev
Wrap
Text File
|
1997-08-26
|
9KB
|
311 lines
object frmActivity: TfrmActivity
Left = 191
Top = 60
Width = 410
Height = 326
ActiveControl = edtActivity
BorderIcons = [biSystemMenu, biMaximize]
Caption = 'Activity'
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Icon.Data = {<image000.ico>}
Position = poScreenCenter
OnActivate = FormActivate
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 258
Width = 402
Height = 41
Align = alBottom
TabOrder = 0
object BitBtn1: TBitBtn
Left = 308
Top = 8
Width = 75
Height = 25
TabOrder = 0
Kind = bkCancel
end
object BitBtn2: TBitBtn
Left = 220
Top = 8
Width = 75
Height = 25
TabOrder = 1
Kind = bkOK
end
end
object Panel2: TPanel
Left = 0
Top = 0
Width = 402
Height = 258
Align = alClient
BevelInner = bvLowered
BorderWidth = 4
Caption = 'Panel2'
TabOrder = 1
object ScrollBox: TScrollBox
Left = 6
Top = 6
Width = 390
Height = 246
HorzScrollBar.Margin = 6
HorzScrollBar.Range = 348
VertScrollBar.Margin = 6
VertScrollBar.Range = 160
Align = alClient
AutoScroll = False
BorderStyle = bsNone
TabOrder = 0
object Label1: TLabel
Left = 8
Top = 4
Width = 43
Height = 13
Caption = 'Activity'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label2: TLabel
Left = 230
Top = 4
Width = 34
Height = 13
Caption = 'When'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label3: TLabel
Left = 8
Top = 48
Width = 40
Height = 13
Caption = 'Details'
FocusControl = EditDetailes
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label4: TLabel
Left = 8
Top = 94
Width = 34
Height = 13
Caption = 'Notes'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label5: TLabel
Left = 10
Top = 216
Width = 76
Height = 13
Caption = 'Date Created'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label6: TLabel
Left = 326
Top = 216
Width = 31
Height = 13
Caption = 'Done'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object Label7: TLabel
Left = 226
Top = 216
Width = 40
Height = 13
Caption = 'Priority'
Font.Color = clBlack
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = [fsBold]
ParentFont = False
end
object SpeedButton1: TSpeedButton
Left = 152
Top = 20
Width = 17
Height = 21
Hint = 'Edit Activity List'
Glyph.Data = {
AE040000424DAE0400000000000036040000280000000B0000000A0000000100
0800000000007800000000000000000000000001000000010000000000000000
80000080000000808000800000008000800080800000C0C0C000C0DCC000F0CA
A6000000330000006600000099000000CC000033000000333300003366000033
99000033CC000033FF00006600000066330000666600006699000066CC000066
FF00009900000099330000996600009999000099CC000099FF0000CC000000CC
330000CC660000CC990000CCCC0000CCFF0000FF330000FF660000FF990000FF
CC00330000003300330033006600330099003300CC003300FF00333300003333
330033336600333399003333CC003333FF003366000033663300336666003366
99003366CC003366FF00339900003399330033996600339999003399CC003399
FF0033CC000033CC330033CC660033CC990033CCCC0033CCFF0033FF000033FF
330033FF660033FF990033FFCC0033FFFF006600000066003300660066006600
99006600CC006600FF00663300006633330066336600663399006633CC006633
FF00666600006666330066666600666699006666CC006666FF00669900006699
330066996600669999006699CC006699FF0066CC000066CC330066CC660066CC
990066CCCC0066CCFF0066FF000066FF330066FF660066FF990066FFCC0066FF
FF00990000009900330099006600990099009900CC009900FF00993300009933
330099336600993399009933CC009933FF009966000099663300996666009966
99009966CC009966FF00999900009999330099996600999999009999CC009999
FF0099CC000099CC330099CC660099CC990099CCCC0099CCFF0099FF000099FF
330099FF660099FF990099FFCC0099FFFF00CC000000CC003300CC006600CC00
9900CC00CC00CC00FF00CC330000CC333300CC336600CC339900CC33CC00CC33
FF00CC660000CC663300CC666600CC669900CC66CC00CC66FF00CC990000CC99
3300CC996600CC999900CC99CC00CC99FF00CCCC0000CCCC3300CCCC6600CCCC
9900CCCCCC00CCCCFF00CCFF0000CCFF3300CCFF6600CCFF9900CCFFCC00CCFF
FF00FF003300FF006600FF009900FF00CC00FF330000FF333300FF336600FF33
9900FF33CC00FF33FF00FF660000FF663300FF666600FF669900FF66CC00FF66
FF00FF990000FF993300FF996600FF999900FF99CC00FF99FF00FFCC0000FFCC
3300FFCC6600FFCC9900FFCCCC00FFCCFF00FFFF3300FFFF6600FFFF9900FFFF
CC000D0D0D001A1A1A00282828003535350043434300505050005D5D5D006B6B
6B00787878008686860093939300A1A1A100AEAEAE00BBBBBB00C9C9C900D6D6
D600E4E4E400F1F1F1000400010001000100CBCBCB00B2B2B200D7D7D700DDDD
DD00E3E3E300EAEAEA00F8F8F8001C1C1C00F0FBFF00A4A0A000808080000000
FF0000FF000000FFFF00FF000000FF00FF00FFFF0000FFFFFF00070707070707
0707070707000707070704040404070707F00707070404040404040707000707
0404040404040404070007070404040404040404070007070404040404040404
0700070704040404040404040700070707040404040404070700070707070404
0404070707A0070707070707070707070700}
ParentShowHint = False
ShowHint = True
OnClick = SpeedButton1Click
end
object EditDetailes: TDBEdit
Left = 8
Top = 65
Width = 363
Height = 24
DataField = 'Detailes'
DataSource = frmDataModule.dsActivity
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
MaxLength = 100
ParentFont = False
TabOrder = 2
end
object DBCheckBox1: TDBCheckBox
Left = 360
Top = 214
Width = 17
Height = 17
DataField = 'Done'
DataSource = frmDataModule.dsActivity
TabOrder = 6
ValueChecked = 'True'
ValueUnchecked = 'False'
end
object DBMemo1: TDBMemo
Left = 8
Top = 111
Width = 365
Height = 89
DataField = 'Notes'
DataSource = frmDataModule.dsActivity
Font.Color = clBlack
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
ParentFont = False
TabOrder = 5
OnDblClick = DBMemo1DblClick
end
object edtWhen: TwwDBComboDlg
Left = 230
Top = 20
Width = 141
Height = 21
OnCustomDlg = edtWhenCustomDlg
ShowButton = True
Style = csDropDown
DataField = 'DateOf'
DataSource = frmDataModule.dsActivity
MaxLength = 0
TabOrder = 1
end
object edtDateCreated: TwwDBComboDlg
Left = 96
Top = 212
Width = 121
Height = 21
OnCustomDlg = edtDateCreatedCustomDlg
ShowButton = True
Style = csDropDown
DataField = 'DateCreated'
DataSource = frmDataModule.dsActivity
MaxLength = 0
TabOrder = 3
end
object edtActivity: TDBLookupComboBox
Left = 8
Top = 20
Width = 145
Height = 21
DataField = 'Activity'
DataSource = frmDataModule.dsActivity
KeyField = 'ActDesc'
ListSource = frmDataModule.DSActDesc
TabOrder = 0
end
object DBComboBox1: TDBComboBox
Left = 272
Top = 212
Width = 41
Height = 21
DataField = 'Priority'
DataSource = frmDataModule.dsActivity
ItemHeight = 13
Items.Strings = (
'A'
'B'
'C'
'D'
'')
TabOrder = 4
end
end
end
object wwComments: TwwMemoDialog
DataSource = frmDataModule.dsActivity
DataField = 'Notes'
Font.Color = clBlack
Font.Height = -12
Font.Name = 'Arial'
Font.Style = []
Caption = 'Site Description'
DlgLeft = 0
DlgTop = 0
DlgWidth = 500
DlgHeight = 350
Left = 84
Top = 117
end
end