Dem Timer Code zuweisen

[Störtebeker]

Hi,

ich habe bei meinem Programm u.a. einen Form mit diversen Einstellungsmöglichkeiten und möchte dem Benutzer die Möglichkeit geben zu entscheiden, ob die Zeit mit oder ohne Sekunden angezeigt werden soll.

Der Timer hat folgenden Code:

Delphi-Quellcode:

begin
Statusbar1.Panels[6].Text:='Zeit:   '+FormatDateTime('hh:nn:ss',now);
end;

auf der "Eigenschaften"-Form habe ich zwei Radiobutton:

1) Stunde / Minute
2) Stunde / Minute / Sekunden

Nun meine Frage: Wie kann ich über den Radiobutton den Timercode ändern?

mit

Delphi-Quellcode:

begin
Form3.Timer1:='Statusbar1.Panels[6].Text:='Zeit:   '+FormatDateTime('hh:nn',now);';
end;

gehts nicht.

mfG
Störtebeker

[Die Muhkuh]

Im Timer selbst

Delphi-Quellcode:

begin
if Form2.RadioButton1.Checked then
  Statusbar1.Panels[6].Text:='Zeit:   '+FormatDateTime('hh:nn:ss',now)
else
  Statusbar1.Panels[6].Text:='Zeit:   '+FormatDateTime('hh:nn',now)
end;

[Störtebeker]

Danke.

mfG
Störtebeker