home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
PC Shareware 1997 December
/
PCShareware-12-97.iso.bin
/
programy
/
recipe
/
_setup.1
/
recipe.exe
/
0
/
RCDATA
/
TQRRECIPE
/
TQRRECIPE.txt
Wrap
Text File
|
1997-10-09
|
22KB
|
897 lines
object qrRecipe: TqrRecipe
Left = 0
Top = 0
Width = 816
Height = 1056
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
DataSet = tblRecipe
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
Options = [FirstPageHeader, LastPageFooter]
Page.Columns = 1
Page.Orientation = poPortrait
Page.PaperSize = Letter
Page.Values = (
127.000000000000000000
2794.000000000000000000
127.000000000000000000
2159.000000000000000000
127.000000000000000000
127.000000000000000000
0.000000000000000000)
PrintIfEmpty = True
PrinterSettings.Copies = 1
PrinterSettings.Duplex = False
PrinterSettings.FirstPage = 0
PrinterSettings.LastPage = 0
PrinterSettings.OutputBin = First
SnapToGrid = True
Units = Inches
Zoom = 100
object QRBand2: TQRBand
Left = 48
Top = 48
Width = 720
Height = 155
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = True
Size.Values = (
410.104166666666700000
1905.000000000000000000)
BandType = rbDetail
object QRShape1: TQRShape
Left = 10
Top = 48
Width = 705
Height = 34
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
89.958333333333330000
26.458333333333330000
127.000000000000000000
1865.312500000000000000)
Shape = qrsHorLine
end
object QRDBText2: TQRDBText
Left = 10
Top = 68
Width = 51
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
26.458333333333330000
179.916666666666700000
134.937500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecipe
DataField = 'category'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText3: TQRDBText
Left = 224
Top = 68
Width = 59
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
592.666666666666700000
179.916666666666700000
156.104166666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecipe
DataField = 'CookTime'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText4: TQRDBText
Left = 94
Top = 68
Width = 29
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
248.708333333333300000
179.916666666666700000
76.729166666666670000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecipe
DataField = 'Meal'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText5: TQRDBText
Left = 326
Top = 70
Width = 56
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
862.541666666666700000
185.208333333333300000
148.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecipe
DataField = 'PrepTime'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText6: TQRDBText
Left = 146
Top = 68
Width = 50
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
386.291666666666700000
179.916666666666700000
132.291666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataField = 'Servings'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel1: TQRLabel
Left = 10
Top = 46
Width = 58
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
26.458333333333330000
121.708333333333300000
153.458333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Category'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel2: TQRLabel
Left = 224
Top = 46
Width = 69
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
592.666666666666700000
121.708333333333300000
182.562500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Cook Time'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel3: TQRLabel
Left = 326
Top = 46
Width = 67
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
862.541666666666700000
121.708333333333300000
177.270833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Prep Time'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel4: TQRLabel
Left = 94
Top = 46
Width = 32
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
248.708333333333300000
121.708333333333300000
84.666666666666670000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Meal'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel5: TQRLabel
Left = 146
Top = 46
Width = 56
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
386.291666666666700000
121.708333333333300000
148.166666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Servings'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel6: TQRLabel
Left = 10
Top = 104
Width = 73
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
26.458333333333330000
275.166666666666700000
193.145833333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Instructions'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText1: TQRDBText
Left = 12
Top = 8
Width = 58
Height = 25
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
66.145833333333330000
31.750000000000000000
21.166666666666670000
153.458333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecipe
DataField = 'Name'
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -21
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 16
end
object lbDate: TQRLabel
Left = 440
Top = 46
Width = 58
Height = 17
Enabled = False
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1164.166666666667000000
121.708333333333300000
153.458333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Assigned'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = True
WordWrap = True
FontSize = 10
end
object dbDate: TQRDBText
Left = 440
Top = 68
Width = 28
Height = 17
Enabled = False
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
1164.166666666667000000
179.916666666666700000
74.083333333333330000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblDate
DataField = 'Date'
Transparent = True
WordWrap = True
FontSize = 10
end
object QRDBRichText1: TQRDBRichText
Left = 10
Top = 126
Width = 539
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
26.458333333333330000
333.375000000000000000
1426.104166666667000000)
Alignment = taLeftJustify
AutoStretch = True
Color = clWindow
Font.Charset = DEFAULT_CHARSET
Font.Color = clWindowText
Font.Height = -13
Font.Name = 'Arial'
Font.Style = []
DataField = 'Instructions'
DataSet = tblRecipe
end
end
object QRSubDetail1: TQRSubDetail
Left = 48
Top = 247
Width = 720
Height = 26
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Frame.Width = 2
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
68.791666666666670000
1905.000000000000000000)
Master = Owner
DataSet = tblRecIngre
PrintBefore = False
PrintIfEmpty = True
object QRDBText7: TQRDBText
Left = 322
Top = 4
Width = 57
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
851.958333333333300000
10.583333333333330000
150.812500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecIngre
DataField = 'Ingredient'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText8: TQRDBText
Left = 60
Top = 4
Width = 46
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
158.750000000000000000
10.583333333333330000
121.708333333333300000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecIngre
DataField = 'Amount'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText9: TQRDBText
Left = 222
Top = 4
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
587.375000000000000000
10.583333333333330000
174.625000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecIngre
DataField = 'Description'
Transparent = False
WordWrap = True
FontSize = 10
end
object QRDBText10: TQRDBText
Left = 130
Top = 4
Width = 80
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
343.958333333333300000
10.583333333333330000
211.666666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Color = clWhite
DataSet = tblRecIngre
DataField = 'Measurement'
Transparent = False
WordWrap = True
FontSize = 10
end
end
object ChildBand1: TQRChildBand
Left = 48
Top = 203
Width = 720
Height = 44
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
AlignToBottom = False
Color = clWhite
ForceNewColumn = False
ForceNewPage = False
Size.Values = (
116.416666666666700000
1905.000000000000000000)
ParentBand = QRBand2
object QRShape5: TQRShape
Left = 48
Top = 22
Width = 420
Height = 34
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
89.958333333333330000
127.000000000000000000
58.208333333333330000
1111.250000000000000000)
Shape = qrsHorLine
end
object QRLabel12: TQRLabel
Left = 46
Top = 2
Width = 72
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
121.708333333333300000
5.291666666666667000
190.500000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Ingredients'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel13: TQRLabel
Left = 60
Top = 20
Width = 50
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
158.750000000000000000
52.916666666666670000
132.291666666666700000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Amount'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel14: TQRLabel
Left = 130
Top = 20
Width = 87
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
343.958333333333300000
52.916666666666670000
230.187500000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Measurement'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel15: TQRLabel
Left = 222
Top = 20
Width = 72
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
587.375000000000000000
52.916666666666670000
190.500000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Description'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
object QRLabel16: TQRLabel
Left = 322
Top = 20
Width = 66
Height = 17
Frame.Color = clBlack
Frame.DrawTop = False
Frame.DrawBottom = False
Frame.DrawLeft = False
Frame.DrawRight = False
Size.Values = (
44.979166666666670000
851.958333333333300000
52.916666666666670000
174.625000000000000000)
Alignment = taLeftJustify
AlignToBand = False
AutoSize = True
AutoStretch = False
Caption = 'Ingredient'
Color = clWhite
Font.Charset = DEFAULT_CHARSET
Font.Color = clNavy
Font.Height = -13
Font.Name = 'Arial'
Font.Style = [fsBold]
ParentFont = False
Transparent = False
WordWrap = True
FontSize = 10
end
end
object tblRecIngre: TTable
Active = True
DatabaseName = 'Evalc'
IndexFieldNames = 'Recipe_ID'
MasterFields = 'Recipe_ID'
MasterSource = dsRecipe
TableName = 'Rec_ingr.DB'
Left = 218
Top = 10
object tblRecIngreIngredient: TStringField
FieldName = 'Ingredient'
LookupDataSet = tblIngredient
LookupKeyFields = 'Ingredient_ID'
LookupResultField = 'Ingredient'
KeyFields = 'Ingredient_ID'
Lookup = True
end
object tblRecIngreRecipe_ID: TStringField
FieldName = 'Recipe_ID'
Size = 13
end
object tblRecIngreIngredient_ID: TStringField
FieldName = 'Ingredient_ID'
Size = 13
end
object tblRecIngreAmount: TStringField
FieldName = 'Amount'
Size = 10
end
object tblRecIngreMeasurement: TStringField
FieldName = 'Measurement'
Size = 10
end
object tblRecIngreDescription: TStringField
FieldName = 'Description'
end
object tblRecIngreOrder: TIntegerField
FieldName = 'Order'
end
end
object tblIngredient: TTable
Active = True
DatabaseName = 'Evalc'
IndexFieldNames = 'Ingredient_ID'
TableName = 'INGREDIE.DB'
Left = 282
Top = 12
end
object tblRecipe: TTable
Active = True
Filtered = True
DatabaseName = 'Evalc'
IndexFieldNames = 'Recipe_ID'
TableName = 'Recipe.DB'
Left = 14
Top = 6
end
object dsRecipe: TDataSource
DataSet = tblRecipe
Left = 56
Top = 14
end
object tblDate: TTable
Active = True
DatabaseName = 'Evalc'
IndexName = 'byRecipeID'
MasterFields = 'Recipe_ID'
MasterSource = dsRecipe
TableName = 'DAY.db'
Left = 362
Top = 10
end
end