Wäre z.B. eine Möglichkeit. Eine andere Möglichkeit hat mir Luckie hier gezeigt...
Werte in einer anderen Form verwenden
Außerdem, könntest Du folgendes ändern...
Delphi-Quellcode:
Form5.CheckBox2.Checked := Ini.ReadBool('Default', 'Traybarwhenmin', False);
...
if Form5.CheckBox2.Checked=True then
begin
CoolTrayIcon1.Enabled:=True;
CoolTrayIcon1.MinimizeToTray:=True;
end;
Vieleicht eher so..
Delphi-Quellcode:
var
SetCoolTrayIcon : Boolean
begin
...
SetCoolTrayIcon := Ini.ReadBool('Default', 'Traybarwhenmin', False);
...
CoolTrayIcon1.Enabled := SetCoolTrayIcon = 1;
CoolTrayIcon1.MinimizeToTray := SetCoolTrayIcon = 1;
Erstens wird dein Code Übersichtlicher und erfüllt aufjedenfall den Zweck.
Gruß Jens