Registriert seit: 4. Nov 2005
Ort: Basel
442 Beiträge
Delphi XE2 Enterprise
|
Re: Fastreport Objekt in abhängikeit von DB Feld
11. Mai 2009, 18:45
Das wars!! Danke mkinzler
Delphi-Quellcode:
procedure DefaultPERSONSOnBeforePrint(Sender: TfrxComponent);
var
i: Integer;
ds: TfrxDataSet;
list: TStringList;
db_list: String;
begin
ds := Report.GetDataset('default');// username of ds
list := TStringList.Create;
ds.GetFieldList(list);
for i := 0 to list.Count - 1 do
begin
if list.IndexOf('Persons') > -1 then //Feld vorhanden
DefaultPERSONS.Visible := true;
ds.Next;
end;
end;
Shalom
Manfred
|