Считать текст из панелей StatusBar чужой программы
Здравствуйте! Очень нужна помощь.
Как считать из чужого окна статус-бара (class name: msctls_statusbar32), 3-7 панели, на которую выводится информация.
--------------------
var
Wnd:HWND;
i,len:integer;
S:string;
buf:array [0..127] of char;
begin
wnd:= FindWindowEx(0, 0, 'Класс окна', nil);
wnd:= FindWindowEx(wnd, 0, 'msctls_statusbar32', nil);
len := SendMessage(Wnd, WM_GETTEXTLENGTH, 0, 0);
SetLength(S, Len+128);
SendMessage(Wnd, WM_GETTEXT, Len+128, Integer(@S[1]));
Edit1.Text:=s;
end;
---------------------
текст выводится, но только тот, который находится в 0-ой панели статус-бара. Как прочесть информацию с 3-7-ой панели статусбара?
Как считать из чужого окна статус-бара (class name: msctls_statusbar32), 3-7 панели, на которую выводится информация.
--------------------
var
Wnd:HWND;
i,len:integer;
S:string;
buf:array [0..127] of char;
begin
wnd:= FindWindowEx(0, 0, 'Класс окна', nil);
wnd:= FindWindowEx(wnd, 0, 'msctls_statusbar32', nil);
len := SendMessage(Wnd, WM_GETTEXTLENGTH, 0, 0);
SetLength(S, Len+128);
SendMessage(Wnd, WM_GETTEXT, Len+128, Integer(@S[1]));
Edit1.Text:=s;
end;
---------------------
текст выводится, но только тот, который находится в 0-ой панели статус-бара. Как прочесть информацию с 3-7-ой панели статусбара?
Читай на MSDN информацию о чтении/установке текста в n-ю панель StatusBar'а, и воздастся тебе
Цитата: @pixo $oft
Читай на MSDN информацию о чтении/установке текста в n-ю панель StatusBar'а, и воздастся тебе
Читал, но ничего не получается. Могу скопировать текст с нулевой ячейки, а с остальных никак.