DB nach Spalte sortieren (Index oder SQL?)

[Jetro223]

Hallo,

ich hab' eine kleine DBase Datenbank, die ich über ein DBGrid anzeigen lasse.

TTable --> TDataSource -> TDBGrid.

Nun möchte ich die Tabelle nach bestimmten Spalten sortieren. Biem Programmstart ist sie nach Spalte X sortiert, ich will aber auf Knopfdruck nach Spalte Y oder Z sortieren.

Wie bekomm ich das hin? Ich hab jetzt schon einige Beispiele gelesen mit

Code:

SQL ( SELECT * FROM Tabellenname ORDER BY Spaltenname)

, aber damit kann ich absolut nix anfangen.

Oder die zweite Möglichkeit, die ich anscheinend hab mit

Code:

Table1.IndexName := IndexName;

, wobei Indexname irgendwie auf den Spaltennamen verweisen muss (keine Ahnung wie..)

Also: Kann mir jemand sagen, wie ich das Sortieren hinbekomme, entweder mit SQL oder mit den Indexen...würde mich sehr freuen.

Ciao :)

[Robert_G]

Moin Jetro,
Wenn du von Table auf Query wechselst, kannst du das mal versuchen.( im OnTitleClick-Event des Grids)

Delphi-Quellcode:

  TQuery(Column.Grid.DataSource.DataSet).SQL.Text :=
    SelectStr +#10+
    'ORDER BY ' + IntToStr(succ(Column.Index));

[Edit] "SelectStr" sol dein Select-Statement bis vor die "ORDER BY"-Clause enthalten[/Edit]
Ich weiß jetzt aber nicht, ob TTable auch eine SQL-property hat.
Ich kenne mich aber mit dem BDE/ADO - zeugs nicht so aus

p.s.: Wenn das die BDE kompos sind, dann nehme lieber ADO
(BDE wird hier in der DP öfters als schlechter beschrieben)

[r_kerber]

Hallo Jetro223,

erst einmal herzlich willkommen in der Delphi-Praxis. Wie GeorgeWNewbie schon sagte, empfiehlt sich die Verwendung einer Query:

Delphi-Quellcode:

Query1.Close;
Query1.SQL.Clear;
Query1.SQL.Add ('SELECT * FROM tabelle');
Query1.SQL.Add ('ORDER BY ' + Column.FieldName);
Query1.Open;

Die Zeichenkette im ersten Add kannst Du auch in eine String-Variable legen.
@GeorgeWNewbie: Bei TTable gibt es keine Eigenschaft SQL. Die BDE ist nicht unbedingt schlecht, sie wird nur von Borland nicht mehr weiterentwickelt. Und ADO macht eigentlich nur Sinn, wenn man auf Access, MS SQL-Server und eventuell auf Oracle zugreifen will. Für alle anderen DB's muß man sich die (teilweise kostenpflichten) ADO-Treiber besorgen. Borland selbst empfiehlt DBExpress.

[Jetro223]

Hallo nochmal und danke erstmal :)

Diese Möglichkeit hab ich auch schon einige Male gelesen.

Aber wie genau verbind ich damit mein DBGrid und die DataSource...

Wahrscheinlich fehlen mir nur noch die richtigen Verknüpfungen zwischen den Komponenten um es zum laufen zu bringen.

Wäre echt genial, wenn mir die noch jemand aufschreiben könnte :)

Ciao :)

[Sharky]

Hai Jetro223,

bei deiner DataSource stellst Du im OI bei DataSet dein Query1 ein.
In deinem DBGrid stellst Du dann unter DataSource deine DataSource1 ein.

Das Query muss natürlich mit einer Connection verbunden sein.

[Jetro223]

Hmm, irgendwie schein ich zu blöd zu sein :) Ich kapiers nicht.

Also ich hab jetzt je einmal

TQuery
TTable --> hier verweis ich normalerweise bei Table1.TableName auf c:\blah.dbf, meine DBase Tabelle
TDataSource --> hier kommt bei DataSet Table1 hin
TDBGrid --> hier bei Datasource, DataSource1

Wie muss ich jetzt das TQuery in das Ganze einfügen, das mir trotzdem meine Daten im TDBGrid angezeigt werden, ich dann aber via SQL ordnen etc. kann.

