Básicamente pones un report con una banda...
pones una variable private o publica...
private
i:integer;
pones un botón que haga el preview del report poniendo la variable a 0
i:= 0;
QReport1.Preview;
en el procedure onneeddata del report pones esto...
Código Delphi
[-]
procedure TForm1.QuickRep1NeedData(Sender: TObject; var MoreData: Boolean);
begin
i:= i+1;
if i<=10 then
begin
moreData:= True;
QRLabel1.Caption:= 'Hola '+inttostr(i);
end;
end;
y ya está...
Saludos