[Marwuinh]

Código Delphi [-]
tTabla1.First;
    while not tTabla1.Eof do
    begin
      Cedula.Text:=tTabla1.FieldByName('Cedula').AsString;//faltaba esta linea
      Reporte.Reporte1.Print;
      tTabla1.Next;
    end