Взаимодействие с чужой формой класса QWidget

[denbox]

Здравствуйте! Вообщем проблема такая... Я взаимодействую с чужим приложением, где все компоненты класса QWidget. Все хендлы определяются нормально, но не присваивается текст в TEdit. Подскажите может здесь другую команду использовать, а не WM_SETTEXT?

procedure TForm1.Button1Click(Sender: TObject);
var
  Hnd,HndControl  :HWnd;
  StrClass :PChar;
  StrBase  :string;
begin
 Hnd:= FindWindow(nil, 'ÄðóãÂîÊðóã - âõîä');
  if Hnd <> 0 then begin
    windows.SetForegroundWindow(Hnd);
    Button1.Caption:= IntToStr(hnd);
    sleep(2000);
    HndControl:=FindWindowEx(Hnd, 0, 0, 'groupBox');
    Button1.Caption:= IntToStr(HndControl);
    sleep(2000);
    HndControl:=FindWindowEx(HndControl, 0, 0, 'lineEdit');
    Button1.Caption:= IntToStr(HndControl);
    StrBase:='777777777';
    SendMessage(HndControl, wm_settext, WPARAM(0),lparam(pchar(StrBase)));
    end;
end;

[denbox]

что никто не знает?

[Человек_Борща]

Установить фокус на элемент и ввести текст при помощи SendMessage.
Изъян здесь: Нужно чтобы окно программы было на виду.

[denbox]

Сообщение от Человек_Борща

Установить фокус на элемент и ввести текст при помощи SendMessage.
Изъян здесь: Нужно чтобы окно программы было на виду.

я же ставлю фокус windows.SetForegroundWindow(Hnd);

[Человек_Борща]

это фокус окна. А нужно ставить фокус на элемент. В MSDN смотрите нужные функции.

[denbox]

Сообщение от Человек_Борща

это фокус окна. А нужно ставить фокус на элемент. В MSDN смотрите нужные функции.

Попробовал, все равно эффекта 0

[denbox]

Сообщение от Человек_Борща

это фокус окна. А нужно ставить фокус на элемент. В MSDN смотрите нужные функции.

Можете более подробней написать, какая именно функция?