Wert aus SQL im TEdit anzeigen

Szebin · Hält's aus hier Beiträge: 7 Win XP Delphi 7

Hallo,

ich habe eine ADOConnection und eine ADOQuery mit dem Namen „Query_Bestand“ mit der SQL „SELECT Sum(Eingang-Ausgang) As SumBestand FROM MeineTabelle“. Nun möchte ich diesen Wert auslesen und in ein TEdit mit dem Namen „Bestand“ anzeigen lassen; leider gelingt es mir nicht.

Hier einige Versuche:

markieren

Delphi-Quelltext

1:
2:
3:
4:
5:

Bestand.Text := Query_Bestand.FieldValues['SumBestand'].AsString;
Bestand.Text := Query_Bestand.FieldByName('SumBestand').AsString;
//Bei diesen beiden Versuchen kommt die Meldung: Query_Bestand: Das Feld ‚SumBestand’ wurde nicht gefunden.
Bestand.Text := Query_Bestand.Fields[0].AsString;
//und hier die Meldung: Listindex überschreitet das Maximum (0)

Hat jemand eine Idee !!??
Danke im Voraus für jede Hilfe.

Schöne Grüße von der dänischen Grenze
Sabine

_________________
Wer viel fragt ist ein Plagegeist, wer nichts fragt ist ein unwissender Geist. Lieber ein Plagegeist als gar keinen !!

jasocul · Verfasst: Mi 18.01.06 12:09

Ist Query_Bestand denn auch "Active"?

Szebin · Hält's aus hier Beiträge: 7 Win XP Delphi 7

Hallo Peter,

jetzt hast Du mir schon zum zweiten Mal so schnell geholfen, was soll ich sagen. Danke, danke ... :roll:

Zeile 2 und 4 funktionieren einwandfrei.

Ich benutze jetzt folgenden

markieren

Delphi-Quelltext

1:
2:
3:

Query_Bestand.Active := True;
Bestand.Text := Query_Bestand.FieldByName('SumBestand').AsString;
Query_Bestand.Active := False;

Da ich ja noch ganz neu hier und auch mit Delphi bin, weiß ich noch nicht so recht, wie ich so manches bewerstelligen soll. Aber Dank Deiner Hilfe klappen nicht nur die Türen.
Ich habe bisher mit Access meine Anwendungen erstellt; doch leider kann man diese nicht als Exe-Datei erzeugen und ist damit so gebunden. Jetzt möchte ich ein wenig in Delphi ausprobieren.

Danke Sabine

_________________
Wer viel fragt ist ein Plagegeist, wer nichts fragt ist ein unwissender Geist. Lieber ein Plagegeist als gar keinen !!

jasocul · Verfasst: Mi 18.01.06 12:28

Wenn ich eine Frage sehe, die ich beantworten kann, mache ich das auch. Manchmal gehts halt schnell. :wink:

btw, statt:

markieren

Delphi-Quelltext

1:
2:
3:

Query_Bestand.Active := True;
// und
Query_Bestand.Active := False;

geht auch:

markieren

Delphi-Quelltext

1:
2:
3:

Query_Bestand.Open;
// und
Query_Bestand.Close;

	Mitgliederliste
	Gruppen
	Das Team
	Richtlinien
	Synonyme