|
|
@@ -5,13 +5,74 @@ object rmGridHeaderData: TrmGridHeaderData
|
|
|
Height = 150
|
|
|
Width = 215
|
|
|
object cdsGridHeader: TClientDataSet
|
|
|
+ Active = True
|
|
|
Aggregates = <>
|
|
|
- FieldDefs = <>
|
|
|
+ FieldDefs = <
|
|
|
+ item
|
|
|
+ Name = 'ProjectName'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 50
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'DealCode'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 20
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'CName'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 50
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'SName'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 50
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'PhaseIndex'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 10
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'DealName'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 100
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'FlowIndex'
|
|
|
+ DataType = ftInteger
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'SName_2'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 50
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'Deadline'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 255
|
|
|
+ end
|
|
|
+ item
|
|
|
+ Name = 'DealType'
|
|
|
+ DataType = ftWideString
|
|
|
+ Size = 50
|
|
|
+ end>
|
|
|
IndexDefs = <>
|
|
|
Params = <>
|
|
|
StoreDefs = True
|
|
|
Left = 56
|
|
|
Top = 40
|
|
|
+ Data = {
|
|
|
+ 2F0100009619E0BD01000000180000000A0000000000030000002F010B50726F
|
|
|
+ 6A6563744E616D6501004A000000010005574944544802000200640008446561
|
|
|
+ 6C436F646501004A000000010005574944544802000200280005434E616D6501
|
|
|
+ 004A000000010005574944544802000200640005534E616D6501004A00000001
|
|
|
+ 000557494454480200020064000A5068617365496E64657801004A0000000100
|
|
|
+ 055749445448020002001400084465616C4E616D6501004A0000000100055749
|
|
|
+ 44544802000200C80009466C6F77496E646578040001000000000007534E616D
|
|
|
+ 655F3201004A000000010005574944544802000200640008446561646C696E65
|
|
|
+ 02004A000000010005574944544802000200FE01084465616C5479706501004A
|
|
|
+ 00000001000557494454480200020064000000}
|
|
|
object cdsGridHeaderProjectName: TWideStringField
|
|
|
FieldName = 'ProjectName'
|
|
|
Size = 50
|
