Delphiでのポジションの検索方法

1. IndexOf関数を使用する方法: IndexOf関数は、配列やTListなどのコレクション内で指定した要素の位置を検索します。以下に例を示します。

var
  MyArray: array[0..4] of Integer = (10, 20, 30, 40, 50);
  Index: Integer;
begin
  Index := IndexOf(MyArray, 30); // 要素30の位置を検索
  if Index >= 0 then
    ShowMessage('要素30の位置: ' + IntToStr(Index))
  else
    ShowMessage('要素30が見つかりませんでした');
end;

2. forループを使用する方法: 配列やリストを順番にスキャンして、目的の要素を見つけることもできます。以下に例を示します。

var
  MyArray: array[0..4] of Integer = (10, 20, 30, 40, 50);
  Index: Integer;
begin
  Index := -1; // デフォルトの位置
  for i := 0 to Length(MyArray) - 1 do
  begin
    if MyArray[i] = 30 then // 目的の要素を見つけた場合
    begin
      Index := i;
      Break; // ループを終了
    end;
  end;
  if Index >= 0 then
    ShowMessage('要素30の位置: ' + IntToStr(Index))
  else
    ShowMessage('要素30が見つかりませんでした');
end;

これらの方法を使用すると、Delphiで配列やリスト内で要素の位置を見つけることができます。必要に応じて、上記のコード例をカスタマイズして使用してください。

以上が、Delphiでポジションの検索方法についてのシンプルで簡単な解説とコード例です。この情報は、Delphiプログラマーに役立つでしょう。