Merhaba, fastreport ile ilgili bir ornek yapıyorum. Kodlarım calışıyor hata yok ama raporu gostermiyor ne yapmam gerek.

procedure TForm1.frxReport1BeforePrint(Sender: TfrxReportComponent);
var
Cross: TfrxCrossView;
i, j: Integer;
begin
if Sender is TfrxCrossView then
begin
Cross := TfrxCrossView(Sender);

IBTable1.First;
i := 0;
while not IBTable1.Eof do
begin
for j := 0 to IBTable1.Fields.Count - 1 do
Cross.AddValue([i], [IBTable1.Fields[j].DisplayLabel], [IBTable1.Fields[j].AsString]);

IBTable1.Next;
Inc(i);
end;
end;
end;


Şimdiden teşekkur ederim.
__________________