Скачать: CL | DM;

drag i drop | delphi i iexplorer   Найти похожие ветки 

← →
fufel ©   (2006-08-05 16:40) [0]

debrij denj.
u menja takaja zada4a stait, mne iz iexplorer nado pereta5itj na formu fotografiju tak, 4tobi na forme v edit1 otabrazilsja adres etoj samoj fotografie.
esli neznaete, nape6ite xotj v kakom napravlenie iskatj.

---

← →
MBo ©   (2006-08-05 17:14) [1]

реализовать интерфейсы IDropTarget  IDataObject
или найти в инете библиотеку Drag"n"Drop Component Suite
(Melander, Johnson)

---

← →
fufel ©   (2006-08-05 19:16) [2]

ja izvenjajusj siljno, no mozna kakojnebutj premer ili funkci xotjabi, a to uze denj is4u i nekak ne mogu najti :S

---

← →
DprYg ©   (2006-08-05 19:43) [3]

Чтобы форма стала приемником файлов нужно использовать процедуру модуля ShellAPI DragAcceptFiles. Также форма должна обрабатывать событие WM_DROPFILES. И в этом обработчике получить полные имена функцией DragQueryFile

---

← →
Ketmar ©   (2006-08-05 19:52) [4]

> esli neznaete, nape6ite xotj v kakom napravlenie iskatj

орешек.

---

← →
antonn ©   (2006-08-05 20:30) [5]

protected
    procedure CreateParams(var Params: TCreateParams); override;
private
    procedure WMDropFiles(var Message: TWMDropFiles);  message WM_DROPFILES;

procedure TF_PlayList.CreateParams(var Params: TCreateParams);
begin
inherited
CreateParams(Params);
Params.ExStyle := Params.ExStyle or WS_EX_ACCEPTFILES;
end;

procedure TF_PlayList.WMDropFiles(var Message: TWMDropFiles);
var aFile: array [0..255] of Char;
       FilesCount,N : Integer;
begin
     inherited;
FilesCount := DragQueryFile(Message.drop, $FFFFFFFF, nil, 0);
      begin
      for N := 0 to FilesCount - 1 do begin
       DragQueryFile(Message.drop, N, aFile, 256);
       aFile - вот путь и имя файла перетягиваемого
       end;
      end;
      DragFinish(Message.Drop);
end;

---

← →
easy ©   (2006-08-06 22:36) [6]

http://dfc.com.ru/?sid=2&id=11&itemid=39

---

← →
fufel ©   (2006-08-09 22:03) [7]

blogodorju vsex za pomo5j

---

← →
fufel ©   (2006-08-27 19:56) [8]

izvenite snova za bespokojstva no tut v kode "easy" ja na6ol neto4nostj,
kogda ja delaju pereme5aju fotku to mne on vidajut ne URL adres fotki a silku, toestj vidajot adres kuda perejdjot stranica esli ja na foto nazmu :S
kak mne ispravitj eto?

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.031 c