sequentielle Datenbanksuche

[markus lemcke]

Ich habe in einer Tabelle ne Spalte Name und ne Spalte Haustier.
Wenn eine Name mehrere Haustiere hat, steht er in mehreren
Datensätzen drin.
Ich möchte ne Suchfunktion schreiben in der ich die Tabelle
Datensatz für Datensatz durchgehe und schaue ob ein Name
bestimmte Haustiere hat.
wie baue ich die Überprüfung ein, ob es schon eine neuer Name ist oder der alte?

Gruß

Markus

[Falk Prüfer]

Hallo Markus,

zuerst stellt sich mir die Frage, warum du diese Suche sequentiell machen willst? Wenn es nicht gerade um nur 10 DS geht halte ich das für ausgesprochen ineffizient. Im Extremfall durchkämmst du (auf der Clientseite) die gesamte Tabelle um NICHTS zu finden. Warum nicht eine Query?

Ansonsten solltest du deine Tabelle nach Name sortieren und dann in etwa so vorgehen:
CurName := '';
while not tab1.EOF do
begin
if CurName <> tab1.name.asString then
begin
(* Neuer Name *)
...
Aktionen für neuen Namen
...
CurName := tab1.name.asString;
end
else begin
(* kein neuer Name *)
end;
tab1.Next;
end;

Gruß Fal