Daten aufsteigend sortieren

[Thomm]

Ich wollte die Daten in meiner Datenbank aufsteigend sortieren.

Das Feld heißt 'Abfahrtszeit' und umfasst Datum und Uhrzeit (z.B. 12.08.2007 19:57:45)

Delphi-Quellcode:

procedure TForm1.Oeffnen1Click(Sender: TObject);
begin 
Clientdataset1.IndexDefs.Add('IDAbfahrtszeit', 'Abfahrtszeit', [ixCaseInsensitive]) ;
.
.
.
.

end;;

Was ist daran falsch ?

[grenzgaenger]

die anordnung der daten in der db ist sache der db und nicht beinflussbar.

was du machen kannst, ist die ausgabe entsprechend deinen wünschen zu sortieren.

[eddy]

Hallo Thomm,

probier's damit:

Delphi-Quellcode:

Clientdataset1.IndexDefs.Add('IDAbfahrtszeit', 'Abfahrtszeit', [ixCaseInsensitive, ixDescending]);

mfg
eddy

[Thomm]

Zitat:

Zitat von eddy

Hallo Thomm,

probier's damit:

Delphi-Quellcode:

Clientdataset1.IndexDefs.Add('IDAbfahrtszeit', 'Abfahrtszeit', [ixCaseInsensitive, ixDescending]);

mfg
eddy

Habs probiert, funktioniert nicht :?

[grenzgaenger]

<delete>

[Thomm]

Irgendwie muss man doch die Einträge sortieren können.

Gibts doch nicht.

Vielleicht hat DBGrid ne Eigenschaft zum Sortieren.

[Chemiker]

Hallo Thomm,

natürlich kann man die Einträge sortieren.

Delphi-Quellcode:

var
  IndexName: String;
begin
  IndexName:= 'KDNachName'+'Index';
  DM.KundeClientDataSet.AddIndex(IndexName, 'KDNachName',
                                                   [ixCaseInsensitive],'','',0);
  DM.KundeClientDataSet.IndexName:= IndexName;

Wenn Du die Spalten in einem DBGrid sortieren willst, kann man durch das Anklicken der Namen in der Spalten sortieren. Allerdings funktioniert die Sortierung nur absteigend.

Delphi-Quellcode:

procedure TfrmHauptFormular.KundenDBGridTitleClick(Column: TColumn);
begin
  try
    DM.KundeClientDataSet.IndexFieldNames := Column.FieldName;
  except
    ShowMessage('Das Feld kann nicht sortieren' + Column.FieldName);
end;

Bis bald Chemiker

[Thomm]

Zitat:

Zitat von Chemiker

Hallo Thomm,

natürlich kann man die Einträge sortieren.

Delphi-Quellcode:

var
  IndexName: String;
begin
  IndexName:= 'KDNachName'+'Index';
  DM.KundeClientDataSet.AddIndex(IndexName, 'KDNachName',
                                                   [ixCaseInsensitive],'','',0);
  DM.KundeClientDataSet.IndexName:= IndexName;

Bis bald Chemiker

Hallo Chemiker

Das funktioniert nicht ganz. :?

Sortiert zwar die Einträge, aber da diese Datumsformat [dd.mm.yyyy hh:mm:ss]
haben, sortiert er nur nach der ersten Ziffer, aber nicht nach dem Datum .

so z.B.

01.08.2008 17:45:55
02.09.2008 13:45:13
08.01.2007 12:55:12
10.04.2008 11:23:45

[mkinzler]

Was für einen Typ hat das Feld?

[grenzgaenger]

auch wenn ich mich wiederhole, eine SQL DB kennt keine sortierung auf satzebene, wie die DB die sätze abspeichert ist ausschliesslich der angelegenheit des DBMS.

ggf. kann es sein, dass sich das DBMS so verhält wie erwartet, das ist aber reiner zufall und muss nicht heissen, dass dies auch in 2 monaten noch so ist...

daher, sortiert man die ausgabe aus der DBMS.. hierzu wird i.a.R. der select .. order by ... zur verfügung gestellt.

alternativ kannst du auch per hand sortieren... :-)


d.h. wenn du deine daten nur visualisieren willst, nimm 'n tQuery statt 'n tTable ... und sag es via SQL wie du deine daten aufbereitet haben möchtest...

wenn du deine daten noch zusätzlich bearbeiten willst... (neue sätze einfügen, etc.) ist handarbeit angesagt...

[grenzgaenger]

Zitat:

Zitat von mkinzler

Was für einen Typ hat das Feld?

dachte er hätt auf double oder 'n datetime umgestellt?

[mkinzler]

Eine Sortierung nach der ersten Ziffer hört sich nicht nach Datumstyp an

[Thomm]

Zitat:

Zitat von mkinzler

Was für einen Typ hat das Feld?

Delphi-Quellcode:

ClientDataSet1Abfahrtszeit.AsDateTime  := frac(datetimepicker3.time)+ trunc( datetimepicker1.date);

so werden sie in die DB eingetragen

[mkinzler]

Das heisst aber nicht das das Feld diesen Typ hat.

[Chemiker]

Hallo Thomm,

bei mir wird auch ein Datum richtig sortiert.

@grenzgaenger: Er hat ja keine richtig Datenbank. Und die Sortierung funktioniert so. Man muss allerdings auch anmerken das die Index-Erstellung nur temporär ist.

Bis bald Chemiker

[Thomm]

Zitat:

Zitat von mkinzler

Das heisst aber nicht das das Feld diesen Typ hat.

FieldKind = fkData

DataType = ftDateTime

[Thomm]

Ich hab den Fehler gefunden. :shock:

Bei dem Feld 'Abfahrtszeit' war statt TDateTime

Tstring als Feldtyp eingetragen.

Deswegen hat er nur nach der ersten Ziffer sortiert :cry:

Ich hab das geändert , jetzt funktioniert es.

DANKE

[eddy]

Hallo Thomm,

zumindest funktioniert es mit dBase-, Paradox- und ADS-Datenbanken.

Meine Tabelle (=DBGrid) soll nach einem Feld vom Type TDateTime so sortiert werden, daß der neueste Eintrag ganz oben steht.

Als SQL-Sortierung für eine (ADS-)Datenbank namens TERMIN wird damit nach dem Feld DATUM in austeigender oder absteigender (DESC) Reihenfolge sortiert.

Delphi-Quellcode:

select * from termin order by datum
select * from termin order by datum desc

Habe allerdings keine Erfahrung mit MyBase sowie dem von Dir definierten Zugriff über Clientdataset.

mfg
eddy

[Thomm]

Weiß vielleicht jemand , wie man die Anzahl der Einträge in die Datebank anzeigen kann ?

[mkinzler]

.RecordCount?

[Thomm]

Zitat:

Zitat von mkinzler

.RecordCount?

Nee, funktioniert nicht

Delphi-Quellcode:

Clientdataset1.RecordCount

[Thomm]

Stimmt.......funktioniert