Bugfix: get rid of another Close() call which lead to a spurious mrCancel. Fixes issue #665.

This commit is contained in:
rosenfield.albert
2008-08-11 15:23:52 +00:00
parent d51bf06b79
commit bcf26b1c98

View File

@ -188,7 +188,6 @@ begin
main.appstarted := true;
if AutoReconnect and (ComboBoxDescription.ItemIndex > -1) then
begin
ButtonConnectClick(self);
TimerCloseFormReminder.Enabled := true;
end;
end;
@ -352,7 +351,7 @@ end;
procedure Tconnform.TimerCloseFormReminderTimer(Sender: TObject);
begin
TimerCloseFormReminder.Enabled := false;
close;
ButtonConnect.Click;
end;