Ciao :)

Edit: Oder beziehungsweise, was stell ich beim TQuery ein...denn dort gibt es nur DatabaseName, ich hab aber keine Aliase oder so Zeug :)

Sorry, ihr merkts sicher schon, bin Anfänger in Richtung Datenbank :)

[Sharky]

Du brauchst noch eine TDataBase wenn ich mich nicht täuche.
Und dann anstelle der TTable die TQuery verwenden.

[Jetro223]

Und wie mach ich das bei der TDatabase mit dem Databasename und wo ist da ne Verknüpfung zum Query...mist, im moment blick ich absolut nix...:(

Ciao :)

[Sharky]

Was hast Du denn für eine Delphi-Version? Eventuell ist es mit den ADO-Komponenten ja leichter zu lösen.

[Jetro223]

Ich hab Delphi 6 Enterprise. Kann ja nicht soooo schwer sein, einfach nach versch. Spalten zu ordnen :)

[Jetro223]

Also ich hatte es jetzt geschafft, die Tabelle mit SQL und dem Query so zu ordnen, wie ich es brauche (DatasourceX.DataSet := Query1;), das blöde ist nur: anscheinend kann ich jetzt nicht mehr löschen bzw. editieren. :(

Also er meint bei z.B.:

Code:

Query1.Delete;

--> Datenmenge ist schreibgeschützt...

Weiss jemand warum? Und wenn Datenmenge schreibgeschützt, bzw. wenn man allgemein mit einem TQUery Daten nur ANzeigen lassen kann, wozu gibt es dann noch Delete und Edit etc.

...bzw. was mach ich falsch :)

Ciao :)

[r_kerber]

Zwei Möglichkeiten: Entweder du schickst ein DELETE-Statement an die DB oder Du entfernst den Schreibschutz der Datenmenge (Eigenschaft RequestLive). Der ersten Alternative sollte der Vorzug gegeben werden.

[Jetro223]

Super, das mit dem DELETE funktioniert einwandfrei...Dankeschön! :)

Also quasi alles was ich machen will, was die DB manipuliert mit SQL, wenn's anders nicht geht :)

Man, gibt's denn keine Komponente, die beides kann: Einfache Veränderungen UND SQL?

Ciao :)

[r_kerber]

Eigentlich kann TQuery beides. IMHO sollte man doch alles über SQL-Statements erledigen.

[Jetro223]

Hmm, stimmt, daher auch die ganzen Sachen wie Insert etc. :)
Wenn es jetzt noch möglich wäre diesen Schreibschutz aufzuheben, wäre ich für einen Moment der glücklichste Mensch der Welt :mrgreen: . Denn alles in SQL umzusetzen wäre im Gegensatz zu der Methode, wie ich sei mit TTable kenne großer Aufwand (wenn es sein muss, würde ich den auch betreiben, aber nur wenn es sein muss :))

Du meintest das ginge mit dem Setzen der Eigenschaft RequestLive zu TRUE. Die Onlinehilfe meint, dass das nur eine Anforderung ist und nicht unbedingt Erfolg hat.

Also im Endeffekt ist meine DBASE Datenbank trotzdem schreibgeschützt...hab es eben auch mit einer Paradox Datenbank probiert und diese will leider auch nicht :(.

Für was für Datenbanken und unter welchen Umständen hätte denn RequestLive Erfolg...weisst du das?

Mfg :)

Edit: Aha, alles klar...jetzt funktioniert es. Ich darf laut LocalSQL.hlp keine ORDER BY Klausel verwenden, also muss ich vor dem editieren etc. einfach die SQL Anweisung so drehen, das keine ORDER BY Klauseln etc. (sind nochn paar andere die nicht da sein dürfen) existiert und dann geht's...naja, mal schaun, ob ich das so mach', oder dann doch alles per SQL...

[Robert_G]

Also ich weiß nicht, wie es sich dBase da verhält, aber wenn man so eine Anfrage an eine Oracle-DB schickt, dann erwartet sie, das die RowID mit selektiert wird.

Die RowID ist ein eindeutiger Zeiger auf einen Eintrag. Vielleicht braucht TQuery sowas ähnliches von deiner dBase DB.
[Edit1]war zu langsam[/Edit1]