| 2218 |
sbetterm |
1 |
//---------------------------------------------------------------------------
|
|
|
2 |
|
|
|
3 |
#ifndef Unit1H
|
|
|
4 |
#define Unit1H
|
|
|
5 |
//---------------------------------------------------------------------------
|
|
|
6 |
#include <Classes.hpp>
|
|
|
7 |
#include <Controls.hpp>
|
|
|
8 |
#include <StdCtrls.hpp>
|
|
|
9 |
#include <Forms.hpp>
|
|
|
10 |
#include "AdvGrid.hpp"
|
|
|
11 |
#include "BaseGrid.hpp"
|
|
|
12 |
#include "DBAdvGrid.hpp"
|
|
|
13 |
#include <Grids.hpp>
|
|
|
14 |
#include "AdvPageControl.hpp"
|
|
|
15 |
#include "DBAdvNavigator.hpp"
|
|
|
16 |
#include <ComCtrls.hpp>
|
|
|
17 |
#include <ExtCtrls.hpp>
|
|
|
18 |
#include "AdvPanel.hpp"
|
|
|
19 |
#include <ADODB.hpp>
|
|
|
20 |
#include <DB.hpp>
|
|
|
21 |
//---------------------------------------------------------------------------
|
|
|
22 |
class TMainForm : public TForm
|
|
|
23 |
{
|
|
|
24 |
__published: // IDE-managed Components
|
|
|
25 |
TAdvPageControl *AdvPageControl1;
|
|
|
26 |
TAdvTabSheet *PayloadStructureTabSheet;
|
|
|
27 |
TDBAdvNavigator *DBAdvNavigator1;
|
|
|
28 |
TAdvPanel *AdvPanel1;
|
|
|
29 |
TSplitter *Splitter1;
|
|
|
30 |
TADOConnection *IntegrationDBConnection;
|
|
|
31 |
TDataSource *TxnValuesDataSource;
|
|
|
32 |
TDBAdvGrid *NewPayloadStructureGrid;
|
|
|
33 |
TADOQuery *TxnValuesQuery;
|
|
|
34 |
void __fastcall FormShow(TObject *Sender);
|
|
|
35 |
private: // User declarations
|
|
|
36 |
void __fastcall buildTransactionSpecificationValueTree( TDBAdvGrid & grid, TADOQuery & query );
|
|
|
37 |
void __fastcall populatePayloadStructureTab( const AnsiString & structure );
|
|
|
38 |
|
|
|
39 |
public: // User declarations
|
|
|
40 |
__fastcall TMainForm(TComponent* Owner);
|
|
|
41 |
};
|
|
|
42 |
//---------------------------------------------------------------------------
|
|
|
43 |
extern PACKAGE TMainForm *MainForm;
|
|
|
44 |
//---------------------------------------------------------------------------
|
|
|
45 |
#endif
|