On Click nicht ausführen

[Ultimator]

Oder so:

Delphi-Quellcode:

procedure TForm1.CheckValues(...);
begin
 if (bla) then 
  Panel1.OnClick := nil;
 else
  Panel1.OnClick := DeineOnClickProzedur;
end;

Einfach das OnClick auf nil setzen, wenns nicht gebraucht wird.