Mr. Nages, I use the class TImprime and TUtilprn (provided years ago by Rafa Carmona ). At the moment this is how it works for me (more or less): ndummyaltura := ( ::oPrn:CmVertPhySize() / 2 ) + ( ::oPrn:CmtrGetTextWidth( AllTrim( ::oTDbfDatAmp:REGMER ), ::oFnt_Arial6V ...