on form drag and drop file option

[Packs]

On form there is drag and drop option it is working properly .

I have one form where on top of form lot of panel and memo component.

it is not working because form event can not raised .

how to achieve this 

[cdbc]

Hi
Forward the event to the components in question...
Regards Benny

[Packs]

Code: Pascal  [Select][+][-]

1. procedure Tfrminward.FormDropFiles(Sender: TObject; const FileNames: array of string);
2. begin
3.   if Length(FileNames) > 1 then
4.   begin
5.     ShowMessage('Select one file');
6.     Exit;
7.   end;
8.  
9.   Opendlg_inward.FileName := FileNames[0];
10. end;
11.  

form FormDropFiles event should run.

it is get protected if you have panel or other components in form.

[cdbc]

Hi
If your whole form is covered with components, I've found it easiest to just let the /drop/ event-handlers of said components, just point to the same one - namely the one you have for the form...
Regards Benny

[Packs]

in that case I have to write event for all component .

it should be simple user will drag and drop any where , my form dragfile event should trigger .

[cdbc]

Hi
No, just point all the components' handlers to the one you have written for the form, they have the same signature. You can do that in the Object Inspector.
Regards Benny

[Packs]

all component is having different signature .

on formdrag event accept file other all accepting x,y position or string

[cdbc]

...Then Google is your friend  ...I guess.

eta: At least you need someone more knowledgeable than me, regarding the intricacies of the LCL.

[Packs]

Ok Sir 👍