Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2006.05.21;
Скачать: CL | DM;

Вниз

Drag&Drop из Edit   Найти похожие ветки 

 
Maloric   (2006-03-02 11:02) [0]

Добрый день! Как можно сделать Drag&Drop из TEdit своей программы в компонент другой прогаммы. Видел сабж в некоторых программах, хочу использовать в своей.
Заранее Спасибо.


 
Сергей М. ©   (2006-03-02 11:11) [1]


> в компонент другой прогаммы


Почему ты столь уверен, что "другая программа" знает про какие-то там "компоненты" ? А может она, "другая программа", слыхом не слыхивала ни про какие "компоненты" ?


 
MBo ©   (2006-03-02 12:35) [2]

Для этого нужно реализовать интерфейсы IIDropSource и IDataObject.
Задача не слишком простая, если нет опыта в COM-технологиях.
Есть библиотека Drag"n"Drop Component Suite, автор Anders Melander


 
Maloric   (2006-03-02 13:02) [3]

Жаль, опыта действительно маловато.
Drag"n"Drop Component Suite посмотрим.
Спасибо.


 
Maloric   (2006-03-02 16:43) [4]

Попробовал сделать вот так:

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



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

Текущий архив: 2006.05.21;
Скачать: CL | DM;

Наверх




Память: 0.47 MB
Время: 0.065 c
9-1129046372
Kerk
2005-10-11 19:59
2006.05.21
[GDI] Полупрозрачная надпись


15-1145556097
Катерина
2006-04-20 22:01
2006.05.21
Очченно отвлеченная тема: Фото в Аське


2-1146291338
Rubey
2006-04-29 10:15
2006.05.21
Составное имя


3-1143616561
sanich
2006-03-29 11:16
2006.05.21
Ошибка: Size of optimizer block exceeded


3-1143454831
scorpio
2006-03-27 14:20
2006.05.21
Создание курсора