Главная страница
    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
2-1146665472
@gent
2006-05-03 18:11
2006.05.21
Как из edit вытащить дробное число ?


9-1130006562
RooGa
2005-10-22 22:42
2006.05.21
Помогите с Дир.Х приложением.


15-1145774934
Mozart
2006-04-23 10:48
2006.05.21
CreateOleObject


2-1146907050
D@Nger
2006-05-06 13:17
2006.05.21
RxLib и Delphi 7


15-1145861204
DelphiN!
2006-04-24 10:46
2006.05.21
Отключить контексное меню в TWebBrowser-e





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
Английский Французский Немецкий Итальянский Португальский Русский Испанский