irgendwie macht er bei diesem letzten schritt mucken, ka wodran das liegt.
mein startbutton heisst start:
aber das hier funzt net:
Delphi-Quellcode:
procedure TForm1.Timer1Timer(Sender: TObject);
begin
if DateTimeToTimeStamp(StrToTime(zeit.Text)).Time < DateTimeToTimeStamp(now).Time then // wenn Zeit im Edit-Feld kleiner als aktuelle
ausgabe.Caption:='noch zeit'
else
TForm1.startClick(start);
end;
Delphi-Quellcode:
else
TForm1.startClick(start);
<-- da macht er stress
[Warning] Unit1.pas(42): Comparing signed and unsigned types - widened both operands
[Warning] Unit1.pas(48): For loop control variable must be simple local variable
[Error] Unit1.pas(65): This form of method call only allowed for class methods
[Fatal Error] Project1.dpr(5): Could not compile used
unit 'Unit1.pas'