Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#6

Re: Klick auf Button mit enabled=false

  Alt 1. Jun 2010, 14:52
Zitat von eike42:
Da es in der Toolbar ist, geht sowas wie transparentes Control drüberlegen oder so natürlich auch nicht...
TPaintBox hätte sich gut gemacht, aber bei dem Ort des Buttons isses wirklich blöd.

OnMouseClick des übergeordneten Controls und prüfen ob auf den Button geklickt wurde

Delphi-Quellcode:
procedure TForm1.ToolBar1MouseDown(Sender: TObject;
  Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if PtInRect(Button1.BoundsRect, Point(X, Y))
      and not Button1.Enabled then
    ShowMessage('nee, is nich');
end;
@Mithrandir: wie kommst du nur darauf?
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat