Thema: Delphi Datenbank Abfragen

Einzelnen Beitrag anzeigen

Gehstock

Registriert seit: 28. Jan 2006
Ort: Görlitz / Sachsen
489 Beiträge
 
Delphi 2007 Professional
 
#1

Datenbank Abfragen

  Alt 9. Mai 2007, 17:55
Datenbank: ADO • Zugriff über: ADO
Delphi-Quellcode:
procedure TFormMain.Open;
begin
        while ADOQuery1.Active do
                ADOQuery1.Close;
        ADOQuery1.SQL.Text := 'select * from TAC8';
        ADOQuery1.Open;
        While Not ADOQuery1.Eof do begin
// ADOQuery1.FindField('Feld1'):=inttostr(Taco);
               ADOQuery1.Locate('Feld1',inttostr(taco),[LoPartialKey]);// zeigt immer den letzten Datensatz
                hst:= ADOQuery1.FieldValues['Feld2'];
                modell:=ADOQuery1.FieldValues['Feld3'];
                zula:=ADOQuery1.FieldValues['Feld4'];
                land:=ADOQuery1.FieldValues['Feld5'];
                ADOQuery1.Next;
        end;
        memo1.Lines.add('Manufacturer :'+hst);
        memo1.Lines.add('Model :'+modell);
        memo1.Lines.add('Reg. :'+zula);
        memo1.Lines.add('Country :'+land);
end;
ich versuch damit zum beispiel Im Feld1 nach taco zu suchen gefunden wird aber ein feld mit anderen Inhalt Warum
Marcel
  Mit Zitat antworten Zitat