Forum: Object-Pascal / Delphi-Language
Delphi
by KLS,
11. Dez 2006
vielleicht nicht das beste, aber so geht es auf jeden fall mit einfachen variablen.
var
wartezeitschliessen : integer;
procedure TForm1.schliessen;
begin
sleep(wartezeitschliessen); //nur als beispiel
Close;
end;
Forum: Object-Pascal / Delphi-Language
Delphi
by KLS,
11. Dez 2006
wie auch immer, vielleicht hab ich andere einstellungen, aber bei mir meckert der bei ä,ö,ü,ß auf jeden fall.
Forum: Object-Pascal / Delphi-Language
Delphi
by KLS,
7. Aug 2005
es gibt eine recht einfache möglichkeit
procedure StarteRoutineByName(Instance : TObject; Name : string); //instance z.b. Form1
type
TExecute = procedure of object;
var
Routine : TMethod;
Execute : TExecute;
begin
Routine.Data := Pointer(Instance);