Drop files event

From Lazarus wiki
Revision as of 16:20, 25 June 2007 by Tombo (talk | contribs) (Files drop event moved to Drop files event: changed event name)
Jump to navigationJump to search

The drop files event will be invoked when the user drops one or multiple dragged files on one of application's forms.

First this event should be fired for target form (or main form if drop target is unknown), then for the application.

Possible implementation for LCL

TDropFilesEvent = procedure (Sender: TObject; const FileNames: Array of String) of Object;

Add OnDropFiles: TDropFilesEvent to TCustomForm, TApplication and TApplicationProperties.

Possible implementation per widgetsets

The widgetsets should call method IntfDropFiles of target form (or main form if drop target is unknown) and the application.

Win32/64

  • set DragAcceptFiles for every form
  • respond to WM_DROPFILES message

GTK1/2

Qt

Carbon

  • respond to kAECoreSuite/kAEOpenDocuments event to open application associated files
  • respond to kAECoreSuite/kAEOpenContents event, where content format is typeFSRef

Related bug reports

TODO

  1. implement for widgetsets
  2. documentation
  3. Lazarus should open dropped files