Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by quendolineDD,
2. Okt 2007
Um mal noch deinen Fehler zu dokumentieren. Du hast zwar bei der Checkbox eine Abfrage, ob angezeigt werden soll oder nicht, aber bei der Radiogroup wird ungeachtet der Checkbox das jeweilige Datumsvormat angezeigt.
Überweise doch einfach den ItemIndex an die Procedur bzw. mach eine Funktion draus.
function setPanelDate(index: integer):string;
const
DateForm: array of string =...
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by quendolineDD,
2. Okt 2007
Wo ist die Abfrage von den Radiobuttons? Die sind in deinem geposteten Quelltext garnicht enthalten ...
Achja, dein Quelltext geht auch einfacher zu schreiben und vor allem übersichtlicher ;)
procedure TForm5.CheckBox1Click(Sender: TObject);
begin
if not CheckBox1.Checked then
Form3.Statusbar1.Panels.Text:= ''
else
Form3.Statusbar1.Panels.Text:= 'Datum: '+FormatDateTime('dd.mm.yyyy',...