delphi中的动态数组

Question

我在delphi 7中创建了TLabel和TCombobox的打包对象（TMyComponent）。 我创建了一个TMyComponent的动态数组（MyArray）。现在点击添加按钮，我增加了MyArray的长度并创建TLabel和TCombobox的对象并显示在屏幕上。如果我添加了5个组件，我们如何获得Myaaray的当前所选组件意味着如果我从屏幕中选择第3个组件，那么我如何获得值3作为回报呢？谢谢你的帮助

Answer 1

我认为你正在寻找这样的功能：

function FindMyComponentIndex(
  Selected: TMyComponent; 
  const Components: array of TMyComponent
): Integer;
begin
  for Result := low(Components) to high(Components) do 
    if Components[Result]=Selected then
      exit;
  Result := -1;
end;

我相信如何调用此功能将是显而易见的。