Узнать, активна ли кнопка ?

[denis76560]

Здравствуйте, нужно контроллировать состояние кнопки в чужом приложении (enabled, disabled).
Для нажатия кнопки использую следующий код:

if FindWindow(nil, 'Form1') <>0 then begin 
w_handle:= FindWindow(nil, 'Form1'); //окно с именем ABC
b_handle:= FindWindowEx(w_handle, 0, nil, 'Кредиты'); {у него кнопка Open}
SendMessage(b_handle, wm_LButtondown, 0, 0);{посылаем кнопке события нажатия левой кнопки мыши}
SendMessage(b_handle, wm_LButtonUp, 0, 0);{и отпускание ее}

с ним проблем нет.
Зачем мне это нужно ? Единственный вариант проверить закончила ли программа работу - проверить состояние кнопки, т.к. никаких мессаджей и прочего прога не выдает, это остается единственным вариантом.
Можно конечно, еще узнать закончила ли программа задание по тексту в Label, но на просторах интернета только жесткие хардкорные предложения в том числе с применением OCR и других велосипедов и плясок с бубном, причем везде только рассуждения, готовых вариантов нет. OCR использовать не хочу, так как это не кошерно.
Всем откликнувшимся спасибо.

В хэлпе нашел TB_ISBUTTONENABLED , ноне знаю как применить и подойдет ли оно (судя по названию вроде оно и есть)

Пробовал так:

var 
w_handle:integer;
b_handle:integer;
begin 
if FindWindow(nil, 'Form1') <>0 then begin
w_handle:= FindWindow(nil, 'Form1'); //окно с именем ABC
b_handle:= FindWindowEx(w_handle, 0, nil, 'Кредиты'); {у него кнопка Open}
if SendMessage(b_handle,TB_ISBUTTONENABLED,0,0)=0 then ShowMessage('123');
end;
end;

Результат в обоих случаях одинаковый