home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Chip 1997 April
/
Chip_1997-04_cd.bin
/
prezent
/
cb
/
data.z
/
LOOKUP.DFM
/
LOOKUP.txt
Wrap
Text File
|
1997-01-16
|
2KB
|
104 lines
object fmLookup: TfmLookup
Left = 592
Top = 118
BorderStyle = bsSingle
Caption = 'Lookup Example'
ClientHeight = 319
ClientWidth = 415
Font.Color = clWindowText
Font.Height = -11
Font.Name = 'MS Sans Serif'
Font.Style = []
Menu = MainMenu1
Position = poScreenCenter
PixelsPerInch = 96
TextHeight = 13
object Panel1: TPanel
Left = 0
Top = 0
Width = 415
Height = 33
Align = alTop
BevelOuter = bvNone
TabOrder = 0
object DBNavigator1: TDBNavigator
Left = 8
Top = 0
Width = 240
Height = 25
DataSource = DMMain.OrdersSoruce
TabOrder = 0
end
end
object Panel2: TPanel
Left = 0
Top = 33
Width = 415
Height = 286
Align = alClient
BevelOuter = bvNone
BorderWidth = 10
Caption = 'Panel2'
TabOrder = 1
object DBGrid1: TDBGrid
Left = 10
Top = 10
Width = 395
Height = 266
Align = alClient
Columns = <
item
FieldName = 'OrderNo'
Title.Alignment = taCenter
end
item
FieldName = 'CustNo'
Title.Alignment = taCenter
Width = 56
end
item
FieldName = 'CustomerName'
Title.Alignment = taCenter
Title.Caption = 'Customer'
Width = 133
end
item
FieldName = 'EmployeeFirstName'
Title.Alignment = taCenter
Title.Caption = 'Emp - First'
Width = 60
end
item
FieldName = 'EmployeeLastName'
Title.Alignment = taCenter
Title.Caption = 'Emp - Last'
Width = 80
end
item
FieldName = 'EmployeeFullName'
Title.Alignment = taCenter
Title.Caption = 'Employee'
Width = 100
end
item
FieldName = 'EmpNo'
Title.Alignment = taCenter
end>
DataSource = DMMain.OrdersSoruce
TabOrder = 0
TitleFont.Color = clWindowText
TitleFont.Height = -11
TitleFont.Name = 'MS Sans Serif'
TitleFont.Style = []
end
end
object MainMenu1: TMainMenu
Left = 280
object About1: TMenuItem
Caption = '&About'
ShortCut = 0
OnClick = About1Click
end
end
end