Einzelnen Beitrag anzeigen

DieDolly

Registriert seit: 22. Jun 2018
1.913 Beiträge
 
#6

AW: Procedure während gedrückthalten eines Buttons

  Alt 8. Mai 2020, 13:45
Nicht auf True und False vergleichen
Und wenn dann vereinfachen

Delphi-Quellcode:
procedure TF_TagNacht.Bt_BlitzMouseDown(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
 Im_Wolke1.Picture.LoadFromFile('Regen.ico');
end;

procedure TF_TagNacht.Bt_BlitzMouseUp(Sender: TObject; Button: TMouseButton;
  Shift: TShiftState; X, Y: Integer);
begin
 Im_Wolke1.Picture.LoadFromFile('Wolke.ico');
end;
Zitat:
Wir waren davon ausgegangen dass diese Ereignisse nur für bewegungen mit der Maus sind.
Dafür gibt es MouseMove.
  Mit Zitat antworten Zitat