Du weißt aber schon, dass deine Einrückung – wie soll ich sagen – problematisch ist? Und zwar die Zeilen unter den then werden
immer ausgeführt:
So sieht es ungefähr der Compiler:
Delphi-Quellcode:
if n=1 then zeit1:=StrToTime(Label1.Caption);
Label14.Caption:=TimeToStr(zeit1);
[...]
Ich habe nur einen Zeilenumbruch entfernt und alle Einrückungen entfernt, d.h. die Funktionalität wurde nicht geändert. Was liest du eigentlich aus
Label1 aus?
MfG
Fabian