Окна

← →
Seamcat (2004-10-22 23:07) [0]

Уважаемые! Подскажите пожалста, как работать с функцией GetWindowText и что использовать в качестве ее параметров? Или подскажите, как получить заголовок окна (Handle известен)? Заранее спасибо...

← →
Nick Denry © (2004-10-22 23:54) [1]

А хелп не судьба посмотреть?

...
var
s,s_wr : array [0..MAX_PATH] of Char;
...
GetWindowText(WinAmpHandle,@s,MAX_PATH);

← →
GanibalLector © (2004-10-23 00:00) [2]

2 Nick Denry
!!! MAX_PATH = 260
Я бы поступил так : array [0..255] of Char;

← →
Nick Denry © (2004-10-23 00:15) [3]

2GanibalLector © (23.10.04 00:00) [2]

Не принципиально. Возможно вообще делать выделение памяти динамически.

← →
GanibalLector © (2004-10-23 00:19) [4]

> Возможно вообще делать выделение памяти динамически
т.е. через pchar?

← →
Nick Denry © (2004-10-23 00:24) [5]

GanibalLector © (23.10.04 00:19) [4]

Нет, как раз через именно PChar ИМХО не получится. Т.е. надо именно память использовать, всмысле GlobalLock и т.д.

← →
GuAV © (2004-10-23 00:57) [6]

Nick Denry © (23.10.04 0:24) [5]
???

Seamcat (22.10.04 23:07)
var L: Integer; S: string;
begin
L := GetWindowTextLength(wnd) + SizeOf(#0);
SetLength(S, L);
GetWindowText(wnd, PChar(S), L);
SetLength(S, StrLen(PChar(S)));

>Нет, как раз через именно PChar ИМХО не получится.
var s:pchar; begin GetWindowText(Form1.Handle,s,255); Caption:="Ops"+s;

GanibalLector © (23.10.04 1:00) [7]
Получится.

var s:pchar; L: Integer; begin L := GetWindowTextLength(Handle) + SizeOf(#0); GetMem(s, L); GetWindowText(Form1.Handle,s,255); Caption:="Ops"+s; FreeMem(s, L);

Все, простите мою оплошность :)

Окна Найти похожие ветки