Danke für eure Antworten, die Methode von toms fand ich am einfachsten, und funktioniert auch wunderbar, danke.
Mir fällt gerade noch ein, wenn das Label die max. Länge von 5 erreicht hat, sollen einige Images deaktiviert werden.
Wäre es sinnvoll wenn man zu jeder prozedur dann:
Delphi-Quellcode:
procedure TForm1.GruenClick(Sender: TObject);
begin
SetLabelText(Wert,'5', 5);
if Wert.GetTextLen = 5 then
Gelb.Enabled := False; // jedes Image von Hand deaktivieren sinnvoll?
Blau.Enabled := False;
...
end;
hinzufügt?
Also zu jedem klick eines Images die andern Images deaktiviert? Kann man das eleganter machen?
mfg