dbnavigator ändern

[marabu]

Guten Morgen.

So könnte es funktionieren:

Delphi-Quellcode:

procedure TMainForm.InsertPurchasingPlanning1Click(Sender: TObject);
const
  sel 
    = 'select Client, tipo as "Group", Order as "Order", '
    + 'Article as "Style", Pieces, planfabric, planacess, '
    + 'finaldate as "Delivery Date", observations as "Remarks" '
    + 'from orders where planfabric is null or planacess is null '
    ;
begin
  ShowDBView(sel, 'Insert Purchasing Planning', True, True);
  with DBView.DBNavigator1 do
    VisibleButtons := VisibleButtons - [nbinsert, nbdelete];
end;

Grüße vom marabu