Externe Editbox mit Programm befüllen

[WizoHulk]

Habe mir eben mal nen kleines Testprogramm geschrieben, und da hat es Funktioniert einmal für den AuslöserSendMessage(19055,WM_SetText,0,integer(PChar(edit1.Text))); und einmal die Function

Delphi-Quellcode:

var
    LWnd: HWND;    // Windows API, Erfordern ein Fenster Handle

  begin
    SetLastError(0);
    LWnd :=  FindWindow(#32770, 'InputSearchDlg');
    LWnd :=  GetDlgItem(LWnd, AControlId);
    
  if LWnd <> 0 then
    begin
   if not SetWindowTextW(LWnd, PWideChar(WideString(AText))) then
      ShowMessage(SysErrorMessage(GetLastError));
    end else
    begin
      ShowMessage('Handle nicht gefunden');
      windows.beep(400,100);
      messagebeep(MB_ICONERROR );
    end;

aber bei dem anderen nicht.obwohl es fast der gleiche Code ist.

kann es vileicht sein, das windows es abblockt, auf der höchsten Priorität steht.
das Programm ist im Autostart und mann kommt ganz schlecht auf den Desktop, da es Permanent immer in den Vordergrund gestellt wird.