Forum: Object-Pascal / Delphi-Language
Delphi
by Kroko1999,
29. Mär 2006
Sorry, ist lange her, da gab es mal Gelb-Grün, muss natürlich Gelb heißen :cry:
Forum: Object-Pascal / Delphi-Language
Delphi
by Kroko1999,
29. Mär 2006
TForm1 = class (TForm)
private
procedure Zustand (const AMode: Word);
end;
geht immer :!:
Forum: Object-Pascal / Delphi-Language
Delphi
by Kroko1999,
29. Mär 2006
als Variable wenn dort procedure TForm1.Zustand steht :?:
Forum: Object-Pascal / Delphi-Language
Delphi
by Kroko1999,
29. Mär 2006
in Tform1
Grundlagen wären nicht schlecht! :wink:
Forum: Object-Pascal / Delphi-Language
Delphi
by Kroko1999,
29. Mär 2006
Procedure wait(const Time:Integer);
var
x: Cardinal;
Begin
x := GetTickCount+Time*400 ;
while GetTickCount<X do
Application.ProcessMessages;
End;
procedure TForm1.Zustand(const AMode: Word);