Zitat von
mkinzler:
Ich nehme an die beiden Buttons heißen Label1(?) und sbColor:
Delphi-Quellcode:
procedure TFormUserTune.Label1Click(Sender: TObject);
begin
If sender.Name = 'Label1' then sbColorGridClick(Sender);
end;
procedure sbColorGridClick(Sender: TObject);
begin
If sender.Name = 'sbColor' then Label1Click(Sender);
end;
Wenn der Event direkt durch Klicken des Buttons ausgelöst wird, wird dann die Prozedur des anderen Button mitausgelöst. Dieser löst dann aber nicht mehr den ersten aus.
gut, und was gebe ich für sender.Name ein, also was muss unter Name stehen der schreibt mir undeclared identifier: 'Name'