home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
Delphi Anthology
/
aDELPHI.iso
/
Runimage
/
Delphi50
/
Bin
/
sqlb.dll
/
0
/
RCDATA
/
TANSWERFORM
/
TANSWERFORM.txt
Wrap
Text File
|
1999-08-11
|
2KB
|
95 lines
object AnswerForm: TAnswerForm
Left = 284
Top = 147
Width = 651
Height = 414
Caption = 'Query Results'
ParentFont = True
KeyPreview = True
Position = poDefault
OnActivate = FormActivate
OnDeactivate = FormDeactivate
OnKeyDown = FormKeyDown
PixelsPerInch = 96
TextHeight = 13
object AnswerGrid: TDBGrid
Left = 0
Top = 31
Width = 643
Height = 356
Align = alClient
DataSource = QDataSource
Options = [dgTitles, dgIndicator, dgColumnResize, dgColLines, dgRowLines, dgTabs, dgConfirmDelete, dgCancelOnExit]
TabOrder = 0
TitleFont.Charset = DEFAULT_CHARSET
TitleFont.Color = clWindowText
TitleFont.Name = 'Default'
TitleFont.Style = []
end
object ToolBar1: TToolBar
Left = 0
Top = 0
Width = 643
Height = 31
AutoSize = True
ButtonHeight = 25
EdgeBorders = [ebTop, ebRight, ebBottom]
TabOrder = 1
object DBNavigator1: TDBNavigator
Left = 0
Top = 2
Width = 128
Height = 25
Cursor = crArrow
DataSource = QDataSource
VisibleButtons = [nbFirst, nbPrior, nbNext, nbLast]
Hints.Strings = (
'First Record'
'Previous Record'
'Next Record'
'Last Record')
ParentShowHint = False
ShowHint = True
TabOrder = 0
end
object ToolButton1: TToolButton
Left = 128
Top = 2
Width = 8
Height = 25
Caption = 'ToolButton1'
ImageIndex = 0
Style = tbsSeparator
end
object tbbCopy: TSpeedButton
Left = 136
Top = 2
Width = 25
Height = 25
Hint = 'Copy to Clipboard'
Flat = True
Glyph.Data = {
F6000000424DF600000000000000760000002800000010000000100000000100
0400000000008000000000000000000000001000000010000000FFFFFF000000
8000008000000080800080000000800080008080000080808000C0C0C0000000
FF000000000000FFFF00FF000000FF00FF00FFFF000000666600888888888888
8888888888888888888888888884444444448888888400000004888888840AAA
AA048AAAAAA4000000048A0000040AAAAA048A0AAAA4000000048A0000040AA0
44448A0AAAA4000040488A000004000044888A0AA0A4444448888A0000A0A888
88888A0000AA888888888AAAAAA8888888888888888888888888}
ParentShowHint = False
ShowHint = True
OnClick = tbbCopyClick
end
end
object QDataSource: TDataSource
DataSet = SQLQuery
Left = 614
Top = 2
end
object SQLQuery: TQuery
Left = 584
Top = 2
end
end