Se salta "unos renglones" porque has terminado el documento en la línea "printslogan.EndDoc; //finalizacion de la impresion de la cabecera"...
¿Que tienes en las "otras funciones"?... ¿Utilizan el objeto Printer?... ¿Oíste hablar de la etiqueta [delphi]
? (es para poner el código un poco mas bonito en el foro
)