Einzelnen Beitrag anzeigen

a.def
(Gast)

n/a Beiträge
 
#10

AW: Procedure bei Mausklick ausführen

  Alt 2. Apr 2017, 00:02
Na, ins OnMouseDown des Panzers.

Hat DeddyH aber schon ganz oben geschrieben ...
Delphi-Quellcode:
procedure TfrmTest.shpPanzerMouseDown( // <====== HIER
 Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  if Button = mbLeft then
    tmrSchuss.Enabled := true;
end;
  Mit Zitat antworten Zitat