Zitat von
sx2008:
Im Eventhandler AfterOpen können die Feldlabels geändert werden:
Delphi-Quellcode:
procedure SetFieldCaption(dataset:TDataset; const FieldName, Label:string);
var
f : TField;
begin
Assert(Assigned(dataset));
f := dataset.FindField(FieldName);
if Assigned(f) then f.DisplayLabel := Label;
end;
procedure TForm1.Query1AfterOpen(...);
begin
SetFieldCaption('BetrNetto', 'Nettobetrag (Eur)');
end
Danke hat auf anhieb geklappt, danke auch an die restlichen Antworten.
mfg
Alex