bestimmtes element eines arrays nach einem wert durchsuchen

[prinz_inzide]

hi all!

ich bräuchte ne funktion die folgendes macht (ist jetzt halb pseudocode^^):

Delphi-Quellcode:

function searcharray(array1:tarray;element1:telement;value1:string):integer;
var
  i:integer;
  found:boolean;
begin
  found:=false;
  for i:=0 to length(array1)-1 do begin
    if (array1.element1[i]=value1) then begin
      found:=true;
      result:=i;
      break;
    end;
  end;
  if (found=false) then
    result:=-1;
end;

gibts sowas schon oder, is es überhaupt machbar??

danke!
tim