![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
Drag&Drop из Edit [D6, WinXP]
Maloric © (2006-03-02 11:02:00)Добрый день! Как можно сделать Drag&Drop из TEdit своей программы в компонент другой прогаммы. Видел сабж в некоторых программах, хочу использовать в своей.
Заранее Спасибо.
Maloric (2006-03-02 16:43:00) [1]Попробовал сделать вот так:
procedure TForm1.Edit1MouseMove(Sender: TObject; Shift: TShiftState; X,
Y: Integer);
var hwnd1: HWND;
P:TPoint;
begin
{...}
P.X:=X; P.Y:=Y;
hwnd1:=WindowFromPoint(P);
SetWindowText(hwnd1,Pchar(Edit1.Text));
end;
Получаеться только не всегда, есть у кого нибудь мысли по этому поводу?
И как очистить Edit с помощью SendMessage
Maloric (2006-03-02 13:02:00) [2]Жаль, опыта действительно маловато.
Drag'n'Drop Component Suite посмотрим.
Спасибо.
MBo (2006-03-02 12:35:00) [3]Для этого нужно реализовать интерфейсы IIDropSource и IDataObject.
Задача не слишком простая, если нет опыта в COM-технологиях.
Есть библиотека Drag'n'Drop Component Suite, автор Anders Melander
Сергей М. (2006-03-02 11:11:00) [4]
> в компонент другой прогаммы
Почему ты столь уверен, что "другая программа" знает про какие-то там "компоненты" ? А может она, "другая программа", слыхом не слыхивала ни про какие "компоненты" ?