Class TSSExptForm (unit Ssexpt32) |
Inherits from
TForm
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
TForm1 code
procedure BitBtn4Click(Sender: TObject);
create the new modules
procedure Edit2KeyPress(Sender: TObject; var Key: Char);
procedure Edit3Enter(Sender: TObject);
procedure Edit3KeyPress(Sender: TObject; var Key: Char);
procedure Sprite1Move(Sender: TObject; var Bounds: TRect);
procedure Timer1Timer(Sender: TObject);
function CreateAboutForm(const FormIdent: string): TMemoryStream;
CreateAboutForm method - create the form, write it out to disk
function CreateAboutSource: TMemoryStream;
CreateAboutSource method - write the synchronous source to SourceBuffer.
function CreateForm(const FormIdent: string): TMemoryStream;
CreateForm method - create the form, write it out to disk
function CreateFormSource: TMemoryStream;
CreateSource method - write the synchronous source to SourceBuffer.
function CreateProjectSource: TFileName;
function CreateSetupForm(const FormIdent: string): TMemoryStream;
CreateSetupForm method - create the form, write it out to disk
function CreateSetupSource: TMemoryStream;
CreateSetupSource method - write the synchronous source to SourceBuffer.
function DoFormCreation: TForm;
DoFormCreation method - Create the dialog defined by the user
procedure FmtWrite(Stream: TStream; Fmt: PChar; const Args: array of const);
Bevel1 : TBevel;
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BitBtn3 : TBitBtn;
BitBtn4 : TBitBtn;
Edit1 : TEdit;
Edit2 : TEdit;
Edit3 : TEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Panel1 : TPanel;
RadioGroup1 : TRadioGroup;
Sprite1 : TSprite;
SpriteBox1 : TSpriteBox;
Timer1 : TTimer;
SourceBuffer : PChar;
Private declarations
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure BitBtn3Click(Sender: TObject);
TForm1 code
procedure BitBtn4Click(Sender: TObject);
create the new modules
procedure Edit2KeyPress(Sender: TObject; var Key: Char);
procedure Edit3Enter(Sender: TObject);
procedure Edit3KeyPress(Sender: TObject; var Key: Char);
procedure Sprite1Move(Sender: TObject; var Bounds: TRect);
procedure Timer1Timer(Sender: TObject);
function CreateAboutForm(const FormIdent: string): TMemoryStream;
CreateAboutForm method - create the form, write it out to disk
function CreateAboutSource: TMemoryStream;
CreateAboutSource method - write the synchronous source to SourceBuffer.
function CreateForm(const FormIdent: string): TMemoryStream;
CreateForm method - create the form, write it out to disk
function CreateFormSource: TMemoryStream;
CreateSource method - write the synchronous source to SourceBuffer.
function CreateProjectSource: TFileName;
function CreateSetupForm(const FormIdent: string): TMemoryStream;
CreateSetupForm method - create the form, write it out to disk
function CreateSetupSource: TMemoryStream;
CreateSetupSource method - write the synchronous source to SourceBuffer.
function DoFormCreation: TForm;
DoFormCreation method - Create the dialog defined by the user
procedure FmtWrite(Stream: TStream; Fmt: PChar; const Args: array of const);
Bevel1 : TBevel;
BitBtn1 : TBitBtn;
BitBtn2 : TBitBtn;
BitBtn3 : TBitBtn;
BitBtn4 : TBitBtn;
Edit1 : TEdit;
Edit2 : TEdit;
Edit3 : TEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
Panel1 : TPanel;
RadioGroup1 : TRadioGroup;
Sprite1 : TSprite;
SpriteBox1 : TSpriteBox;
Timer1 : TTimer;
SourceBuffer : PChar;
Private declarations