| Class TFormTicket (unit Ticket) |
TForm
| Constructors |
| Functions |
procedure Assign(Source: TPersistent);
class function DerivedClass(const Info: TFormTicketCreateInfo): TFormTicketClass;
procedure FormCreate(Sender: TObject);
procedure FormResize(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure ItemCloseClick(Sender: TObject);
procedure ItemCourierFontClick(Sender: TObject);
procedure ItemPrintClick(Sender: TObject);
procedure ItemSavetoFileClick(Sender: TObject);
procedure ItemSystemFontClick(Sender: TObject);
procedure MemoMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Print;
class procedure Register;
procedure Restore( IniFile: TIniFile;
const Section: string);
procedure Save( IniFile: TIniFile;
const Section: string);
procedure SaveToFile;
procedure Tick;
procedure HandleTick;
class function Match(const Info: TObject): Boolean;
procedure SaveImage(TicketImage: TStringList);
procedure WMSysCommand(var Message: TMessage);
class procedure NoMatch( Sender: TObject;
const Info: TObject);| Properties |
property ListIndex : Integer
property TickEnabled : Boolean| Events |
| Variables |
ItemClose : TMenuItem;
ItemCourierFont : TMenuItem;
ItemPrint : TMenuItem;
ItemSavetoFile : TMenuItem;
ItemSystemFont : TMenuItem;
Memo : TRichEdit;
N1 : TMenuItem;
N2 : TMenuItem;
PopupMenu : TPopupMenu;
FListIndex : Integer;
FTickEnabled : Boolean;| Constructors |
| Functions |
procedure Assign(Source: TPersistent);
class function DerivedClass(const Info: TFormTicketCreateInfo): TFormTicketClass;
procedure FormCreate(Sender: TObject);
procedure FormResize(Sender: TObject);
procedure FormShow(Sender: TObject);
procedure ItemCloseClick(Sender: TObject);
procedure ItemCourierFontClick(Sender: TObject);
procedure ItemPrintClick(Sender: TObject);
procedure ItemSavetoFileClick(Sender: TObject);
procedure ItemSystemFontClick(Sender: TObject);
procedure MemoMouseDown(Sender: TObject; Button: TMouseButton;
Shift: TShiftState; X, Y: Integer);
procedure Print;
class procedure Register;
procedure Restore( IniFile: TIniFile;
const Section: string);
procedure Save( IniFile: TIniFile;
const Section: string);
procedure SaveToFile;
procedure Tick;
procedure HandleTick;
class function Match(const Info: TObject): Boolean;
procedure SaveImage(TicketImage: TStringList);
procedure WMSysCommand(var Message: TMessage);
class procedure NoMatch( Sender: TObject;
const Info: TObject);| Properties |
property ListIndex : Integer
property TickEnabled : Boolean| Events |
| Variables |
ItemClose : TMenuItem;
ItemCourierFont : TMenuItem;
ItemPrint : TMenuItem;
ItemSavetoFile : TMenuItem;
ItemSystemFont : TMenuItem;
Memo : TRichEdit;
N1 : TMenuItem;
N2 : TMenuItem;
PopupMenu : TPopupMenu;
FListIndex : Integer;
FTickEnabled : Boolean;