Class TSicherDlg (unit SDlg) |
Inherits from
TForm
procedure FormCreate(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.
procedure FormShow(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.
procedure JaChange(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.
property Firmenname : string
property Nachricht : string
property Sprache : TSprachen
Bevel1 : TBevel;
Button1 : TButton;
Button2 : TButton;
Image1 : TImage;
Ja : TMaskEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
MSOfficeCaption1 : TMSOfficeCaption;
Info : string;
mSprache : TSprachen;
MyFirmenname : string;
procedure FormCreate(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.FormCreate ---------------------------------------------------------------------- //
procedure FormShow(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.FormShow ---------------------------------------------------------------------- //
procedure JaChange(Sender: TObject);
---------------------------------------------------------------------- // TSicherDlg.JaChange ---------------------------------------------------------------------- //
property Firmenname : string
property Nachricht : string
property Sprache : TSprachen
Bevel1 : TBevel;
Button1 : TButton;
Button2 : TButton;
Image1 : TImage;
Ja : TMaskEdit;
Label1 : TLabel;
Label2 : TLabel;
Label3 : TLabel;
Label4 : TLabel;
MSOfficeCaption1 : TMSOfficeCaption;
Info : string;
mSprache : TSprachen;
MyFirmenname : string;