//--------------------------------------------------------------------------- #define STRICT #include #pragma hdrstop #include "main.h" #include #include //--------------------------------------------------------------------------- #pragma package(smart_init) #pragma link "dxPSCore" #pragma link "dxPSdxFCLnk" #pragma resource "*.dfm" #pragma link "dxflchrt" TMainForm *MainForm; //--------------------------------------------------------------------------- __fastcall TMainForm::TMainForm(TComponent* Owner) : TForm(Owner) { } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbDXClick(TObject *Sender) { ShellExecute(Handle, PChar("OPEN"), PChar("http://www.devexpress.com"), NULL, NULL, SW_SHOWMAXIMIZED); } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbSetupClick(TObject *Sender) { dxComponentPrinter1->PageSetup(NULL); } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbPreviewClick(TObject *Sender) { dxComponentPrinter1->Preview(true, NULL); } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbPrintClick(TObject *Sender) { dxComponentPrinter1->Print(true, NULL, NULL); } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbDesignerClick(TObject *Sender) { dxComponentPrinter1->DesignReport(NULL); } //--------------------------------------------------------------------------- void __fastcall TMainForm::tbExitClick(TObject *Sender) { Close(); } //---------------------------------------------------------------------------