мессадж бох - определить хендл

← →
Raptoridzevv (2006-05-24 17:07) [0]

у меня есть messagebox который выдала какаето программа, мне нужно определить что в нем написано не в каптионе а именно в мессадже.... делаю так определяеться тока каптион

procedure TForm1.Button1Click(Sender: TObject);
var
s:hwnd;
z:array [0..100] of char;
begin
s:=FindWindow(nil,"Warning");
SendMessage(s,WM_GETTEXT,100,LongInt(@z));
ShowMessage(z);
end;

← →
begin...end © (2006-05-24 17:18) [1]

> Raptoridzevv (24.05.06 17:07)

> s:=FindWindow(nil,"Warning");

s := FindWindowEx(FindWindow(nil, "Warning"), 0, "STATIC", nil);

← →
Raptoridzevv (2006-05-24 17:22) [2]

неа, не пашет(

← →
begin...end © (2006-05-24 17:24) [3]

Значит, это не системный MessageBox, а какой-нибудь MessageDlg или ShowMessage.

← →
Raptoridzevv (2006-05-24 17:30) [4]

его класс TMessageForm

← →
Сергей М. © (2006-05-24 17:46) [5]

> его класс TMessageForm

Его как раз и сотворяет дельфийская ShowMessage()

← →
Raptoridzevv (2006-05-24 17:51) [6]

как же мне быть?)

← →
Сергей М. © (2006-05-24 17:58) [7]

> Raptoridzevv (24.05.06 17:51) [6]

Смириться и выбросить затею из головы.

Или углубиться в теорию и практику внедрения своего кода в чужие процессы, перехват вызовов API-функций и т.д. и т.п.

← →
Raptoridzevv (2006-05-24 19:11) [8]

Удалено модератором

← →
ANB © (2006-05-24 20:05) [9]

> Raptoridzevv (24.05.06 19:11) [8]

Спаем посмотри, является ли окном текст на диалоге. Что то мне подсказывает, что не является, в таком случае ты можешь только снять скриншот с окна.

← →
begin...end © (2006-05-24 20:42) [10]

Нету там окна, конечно. Поэтому и [7].

> begin...end © (24.05.06 20:42) [10]

> Нету там окна, конечно. Поэтому и [7].

Если подгадать с версией дельфи, то можно и без перехвата.

--
Regards, LVT.

> в таком случае ты можешь только снять скриншот с окна.

А потом его ФайнРидером, ФайнРидером... :)))

Leonid Troyanovsky © (24.05.06 21:56) [11]
> Если подгадать с версией дельфи, то можно и без перехвата.

А через RTTI, наверное, и некоторый диапазон версий охватить удастся.

мессадж бох - определить хендл Найти похожие ветки