Datensätze anzeigen

[motu]

Wie kann ich per ADOQuery gefundene Datensätze in einem neuen Form anzeigen lassen?

bisher hab ich:

Delphi-Quellcode:

     DBform.datasource1.dataset := ADOQuery1;

Ich kann aber keine Verbindung zwischen der Abfrage und dem DataGrid herstellen.
:wall:

[barnti]

Hi,

Zitat:

Zitat von motu

Wie kann ich per ADOQuery gefundene Datensätze in einem neuen Form anzeigen lassen?

bisher hab ich:

Delphi-Quellcode:

     DBform.datasource1.dataset := ADOQuery1;

Ich kann aber keine Verbindung zwischen der Abfrage und dem DataGrid herstellen.
:wall:

Delphi-Quellcode:

DeinGrid.Datasource:= DeineAdoQuery.Datasource;

Wenn ich dich richtig verstanden habe. So oder so ähnlich sollte es funktionieren...

[motu]

hmmm. Klappt nicht so ganz. :(

[Bitworm]

Verwende statt einer ADOQuery ein ADODataset. Query ist nur für SQL-Operationen
gedacht, daß keine Ergebnismengen zurückliefert und hat deswegen auch keine
Schnittstellen, die von Komponenten zur Ergebnisdarstellung benötigt werden.

[motu]

Hört sich gut an, aber wo und wie?

[Sharky]

Zitat:

Zitat von Bitworm

...und hat deswegen auch keine Schnittstellen, die von Komponenten zur Ergebnisdarstellung benötigt werden.

Hai Bitworm,
seit wann das denn? Ich arbeite schon immer mit TQuerys und TDataSource.

[motu]

:wiejetzt:
Also wie übergeb' ich denn nu' meine Ergebnismenge an mein DataGrid im zweiten Form?

[Sharky]

Zitat:

Zitat von motu

:wiejetzt:
Also wie übergeb' ich denn nu' meine Ergebnismenge an mein DataGrid im zweiten Form?

Eigentlich brauchst Du doch nur Form1 in die USES von Form2 aufnehmen. Dann bei deinem DBGrid als DataSource: Form1.DataSource1 angeben.

[motu]

Nu sagt er, Form1.dcu nicht gefunden.

[Sharky]

Zitat:

Zitat von motu

Nu sagt er, Form1.dcu nicht gefunden.

*g* Die UNIT heisst ja auch wahrscheinlich Unit1 (oder wie Du sie halt genannt hast)
Also den UNIT-Namen bei den USES angeben.

[motu]

ne, heißt sphaero und er sagt sphaero.dcu nich jefundn. *grummel*

[motu]

:wall: :wall: :wall:
Nun findet er zumindest die Unit, mein DataSet zeigt er mir aber immernoch nicht.

[Nalincah]

Poste mal dein Projekt, bzw. die beiden Units

[motu]

Das ganze Projekt. Zugegeben es wird am Ende, da wo die DB Sachen stehen ziemlich unübersichtlich.

Da ich selbst schon ne ganze Menge geändert habe, habe ich das Projetk erstmal wieder entfernt

[motu]

ALSO. ich habe die verbindung! :bounce2: er zeigt mir auch zeilen für jeden Datensatz an.
aber er zeigt mir nicht die daten der einzelnen datensätze an :wall:

[Bitworm]

Zitat:

Zitat von Sharky

Zitat:

Zitat von Bitworm

...und hat deswegen auch keine Schnittstellen, die von Komponenten zur Ergebnisdarstellung benötigt werden.

Hai Bitworm,
seit wann das denn? Ich arbeite schon immer mit TQuerys und TDataSource.

Hi Sharky (mögen Haie eigentlich auch Würmer ?),

Das ist aber so. Wenn man die OH liest findet man für ADODatasets dort:

Mit der Datenmengenkomponente können nur DDL-Befehle (Data Description Language = Datendefinitionssprache) ausgeführt werden, die eine Ergebnismenge zurückliefern. Für SQL-Anweisungen wie DELETE, INSERT und UPDATE sind Komponenten wie TADOCommand oder TADOQuery besser geeignet.

Die Query der Oracledatenzugriffskomponente Direct Oracle Acess z.B. sind da sogar so konsequent und lassen sich mit einem Datasource erst gar nicht connectieren.

[motu]

Äh. Das heißt jetzt, ich bin auf dem falschen Dampfer, richtig? Dann versteh ich auch, warum mein Grid genau so viele Zeilen wie Datensätze anzeigt aber keine Daten. also statt Query Dataset nutzen.
Wie muß ich dann meine Source ändern?

Delphi-Quellcode:

    with ADOQuery1 do begin
     Insert;
     FieldValues['SollRadius'] := DBSollRadius;
     FieldValues['IstRadius'] :=  DBIstRadius;
     FieldValues['Kennzeichnung'] := DBKennzeichnung;
     FieldValues['PGlasKonvex'] := DBPGlasKonvex;
     FieldValues['PGlasKonkav'] := DBPGlasKonkav;
     FieldValues['PruefdmKonvex'] := DBPruefdmKonvex;
     FieldValues['PruefdmKonkav'] := DBPruefdmKonkav;
     FieldValues['Messart'] := DBMessart;
     FieldValues['Pruefer'] := Pruefer.Text;
     FieldValues['Bemerkungen'] := Bemerkung.Text;
     FieldValues['Passe'] := Passe.Text;
     FieldValues['PHDifferenz'] := DBPHDifferenz;
     Post;
    end;

[motu]

Schluß! alles funzt! :bounce2:

[Sharky]

Zitat:

Zitat von Bitworm

... Für SQL-Anweisungen wie DELETE, INSERT und UPDATE sind Komponenten wie TADOCommand oder TADOQuery besser geeignet.....

Hmmm....
jetzt möchte ich aber bitte von Dir wissen warum ein TQuery schlechter sein soll wenn ich eine Ergebnismengen haben möchte!

[grayfox]

hallo bitworm!

Zitat:

Query ist nur für SQL-Operationen
gedacht, daß keine Ergebnismengen zurückliefert und hat deswegen auch keine
Schnittstellen, die von Komponenten zur Ergebnisdarstellung benötigt werden.

das wär mir aber ganz neu ;)

mfg, stefan

//edit: oops! ich hatte übersehen, dass dieser beitrag schon eine folgeseite hat *g*