Class TFormPrintPrev (unit FPrint)

Inherits from

TForm

Constructors



Functions

procedure BtnFontClick(Sender: TObject);


procedure BtnSaveClick(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure Edit1Change(Sender: TObject);


procedure Edit2Change(Sender: TObject);


procedure FormActivate(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


procedure FormResize(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure paintbox1Paint(Sender: TObject);

letzte Spalte

procedure PaintMetaFile;


procedure PrintClick(Sender: TObject);


procedure SettingsClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


Properties

Events

Variables

BtnFont : TButton;


Button1 : TButton;


Edit1 : TEdit;


Edit2 : TEdit;


Exit : TButton;


Label1 : TLabel;


Label2 : TLabel;


MyMetaFile : TMetafile;

Private-Deklarationen

paintbox1 : TPaintBox;


Panel1 : TPanel;


Print : TButton;


PrinterSetupDialog1 : TPrinterSetupDialog;


SaveDialog : TSaveDialog;


Settings : TButton;


SpeedButton1 : TSpeedButton;


UpDown1 : TUpDown;


UpDown2 : TUpDown;



Constructors


Functions


procedure BtnFontClick(Sender: TObject);


procedure BtnSaveClick(Sender: TObject);


procedure Button1Click(Sender: TObject);


procedure Edit1Change(Sender: TObject);


procedure Edit2Change(Sender: TObject);


procedure FormActivate(Sender: TObject);


procedure FormClose(Sender: TObject; var Action: TCloseAction);


procedure FormCreate(Sender: TObject);


procedure FormResize(Sender: TObject);


procedure FormShow(Sender: TObject);


procedure paintbox1Paint(Sender: TObject);

letzte Spalte


procedure PaintMetaFile;


procedure PrintClick(Sender: TObject);


procedure SettingsClick(Sender: TObject);


procedure SpeedButton1Click(Sender: TObject);


Properties


Events


Variables


BtnFont : TButton;


Button1 : TButton;


Edit1 : TEdit;


Edit2 : TEdit;


Exit : TButton;


Label1 : TLabel;


Label2 : TLabel;


MyMetaFile : TMetafile;

Private-Deklarationen


paintbox1 : TPaintBox;


Panel1 : TPanel;


Print : TButton;


PrinterSetupDialog1 : TPrinterSetupDialog;


SaveDialog : TSaveDialog;


Settings : TButton;


SpeedButton1 : TSpeedButton;


UpDown1 : TUpDown;


UpDown2 : TUpDown;