рограми для форми FSPR
# include
# pragma hdrstop
# include "USPR.h"
# include "UGL.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * FSPR;
// ---------------------------------------- -----------------------------------
__fastcall TFSPR :: TFSPR (TComponent * Owner)
: TForm (Owner)
{
}
{
FSPR-> ​​Close ();
}
// ---------------------------------------- -----------------------------------
Текст програми для форми Form1
# include
# pragma hdrstop
# include "Unit1.h"
# include "UO.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * Form1;
// ---------------------------------------- -----------------------------------
__fastcall TForm1 :: TForm1 (TComponent * Owner)
: TForm (Owner)
{
}
{> QuickRep1-> Print ();
}
{> QuickRep1-> Preview ();
}
// ---------------------------------------- -----------------------------------
Текст програми для форми Form2
# include
# pragma hdrstop
# include "Unit2.h"
# include "UO2.h"
// ---------------------------------------- -----------------------------------
# pragma package (smart_init)
# pragma resource "*. dfm" * Form2;
// ---------------------------------------- -----------------------------------
__fastcall TForm2 :: TForm2 (TComponent * Owner)
: TForm (Owner)
{
}
{-> QuickRep1-> Print ();
}
{-> QuickRep1-> Preview ();
}
<...
