SQL-Anfrage aus anderer Tabelle bilden

[ibp]

... wie wäre es damit um doppelte zu filtern...

Delphi-Quellcode:

procedure ....

var a: array of integer;
    i,j,anz: integer;

begin
  while not DModFakturierung.Q_FFAKTRELA.Eof do
  begin
    i:=StrToInt(DModFakturierung.Q_FFAKTRELARelation1.Value);
    anz:=length(a); // anzahl der element
    if i>=anz then
    begin
      setlength(a,i+1); // anzahl vergrößern
      for j:=anz to i do
        a[j]:=0; // intialisieren
    end; // if
    inc(a[i]); // diese zahl zufügen
    DModFakturierung.Q_FFAKTRELA.Next;
  end; // while

  for i:=0 to length(a)-1 do
    if a[i]=1 then showmessage(inttostr(i)+' ist nur einmal vorhanden');
end;

[edit] falls 0 auch vorhanden ist, dann intialisiere und frage ab auf -1[/edit]