Ver Mensaje Individual
  #3  
Antiguo 20-02-2005
Avatar de Lepe
[Lepe] Lepe is offline
Miembro Premium
 
Registrado: may 2003
Posts: 7.424
Reputación: 29
Lepe Va por buen camino
para guardarlo: simplemente:
Código Delphi [-]
 campo1.asstring:= FontToStr(Edit1.text);

En el BeforePrint cambiamos la fuente de QRDBTEXT1:
Código Delphi [-]
 StrToFont(dtmImp.qryCampo1.AsString,QRDBtext1.Font);

mas o menos

Saludos
Responder Con Cita