delphi - 如何在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)。