Einzelnen Beitrag anzeigen

SpockHH

Registriert seit: 18. Apr 2019
Ort: Hamburg
4 Beiträge
 
Delphi 10.4 Sydney
 
#1

Seltsames Drag&Drop Problem in Firemonkey seit Delphi 10.42

  Alt 1. Mai 2021, 13:33
Hallo,
ich habe in Delphi 10.42 ein seltsames Problem mit Drag&Drop.
Ich erstelle ein neues Projekt, platziere ein TDropTarget darauf und setze den Event Handler OnDragOver:

procedure TForm1.DropTarget1DragOver(Sender: TObject; const Data: TDragObject; const Point: TPointF; var Operation: TDragOperation);
begin
Operation := TDragOperation.Copy;
end;

In Delphi 10.42 erkennt er den Bereich des TDropTarget nicht korrekt, das DragOver Event wird nur in einem Teilbereich des TDropTargets ausgelöst, aber dafür auch außerhalb. Wenn sich das Formular der Anwendung links oben auf dem Desktop befindet, erkennt er es fast korrekt. Je weiter ich die Anwendung nach rechts unten verschiebe, desto mehr verschiebt sich der Bereich, in dem das Dragover Event ausgelöst wird.

Gilt übrigens auch für das DragOver anderer Komponenten.

Die gleiche Anwendung läuft unter Delphi 10.32 völlig einwandfrei.

Hat jemand eine Idee?

Vielen Dank und schönes Wochenende!
Arnd
  Mit Zitat antworten Zitat