Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "WinAPI";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Вниз

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 вся ветка

Форум: "WinAPI";
Текущий архив: 2006.05.21;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.45 MB
Время: 0.013 c
15-1145641126
Системщик
2006-04-21 21:38
2006.05.21
Счетчик символов


2-1147016485
AlexanderMS
2006-05-07 19:41
2006.05.21
Проблема с фокусом


3-1143459966
Filingo
2006-03-27 15:46
2006.05.21
Сохранение результата Tquery


2-1145970590
nyron
2006-04-25 17:09
2006.05.21
сумма прописью


2-1146420911
MVP
2006-04-30 22:15
2006.05.21
Как сделать цикл по Edit





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский