Ver Mensaje Individual
  #8  
Antiguo 20-11-2008
tocomi tocomi is offline
Miembro
 
Registrado: may 2006
Posts: 45
Reputación: 0
tocomi Va por buen camino
Finalmente pude avanzar con el Rave Report, probe Report manager y no pude conectar la base, Fast Report tambien dio el mismo problema, Quick lo intente instalar ( se que dije que no lo queria usar, pero nesecitaba algo que funcionara aunque no me gustara como lo hacia), y del Rave, pude encontrar un par de cosas mas el manual que me pasaron (gracias nuevamente FGarcia), pude hacer algo.

Esto es lo mas cercano que he podido llegar a lo que necesito, faltan cosas como grupos y cosas por el estilo pero por lo menos puedo hacer un informe simple

Código:
 
var
MyPage: TRavePage;
MyText: TRaveText;
begin
With RvPrjcttotales.ProjMan do
   begin
   MyPage:=FindRaveComponent('Rprttotales.MainPage',nil) as TRavePage;
   MyText:=FindRaveComponent('Text1',MyPage) as TRaveText;
   MyText.Text:=Qrytotales.FieldByName('mes').Asstring;
   MyText:=FindRaveComponent('Text2',MyPage) as TRaveText;
   MyText.Text:=floattostrf(Qrytotales.FieldByName('bruto').AsInteger,ffnumber,15,0);
   MyText:=FindRaveComponent('Text3',MyPage) as TRaveText;
   MyText.Text:=floattostrf(Qrytotales.FieldByName('retencion').AsInteger,ffnumber,15,0);
   MyText:=FindRaveComponent('Text4',MyPage) as TRaveText;
   MyText.Text:=floattostrf(Qrytotales.FieldByName('liquido').AsInteger,ffnumber,15,0);
end;
Estoy bien o existe otra forma mas facil de hacerlo???
Responder Con Cita