Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Datenbanken (https://www.delphipraxis.net/15-datenbanken/)
-   -   Delphi auf Daten der ADOQuery zugreifen (https://www.delphipraxis.net/6790-auf-daten-der-adoquery-zugreifen.html)

jschade 22. Jul 2003 14:55


auf Daten der ADOQuery zugreifen
 
hi leute,

kennt jemand vielleicht ne elegantere möglichkeit, um auf die daten einer abfrage zuzugreifen, als:

Code:
  with ADOQuery1 do
  begin
    Open;
    while not EOF do
    begin
      e := ADOQuery1['Datum'];

      ...

    end;
    Next;
  end;
will ein paar sachen berechnen und müsste dazu auf die einzelnen daten zugreifen. so funktionierts zwar auch, aber is halt nich schön...

Sharky 22. Jul 2003 15:21

Re: auf Daten der ADOQuery zugreifen
 
Was ist denn da nicht so schön?

Ich greife immer so auf die Felder einer Tabelle zu.

Code:
Query.FieldByName ('wert').AsInteger;
Query.FieldByName ('wert').AsString;
Query.FieldByName ('wert').AsFloag;
Query.FieldByName ('wert').AsBoolean;
Was genau möchtest Du denn berechnen?

bundy 22. Jul 2003 18:18

Re: auf Daten der ADOQuery zugreifen
 
Hallo

Wenn du den SQL Text im Query eingibst z.B 'select * from testdatenbank'
nach dem du den query activiert hast drücke die rechte Maustase am Query und wähle den Fields Editor.

dann gehst du auf ADD all fields.

Jezt kannst du die felder so abrufen.

:coder: Source: :coder:

edit1.text:= Query1Vorname.asStgring;

Ich hoffe gedient zu haben ....

mfg
Bundy

jschade 23. Jul 2003 11:40

Re: auf Daten der ADOQuery zugreifen
 
@ bundy

Zitat:

Zitat von bundy
Jezt kannst du die felder so abrufen.

edit1.text:= Query1Vorname.asStgring;

... und wie sieht es aus, wenn ich in dem feld eine liste von einträgen habe, z.b. weil in der query mehrere vornamen abgerufen werden? mit deinem vorschlag zeigt er mir ja nur den ersten wert an...

r_kerber 23. Jul 2003 12:39

Re: auf Daten der ADOQuery zugreifen
 
In etwa so:
Delphi-Quellcode:
ADOQuery1.First;
while (not ADOQuery1.EOF) do
begin
  .
  i := ADOQuery1.FieldByName ('wert').AsInteger
  ADOQuery1.Next;
end;

jschade 23. Jul 2003 13:38

Re: auf Daten der ADOQuery zugreifen
 
Zitat:

Zitat von r_kerber
In etwa so:
Delphi-Quellcode:
ADOQuery1.First;
while (not ADOQuery1.EOF) do
begin
  .
  i := ADOQuery1.FieldByName ('wert').AsInteger
  ADOQuery1.Next;
end;

so gefällt's !!! :D

danke

bundy 23. Jul 2003 15:54

Re: auf Daten der ADOQuery zugreifen
 
[delphi]
Query1.first;
for i:= 1 to Query.Recordcount do
begin
Memo1.Lines.Add(query1Vorname.AsString);
Query1.next
end;

r_kerber 23. Jul 2003 18:26

Re: auf Daten der ADOQuery zugreifen
 
Zitat:

Zitat von bundy
for i:= 1 to Query.Recordcount do

RecordCount funktioniert teilweise bei SQL-Datenbanken nicht korrekt. Deswegen frage ich grundsätzlich EOF der Datenmenge ab!


Alle Zeitangaben in WEZ +1. Es ist jetzt 07:15 Uhr.

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz