Entwickler-Ecke
Grafische Benutzeroberflächen (VCL & FireMonkey) - [VisualCLX] RGB-Funktion mit Variable funktioniert nicht
Fädas - Di 20.12.05 15:48
Titel: RGB-Funktion mit Variable funktioniert nicht
Hallo, ich hab ein Problem:
Ich möchte mit Hilfe eines Timers die Farbe eines Labels verändern, was mit byte-Zahlen ja soweit funktioniert
z.B:
label1.font.color:=rgb(200,1,1);
sobald ich aber eine Variable in die Funktion schreibe, bleibt das label schwarz:
label1.font.color:=rgb(a,b,c);
Wisst ihr was darüber?
chrisw - Di 20.12.05 15:57
Also bei mir geht das !
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8:
| procedure TForm1.Button1Click(Sender: TObject); var a,b,c : Byte; begin a := 200; b := 1; c := 1; Label1.Font.Color := rgb(a,b,c); end; |
Daher denke ich Dein Problem liegt im Refresh !
Versuch mal Label1.Refresh;
Muetze1 - Di 20.12.05 16:04
Die liegt bestimmt nicht im Refresh - da OnChange des Fonts ausgelöst wird und das Label drauf reagiert. Ich vermute eher, er hat die Variablen lokal im Timer deklariert...
@Fädas: Zeig mal den Code vom Timer.OnTimer
Fädas - Di 20.12.05 19:11
Delphi-Quelltext
1: 2: 3: 4: 5: 6: 7: 8: 9: 10: 11: 12: 13: 14: 15: 16: 17: 18: 19: 20: 21: 22: 23: 24:
| implementation var a:byte=1; b:byte=1; c:byte=1; i:integer; {$R *.DFM}
procedure TForm1.Timer1Timer(Sender: TObject); begin inc(i); inc(a); inc(b); inc(c); if i mod 2 = 0 then label1.visible:=false else label1.visible:=true;
label1.font.color:=rgb(a,b,c); end; |
Ich wollte, dass die Farben gleichmäßig verschwimmen.
Vielleicht liegt es daran, dass ich die Variablen verändere?
Moderiert von
Christian S.: Quote- durch Delphi-Tags ersetzt
Fädas - Di 20.12.05 21:39
OOOOOOOOOOH es funktioniert doch,man muss nur ein bisschen länger warten. :lol:
man kann doch Variablen benutze, aber trotzdem Danke für die Aufmerksamkeit.
Entwickler-Ecke.de based on phpBB
Copyright 2002 - 2011 by Tino Teuber, Copyright 2011 - 2025 by Christian Stelzmann Alle Rechte vorbehalten.
Alle Beiträge stammen von dritten Personen und dürfen geltendes Recht nicht verletzen.
Entwickler-Ecke und die zugehörigen Webseiten distanzieren sich ausdrücklich von Fremdinhalten jeglicher Art!