Moin Fr33z0r,
vertausche mal die Zeilen Timer1.Enabled und Button4.Visible := false
Ich denke mal, dass der Timer sofort ausgelöst wird, weshalb dann die Folgezeile nicht zur Ausführung kommt.
BTW:
Zu Beginn der OnTimer Routine, solltest Du diesen deaktivieren, und erst am Ende wieder aktivieren, um zu verhindern, dass während der Verarbeitung der OnTimer Routine diese wieder erneut ausgelöst wird, falls ihre Abarbeitung längern dauern sollte als der Abstand von einem Auslösen bis zum nächsten (das ist natürlich nicht zwingend erforderlich).
Delphi-Quellcode:
Timer1.Enabled := false;
try
// Sonstige Routine
finally
Timer1.Enabled := true;
end;