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

Вниз

Как можно получить текст с поля Edit другой программы   Найти похожие ветки 

 
Veter   (2005-12-05 06:52) [0]

Я пытался вот так:
var
wnd :Hwnd;
Nm: Array[0..255] of Char;
begin
Sendmessage(wnd,wm_gettext,wparam(90),lparam(strpas(nm)));
edit1.text:=String(nm);
end;

в чём может быть ошибка?


 
Leonid Troyanovsky ©   (2005-12-05 08:40) [1]


> Veter   (05.12.05 06:52)  

> Sendmessage(wnd,wm_gettext,wparam(90),lparam(strpas(nm)));


Для начала, д.б. LParam(@nm), а не string.
Во-вторых, возможно, Edit wnd определен неверно.
В-третьих, возможно, что это вовсе не EDIT.

--
Regards, LVT.


 
Veter   (2005-12-05 09:27) [2]

а как сделать чтобы он длину текста сам определял?


 
begin...end ©   (2005-12-05 09:28) [3]

> Veter   (05.12.05 09:27) [2]

Переформулируйте вопрос.


 
Veter   (2005-12-05 09:33) [4]

> Переформулируйте вопрос.

ну чтобы wparam сам определил


 
begin...end ©   (2005-12-05 09:37) [5]

> Veter   (05.12.05 09:33) [4]

WM_GETTEXTLENGTH послать?


 
Veter   (2005-12-05 09:41) [6]

> Leonid Troyanovsky ©   (05.12.05 08:40) [1]
Всё спасибо!! Очень даже помог!!



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

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

Наверх




Память: 0.45 MB
Время: 0.014 c
14-1132836140
syte_ser78
2005-11-24 15:42
2005.12.18
существуюттли форумы для локальной сети?


8-1112926472
Deedlit
2005-04-08 06:14
2005.12.18
ImageList => SpeedButton


4-1129888703
ZZZ
2005-10-21 13:58
2005.12.18
Программное изменение раскладки клавиатуры.


14-1132939236
EXEcuTTeR
2005-11-25 20:20
2005.12.18
plug-in для WinAMP


1-1132648092
romas_first
2005-11-22 11:28
2005.12.18
пустая строка в TDateTimePicker





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