Вниз
Скачать: CL | DM;

Название, класа по идентификатору   Найти похожие ветки 

← →
vitalmoya   (2003-12-01 23:03) [0]

Доброго времени суток мастера. Подскажите пожалуйста как по идентификатору окна узнать его название и класс. Спасибо


← →
LWait ©   (2003-12-02 00:23) [1]

узнать класс можно функцией
GetClassName(HWND, PChar(Buffer), SizeOf(Buffer));
узнать заголовок окна можно функцией
GetWindowText(HWND, PChar(Buffer), SizeOf(Buffer));
других названий у окон не придумали


← →
vitalmoya   (2003-12-02 09:33) [2]

А мацюпесеченький примерчишек можно.................


← →
Anatoly Podgoretsky ©   (2003-12-02 09:38) [3]

А выше по твоему, что находится?


← →
vitalmoya   (2003-12-02 09:47) [4]

это вроде только описание функций


← →
Polevi ©   (2003-12-02 10:38) [5]

ты прототип от вызова не можешь отлицить


← →
Xtz ©   (2003-12-03 00:12) [6]

В кладовке юнит ExApi смори

ExGetText(Handle: Thandle): String;
ExGetClass(Handle: Thandle): string;

а вот их описание :


Function<b/> ExGetClass(Handle:Thandle):string ;
begin<b/>
SetLength(Result,100+1);{Set Length for string > pchar Item }
GetClassName(Handle, PChar(Result), length(Result));
end;<b/>

Function<b/> ExGetText(Handle:Thandle):String<b/>;
begin<b/>
SetLength(Result, SendMessage(Handle, WM_GETTEXTLENGTH, 0, 0)+1);
SendMessage(Handle, WM_GETTEXT, length(Result), Integer(PChar(Result)));
SetLength(Result, lStrLen(PChar(Result)));
end;<b/>


← →
Xtz ©   (2003-12-03 00:16) [7]

Упс со скриптами не то замутил вот исправил юзай:

<b/>Function ExGetClass(Handle:Thandle):<b/>string;
<b/>begin
SetLength(Result,100+1);{Set Length for string > pchar Item }
GetClassName(Handle, PChar(Result), length(Result));
<b/>end;

<b/>Function ExGetText(Handle:Thandle):<b/>String;
<b/>begin
SetLength(Result, SendMessage(Handle, WM_GETTEXTLENGTH, 0, 0)+1);
SendMessage(Handle, WM_GETTEXT, length(Result), Integer(PChar(Result)));
SetLength(Result, lStrLen(PChar(Result)));
<b/>end;



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

Скачать: CL | DM;



Память: 0.46 MB
Время: 0.018 c
14-16636
RealRascal
2004-01-14 17:18
2004.02.06
Надпись на батоне в несколько строк


3-16180
mtb
2004-01-13 12:40
2004.02.06
Проблема Запись файла > 1 Mб в поле Blob (база MS SQL)


1-16483
Alexei Sviridov
2004-01-27 14:21
2004.02.06
RxLoginDialog


1-16436
Kolega
2004-01-28 11:11
2004.02.06
Работа со строками


3-16156
innok
2004-01-14 16:12
2004.02.06
печать отчета




   Наверх