Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by criss-vross123,
29. Mai 2008
Hey Marabu...
Danke...is kurz und funktioniert.
aber könnte mir einer bitte erklären was die prozedur (with...do) genau macht?
mfG Chris
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by criss-vross123,
29. Mai 2008
Ahh,
hat sich erledigt.
Manchmal steh ich echt aufm Schlauch :-D
procedure TForm4.Timer1Timer(Sender: TObject);
begin
if radiogroup1.itemindex=9 then radiogroup1.itemindex:=-1;
radiogroup1.itemindex:=radiogroup1.itemindex+1;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by criss-vross123,
29. Mai 2008
meinst du so:
procedure TForm4.Timer1Timer(Sender: TObject);
begin
if radiogroup1.itemindex=10 then radiogroup1.itemindex:=0;
radiogroup1.itemindex:=radiogroup1.itemindex+1;
end;
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by criss-vross123,
29. Mai 2008
naja aber wenn ich zum Beispiel "9" eingebe dann geht er nur bis zu 8 und fängt dann wieder von null an.
Forum: GUI-Design mit VCL / FireMonkey / Common Controls
Delphi
by criss-vross123,
29. Mai 2008
Hallo Experten,
da wir in der Schule gerade eine 7 Segmentanzeige programmieren wollte ich das bei mir zu Hause auch probieren.
Also nun zum Problem:
ich habe 8 Panels eine Radiogroup und 3 Buttons
ich möchte das wenn ich auf den Button "Zahlenrythmus starten" klicke die Zahlen von 1-9 angezeigt werden.
ich habe mir das so gesacht:
procedure TForm4.Timer1Timer(Sender: TObject);
begin...