![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Drag&Drop [D7, WinXP]
Torin © (2004-04-18 15:56:00)Может кто знает как реализовать Drag&Drop файлов из моего приложения в explover (лучше на примере)?
Torin (2004-04-19 21:09:00) [1]Хотя от таких "ошибок" у меня одно место разболелось :-). Если кто будет юзать то чтобы несколько файлов всё же копировались за раз стоит изменить:
c := PChar (DropFiles);
c := c + DropFiles.pFiles;
for i := 0 to Self.Files.Count-1 do
begin
StrCopy (c, PChar (Self.Files[i]));
c := c + Length (Self.Files[i]);
end;
на:
c := PChar (DropFiles);
c := c + DropFiles.pFiles;
for i := 0 to Self.Files.Count-1 do
begin
StrCopy (c, PChar (Self.Files[i]));
c := c + Length (Self.Files[i]) + 1;
end;
ну а остальное действительно по мелочи.
Torin (2004-04-19 19:39:00) [2]Большое спасибо!
DVM (2004-04-18 17:52:00) [3]http://podgoretsky.com/ftp/Docs/Delphi/D3/D3ProgLib/ch_04.htm#1
там в коде правда есть ошибки, незначительные.