Man sollte auch den Wert richtig schreiben, dann funktioniert das auch.
Aber da wir schon bei Expression sind, ich muß von einem anderen expression-Feld den Wert nehmen, auswerten und in ein anderes Feld schreiben.
Beispiel:
Delphi-Quellcode:
Wert := StrToFloat(Epr1.Value.strResult);
if Dataset.FieldByName('Feld1').AsString = 'Nein' then
Wert := Wert + StrToFloat('0,50');
qrLabel.Caption := FloatToStr(Wert);
Das Ganze habe ich in die OnPrint-Routine des Labels eingebaut. Funktioniert so ganz gut, nur wenn er nicht bei allen Datensätzen nur das Ergebnis von dem letzten Datensatz anzeigen würde.
Hoffe jemand hat ne Lösung.