Delphi-Quellcode:
procedure TForm1.Termincountdown1Click(Sender: TObject);
var
Test : Integer;
begin
Form13.Show;
Form13.Caption := 'Termincountdown';
Test := trunc(StrToDate(Edit10.Text) - date);
Form13.Label5.Caption := InttoStr(Test);
end;
So habe ich es jetzt. Fehler werden keine angezeigt. Wenn Ich aber das Programm ausführe, Kommt immernoch die Fehlermeldung, dass es kein gültiges Datum sei. Habe schon verschiedene Eingabeformate versucht. Leider immer das gleiche
