title image


Smiley Operantentyp
Hi,



warum funktioniert es nicht?



Ich möchte (zum lernen) eine ganz einfache Sache programmieren. Beim wiederholten betätigen einer Schaltfläche soll sich die Farbe eines Textes ändern.



procedure TForm1.Button1Click(Sender: TObject);

begin

if label1.Font.Color = WindowText then label1.Font.Color:=clLime;

if label1.Font.Color = clLime then label1.Font.Color:=clRed;

if label1.Font.Color = clRed then label1.Font.Color:=clYellow;

if label1.Font.Color = clYellow then label1.Font.Color:=clBlue;

if label1.Font.Color = clBlue then label1.Font.Color:=clWindowText;

end;



Es kommt aber die Fehlermeldung:

[Fehler] Formular1.pas(33): Operator ist auf diesen Operandentyp nicht anwendbar

Was ist den label1.Font.Color? Bzw. wie kann ich es umwandeln, damit ich es mit den Farbwerten vergleichen kann?



Der Debugger zeigt mir Integer-Werte an aber...



Danke!

geschrieben von

Login

E-Mail:
  

Passwort:
  

Beitrag anfügen

Symbol:
 
 
 
 
 
 
 
 
 
 
 
 
 

Überschrift: