delphi - DelphiでWinAPIを使用して名前でコンボボックス項目のインデックスを見つける方法は?

Question

別の Delphi アプリケーション B のコンボ ボックスで特定の項目を選択する必要がある Delphi アプリケーション A があります。

A は、選択するコンボ ボックス項目のテキストを知っています。

コンボ ボックス項目を選択するために、アプリケーション A はコンボ ボックス内の項目のインデックスを知る必要があります。

テキストしか知らないコンボ ボックス項目のインデックスを知るにはどうすればよいですか?

Answer 1

procedure TForm1.Button1Click(Sender: TObject);
var
  SItem: string;
begin
  SItem := 'Beta';
  Caption := IntToStr(SendMessage(ComboBox1.Handle, CB_FINDSTRINGEXACT,
    -1, LPARAM(PChar(SItem))));
end;

( uses CommCtrl)。