Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Виснет GetWindowsText... [D3, Win95/98]


Cosmic ©   (2002-11-21 21:27:00) 

ФАКТ! Под 95 Виндовозом компилированый экзешник вываливается на функции GetWindowText... Причем в Delphi IDE всё чудесно работает, а вот отдельно - никак. Если кто знает - объясните, плиз...

И ещё. Может, можно как-то по-другому получить заголовок окна? Примеры приветствуются :)


MBo   (2002-11-22 00:33:00) [1]

>ОНО пишет о несовместимости типов
А где ты указал, какой у тебя тип Buf???

procedure TForm1.Button1Click(Sender: TObject);
var h:thandle;
buf:array[0..200] of char;
begin
h:=findwindow("Notepad",nil);
if h<>0 then
SendMessage(h,wm_gettext,200,Integer(@buf));
Caption:=buf;
end;


Almaz   (2002-11-22 00:26:00) [2]


> Cosmic © (22.11.02 00:06)
> Да знаю я... Мне бы примерчик...


var
Buffer: array [0..255] of Char;
...
SendMessage(Handle, WM_GETTEXT, SizeOf(Buffer), Integer(@Buffer));
ShowMessage(Buffer);


Удачи.


Cosmic   (2002-11-22 00:06:00) [3]

Да знаю я... Мне бы примерчик...
Я пробовал: SendMessage(HD,WM_GETTEXT,255,Buf);
ОНО пишет о несовместимости типов
Пробовал так: SendMessage(HD,WM_GETTEXT,255,Integer(Buf));
Ничего не возвращает

Что делать?


Song   (2002-11-21 21:36:00) [4]

WM_GETTEXT


Наверх

Титульная страница Поиск, карта сайта Написать письмо