отослать значение в комбо-бокс

[HellMercenariess]

Возможно ли отослать(установить) значение в ComboBox чужой программы?

найти нужный контрол я умею:

function EnumClasses(HWND:hWnd;lParam:Integer):BOOL;stdcall;
 var
  buff: ARRAY [0..127] OF Char;
   s:string;
begin
    SetLength(s,256);
    SetLength(s,GetClassName(HWND,PChar(@s[1]),256));
        form1.listBox1.items.Add(s);
     GetWindowText(HWND, buff, sizeof(buff));
    form1.listBox1.items.Add(StrPas(buff));
    Result:=true;
end;

текст я имею представление как отсылать

 Result := Succeeded(SendMessage(Wnd, WM_SETTEXT, 0, Integer(PChar('1111'))));

недавние темы с получением инфы из чужих контроллов.
http://programmersforum.ru/showthread.php?t=183036
http://programmersforum.ru/showthread.php?t=207426

[Silver_S]

Из исходников VCL:

procedure TCustomCombo.SetItemIndex(const Value: Integer);
begin
  if csLoading in ComponentState then
    FItemIndex := Value
  else
    if GetItemIndex <> Value then
      SendMessage(Handle, CB_SETCURSEL, Value, 0);  <<<<<<<<
end;

PS Как можно догадаться, для других манипуляций с ComboBox используются сообщения, также начинающиеся на CB_*

[HellMercenariess]

Сообщение от Silver_S

Из исходников VCL:

PS Как можно догадаться, для других манипуляций с ComboBox используются сообщения, также начинающиеся на CB_*

В этой теме ключевое слово "чужой", поэтому как вы подали пример так работать не будет.
Но вот я кое-что нарыл:

 
cbId := GetDlgCtrlId(cbHandle);
SendMessage(cbHandle, CB_SETCURSEL, 2, 0);
SendMessage(MainWndHandle, WM_COMMAND, MakeWParam(cbId, CBN_SELCHANGE), cbHandle);

Автор - Nyctos Kasignete

По поводу ComboBox. Чтобы выполнялись действия, которые происходят при смене элемента, нужно уведомить об этом изменении само родительское окно, в котором расположен ComboBox.
cbId — идентификатор ComboBox'а. Нужен для отправки сообщения WM_COMMAND родительскому окну.
cbHandle — дескриптор окна ComboBox'а.
MainWndHandle — дескриптор родительского окна, в котором находится ComboBox.

Так работает.