Floats in TDBGrid

[Sharky]

Zitat von mikhal:

Das Problem wirst du nur mit persistenten Feldern sauber lösen können - rechte Maustaste auf die AdoQuery, Fields Editor im Kontextmenü aufrufen und dann Rechtsklick in die ListBox und dort die gewünschten Felder hinzufügen ...

Bei diesem Vorgehen muss man aber eines beachten.

Wenn man nun im SQL-Query ein zusätzliches Feld angibt oder die Tabelle erweitert muss man dieses auch wieder in der Feldliste des Query angeben. Oder wenn man ein Feld weniger aus der Tabelle holt muss man dieses auch aus der Feldliste entfernen.

Darum mache ich das nicht über den OI sonder einfach im Quellcode:

Delphi-Quellcode:

procedure TForm1.ADOQuery1AfterOpen(DataSet: TDataSet);
begin
  (DataSet.FieldByName('datum') as TDateTimeField).DisplayFormat := 'dd. MMM yyyy';
  (DataSet.FieldByName('preiss') as TFloatField).DisplayFormat := '0.00';
end;