Назначение


Событие срабатывает при попытке перетащить файл из проводника на компонент, для которого данное событие было создано.




Описание


Событие позволяет получить имена файлов, которые были перетащены пользователем на компонент.



Пример


procedure Form1_Memo1_OnDropFiles (Sender: TObject; ArrayOfFiles: array of string; X, Y: Integer);
var
    i, c: integer;
begin
    c := Length(ArrayOfFiles)-1;
    for i := 0 to c do
    begin
        Form1.Memo1.Lines.Add(ArrayOfFiles[i]);
    end;
end;