Anzeige der Daten im DBGrid zur Laufzeit ändern

[aschne1]

Hallo kico

Hast Du beide Felder (Integerwert und BerechnetesFeld) in Deiner Abfrage hinzugefügt? Zur Kontrolle habe ich das Programm bei mir getestet und es funktioniert einwandfrei. Bitte füge die Felder mit dem Editor (Doppelclick auf die Abfrage) hinzu.

Im Beispiel greife ich über eine TADOConnection auf eine Accessdatenbank zu. Die Datasource des DBGrids ist mit einer TADODataSet verbunden, diese wiederum mit der TADOConnection.
Zur Illustration einmal ein Ausschnitt vom Interface-Teil

Delphi-Quellcode:

type
  TForm1 = class(TForm)
    ADOConnection: TADOConnection;
    query: TADODataSet;
    DBGrid: TDBGrid;
    queryIntegerwert: TIntegerField;               //Integerwert (Dein Datenbankfeld)
    DataSource: TDataSource;
    queryBerechnetesFeld: TStringField;            //Berechnetes Feld
    procedure queryCalcFields(DataSet: TDataSet);  //
  private
    { Private-Deklarationen }
  public
    { Public-Deklarationen }
  end;

Die Abfrage muss beim Starten aktiv sein!

Gutes Gelingen

mfg

Armin