Registriert seit: 17. Jul 2003
Ort: Aachen
350 Beiträge
Delphi 7 Enterprise
|
Re: In einem ARRAY nach einem STRING suchen
11. Jan 2004, 23:03
Ich würde das Array durch eine Schleife mit Abbruchbedingung durchsuchen lassen. Das spart bei großen Arrays sicherlich Zeit.
Delphi-Quellcode:
function stringsuche (gesuchter_string: string; array_groesse: longint): longint {Die Function gibt den Index der Funstelle zurück}
var i: longint; //Deine Laufvariable
begin
i:= 1;
Result := 0;
while (i <= array_size) and (Result = 0) do
begin
if Array[i] = gesuchter_string
then Result := i;
inc(i)
end;
end;
MfG
Christian
Es gibt nur 10 Typen von Menschen auf der Welt:
Die, die Binärcode verstehen und die, die es nicht tun . . .
|