ja ich hab ja
windows.beep(200,400);
zum beep geschrieben da erstmal nicht mehr passieren soll also zum test.
ich hab das
Delphi-Quellcode:
procedure TForm1.FormCreate(Sender: TObject);
begin
Label25.Caption:=FormatDateTime('dd.mm.yyyy', Now);
KeyPreview := True;
Label28.Caption := TimeToStr(Now);
randomize;
x := random(4)+1;
end;
so sieht mein form create aus ist das wenigstens so richtig?