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




Вниз

Помогите!!! Почему функция... 


Mastak   (2002-01-21 22:15) [0]

Помогите!!! Почему функция GetWindowText,
если ее применить к компоненту Edit (не TEdit)
не возвращает текст.

Буду весьма признателен...



•••[DEN]•••   (2002-01-21 23:12) [1]

>Mastak ©

Попробуй тады вот так:

i:= SendMessage(Edit, WM_GETTEXTLENGTH, 0, 0)+1;
GetMem(text, i);
SendMessage(edit,WM_GETTEXT,i,LongInt(text));

где
i:integer:
text:Pchar;
edit - хэндл твоего едита!

Удачи!




Evgeny   (2002-01-22 07:19) [2]

var
buf : array[Byte] of Byte;

// Читаем данные в Buf
1. GetWindowText(hwnd, @buf, SizeOf(Buf));

var
Buf : array[Byte] of Char;

// ID - идентификатор твоего Edit`a
2. SendDlgItemMessage(hwnd, ID, WM_GETTEXT, SizeOf(Buf), Longint(@Buf));

var
Buf : array[Byte] of Char;

// ID - идентификатор твоего Edit`a
3. SendMessage(GetDlgItem(hwnd, ID), WM_GETTEXT, SizeOf(Buf), Longint(@Buf));



Raptor   (2002-01-22 11:45) [3]

2Mastak
Потому что хелп читать надо. Цитирую
This function cannot retrieve the text of an edit control in another application
Юзай SendMessage(...,WN_GETTEXT,...)




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




Наверх





Память: 0.71 MB
Время: 0.067 c
1-66863           fishka                2002-03-04 10:51  2002.03.21  
Компонент ChartFX и цвета графиков


3-66766           AlValK                2002-02-21 10:04  2002.03.21  
Где найти TDBGrid с вертикальным расположением записей?


1-66857           PlaZZma               2002-03-05 12:22  2002.03.21  
Как ловить жмаканья клавиш?


3-66803           EN                    2002-02-23 01:42  2002.03.21  
Администрирование БД IB


3-66789           ray_wagner            2002-02-22 23:04  2002.03.21  
Как инсталлировать BDE если нет ISExpress?