XE5: Eingabereihenfolge DBGrid ändern

[Kralle]

Hallo,

Zitat von himitsu:

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 von himitsu:

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 von Kralle:

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 von Uwe Raabe:

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