Einzelnen Beitrag anzeigen

Benutzerbild von ConnorMcLeod
ConnorMcLeod

Registriert seit: 13. Okt 2010
Ort: Bayern
490 Beiträge
 
Delphi 10.4 Sydney
 
#2

AW: VCL TreeView / BeginDrag / DragMode=dmManual

  Alt 29. Apr 2023, 07:53
Funktioniert bei mir auf diese Weise:
Delphi-Quellcode:
procedure TMainForm.Edit1MouseDown(Sender: TObject; Button: TMouseButton; Shift: TShiftState; X, Y: Integer);
begin
  Edit1.BeginDrag(False, 5);
end;
Nr.1 Delphi-Tool: [F7]
  Mit Zitat antworten Zitat