如何使用Delphi中的WinAPI按名称查找组合框项的索引？

Question

我有一个Delphi应用程序A,它需要在另一个Delphi应用程序B的组合框中选择某个项目.

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).