Class TInfoDlg (unit InfoDlg)

Inherits from

TComponent

TSprachen = (sDeutsch, SEnglisch, sItalienisch, sFranzoesisch, sRussisch);

Constructors


constructor Create(AOwner:TComponent);

---------------------------------------------------------------------- // TInfoDlg.


Functions

function Execute:boolean;

Public-Deklarationen

---------------------------------------------------------------------- // TInfoDlg.


Properties

property Firmenname : string

Published-Deklarationen

property Nachricht : string


property Sprache : TSprachen


Events

Variables

mSprache : TSprachen;


sFirmenname : string;


sInfo : string;

Private-Deklarationen


Constructors


constructor Create(AOwner:TComponent);

---------------------------------------------------------------------- // TInfoDlg.Create ---------------------------------------------------------------------- //


Functions


function Execute:boolean;

Public-Deklarationen

---------------------------------------------------------------------- // TInfoDlg.Execute ---------------------------------------------------------------------- //


Properties


property Firmenname : string

Published-Deklarationen


property Nachricht : string


property Sprache : TSprachen


Events


Variables


mSprache : TSprachen;


sFirmenname : string;


sInfo : string;

Private-Deklarationen