Hallo
Ich würde das Ganze mit dem OnCalcFields Ereignis der Abfrage lösen. Diese Abfrage ist an die DataSource gebunden von der aus Dein DBGrid seine Daten erhält.
procedure TForm.queryCalcFields(DataSet: TDataSet);
begin
query.DisableControls;
case queryIntegerwert.Value of
0 : queryBerechnetesFeld.Value := 'String0';
1 : queryBerechnetesFeld.Value := 'String1';
2 : queryBerechnetesFeld.Value := 'String2';
else queryBerechnetesFeld.Value := 'String Else'
end;
query.EnableControls
end;
Anschliessend hinzufügen der Felder zu
query falls noch nicht geschehen (mit Doppelclick auf Abfrage und dann rechte Maustaste):
- 'Integerwert' ist das Feld aus Deiner Abfrage mit den Integer-Werten 0-5
- 'BerechnetesFeld' wie der Name sagt als berechnetes Feld hinzufügen. Im DBGrid muss dann dieses angezeigt werden (hinzufügen!).
So das müsste funktionieren!
Ich hoffe das löst Dein Problem
gruss armin