Hallo...
Ich habe ein Problem und zwar:

Habe ich eine Datenbank, die mehrere Tabellen hat, und jetzt habe ich mir die Datenbank mit AdoConnection geöffnet, und eine Tabelle in einer ADOTable.

Jetzt besitzt die Tabelle die Felder RecordID, FieldID, FieldValue und Position.

Jetzt brauche ich den Wert aus FieldValue für eine bestimmte FieldID als String.

D.H ich muss irgendwie die ADOTable durchlaufen, und gucken, wo die FieldID z.B 602959 ist, und wenn es gefunden wurde, brauche ich den dazu gehörigen Wert aus FieldValue.

Leider habe ich keine Ahnung, wie ich dass am bessten hinbekommen soll.

Kann mir da vielleicht jemand helfen?

Schau mal in der Hilfe unter dem Stichwort "Filter" oder nutze direkt eine TADOQuery oder ein TADODataSet.

Das sollte dich weiterbringen - oder suche im Forum. Dazu gibt es echt genügend Hinweise.

Ich habe jetzt ein ADOQuery hinzugefügt und folgende SQL Anweisung

SELECT FieldValue FROM CWD_Text WHERE FieldID=602959;

Wie bekomme ich denn jetzt aus der ADOQuery die Rückgabe aus meiner Anweisung?

Das Problem ist jetzt, das ich nicht weiß, wie ich das ergebnis bekomme um zu sehen ob es richtig funzt, denn ich benutze kein Grid oder ähnliches zur anzeige, sondern brauche es einfach als string

markieren

Delphi-Quellcode:

if not MyADOQuery.EOF then
  MyADOQuery.FieldByName('FieldValue').AsString;

Leider ist der Wert leer, es müsste aber "gesetzlich" drin stehen.

Stimmt etwas mit der Anweisung nicht?

Hast du die Query geöffnet?

Schau mal deine Angaben noch mal an:

Datenbank: ADO, Zugriff über: ODBC

Das ist falsch und verwirrt. Der Zugriff erfolgt über ODBC auf ADO? Das ist völliger Quatsch.
Du greifst über ADO auf welche Datenbank zu? Doch hoffentlich nicht über eine ODBC-Quelle auf eine MS SQL-Server-Datenbank?

Query ist geöffnet.

mein Button Click event sieht erstmal so aus:

zusammenfalten · markieren

Delphi-Quellcode:

procedure TformImportEuL.Button1Click(Sender: TObject);
var s: String;
begin
 dmAdoImportEuL.ADOQuery.close;
 dmAdoImportEuL.ADOQuery.SQL.Text:='SELECT FieldValue FROM CWD_Text WHERE FieldID=602959;';
 dmAdoImportEuL.ADOQuery.Open;


 if not dmAdoImportEuL.ADOQuery.Eof then begin
 s:= dmAdoImportEuL.ADOQuery.FieldByName('FieldValue').AsString;
 showMessage(s);
 end;
end;