XE5: Eingabereihenfolge DBGrid ändern

[Kralle]

Moin,

wenn ich durch den 'DBNavigator' eine neue Zeile im 'DBGrid' erzeuge, dann ist die immer die oberste.
Ich kann also nicht 1,2,3 eingeben weil es zu 3,2,1 werden wird.
Wie bringe ich den Navigator bzw das Grid dazu neue Zeilen unten anzuhängen?

Gruß HEiko

[Uwe Raabe]

Zitat:

Zitat von Kralle (Beitrag 1255402)

wenn ich durch den 'DBNavigator' eine neue Zeile im 'DBGrid' erzeuge, dann ist die immer die oberste.
Ich kann also nicht 1,2,3 eingeben weil es zu 3,2,1 werden wird.
Wie bringe ich den Navigator bzw das Grid dazu neue Zeilen unten anzuhängen?

Hat das nicht eher was mit dem aktiven Index des darunterliegenden Datasets zu tun?

[himitsu]

Oder des Grids, welche die Daten selber und unabhöngig vom DataSet sortieren oder gar gruppieren können.

DBNavigator macht ein Insert
und im DataSet selber hängt die Einfügeposition vom Befehl ab.
Insert > an aktueller Position einfügen
Append > ans Ende anhängen (vorallem bei Memory-Datasets, ala TClientDataSet, ist bei vielen Inserts ein Append wesentlich schneller)

Du kannst aber z.B. im BeforInsert, oder im passenden Event des Navigators, das Standardverhalten ändern/abbrechen und ein Eigenes implementieren.

[Kralle]

Hallo,

Zitat:

Zitat von himitsu (Beitrag 1255408)

DBNavigator macht ein Insert
und im DataSet selber hängt die Einfügeposition vom Befehl ab.
Insert > an aktueller Position einfügen
Append > ans Ende anhängen (vorallem bei Memory-Datasets, ala TClientDataSet, ist bei vielen Inserts ein Append wesentlich schneller)

Leider gibt es keinen Switch Insert/Append.

Zitat:

Zitat von himitsu (Beitrag 1255408)

Du kannst aber z.B. im BeforInsert, oder im passenden Event des Navigators, das Standardverhalten ändern/abbrechen und ein Eigenes implementieren.

Ich könnte es ändern/abbrechen wenn ich wüsste wie man das macht.
Aber wie verhindere ich dass das Insert ausgeführt wird und anstatt ein Append ausgeführt wird?
Ich könnte zwar den Navigator vergessen und einzelne Button nehmen, aber wofür gibt es eine Komponente wenn man sie nicht nutzt.

Gruß HEiko

[Uwe Raabe]

Zitat:

Zitat von Kralle (Beitrag 1255421)

Ich könnte es ändern/abbrechen wenn ich wüsste wie man das macht.
Aber wie verhindere ich dass das Insert ausgeführt wird und anstatt ein Append ausgeführt wird?

Vielleicht so:

Delphi-Quellcode:

procedure TForm294.DBNavigator1BeforeAction(Sender: TObject; Button:
    TNavigateBtn);
begin
  if Button = nbInsert then begin
    (Sender as TDBNavigator).DataSource.DataSet.Append;
    Abort;
  end;
end;

[Kralle]

Hallo Uwe,

Zitat:

Zitat von Uwe Raabe (Beitrag 1255453)

Delphi-Quellcode:

procedure TForm294.DBNavigator1BeforeAction(Sender: TObject; Button:
    TNavigateBtn);
begin
  if Button = nbInsert then begin
    (Sender as TDBNavigator).DataSource.DataSet.Append;
    Abort;
  end;
end;

Danke.

Gruß HEiko