Forum: Object-Pascal / Delphi-Language
Delphi
by mirage228,
5. Dez 2004
Hi,
dann würde ich folgendes machem.
Im private oder public Bereich Deines Forms (je nach dem, wo du es brauchst) erstellst Du eine Variable vom Typ TColor.
(In dem Beispiel nenne ich die Variable mal "MyColorVar")
Dein Panel kennt ja die Eigenschaft Color, also dürfte das ganz passend sein.
In die OnClick-Methode, die Du jedem Panel zuweist, schreibst du Folgendes:
Forum: Object-Pascal / Delphi-Language
Delphi
by mirage228,
5. Dez 2004
Nun, er hat gefragt, wie er den Namen des Senders (= des Panels) speichern kann. Was er damit macht, weiss nicht.
Wenn man wieder das Panel haben will, muss man halt FindComponent verwenden.
mfG
mirage228
Forum: Object-Pascal / Delphi-Language
Delphi
by mirage228,
5. Dez 2004
Hi,
z.B. so
var
CompName: string;
begin
if (Sender is TComponent) then
CompName := TComponent(Sender).Name else
CompName := Sender.Classname; // falls es keine Komponente ist
Forum: Object-Pascal / Delphi-Language
Delphi
by mirage228,
5. Dez 2004
OnClick hat einen Parameter "Sender", der gleich der Komponente ist, die geklickt wurde (bzw. von welcher die Aktion ausgeht). :)=
mfG
mirage228