Como imprimir um retangulo em volta dos dados... (Writeln)

Bom dia companheiros...

Vejam se podem me ajudar....

Estou imprimindo boletos no meu sistema em folha de papel A4, sendo que no verso dos boletos estou imprimindo o destinatario

Eu gostaria de envolta dos dados do destinatario, desenhar um retangulo com as pontas arredondadas, como se fosse uma etiqueta.

Tem como fazer isso.

Eu uso o comando Writeln para imprimir os dados, vejam como está o codigo

while not dtmDados.QryBoletos.Bof do
Begin
writeln(PrintFile);
writeln(PrintFile);
writeln(PrintFile);
writeln(PrintFile);
writeln(PrintFile);
writeln(PrintFile);
writeln(PrintFile);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´Nome´).Asstring);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´Endereco´).Asstring);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´Bairro´).Asstring);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´Cidade´).Asstring+ ´ ´+DtmDados.tblEmpresas.FieldByName (´UF´).Asstring);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´CEP´).Asstring);
Writeln(PrintFile, DtmDados.qryBoletos.FieldByName (´Contatos´).Asstring);
writeln(PrintFile);
Write(PrintFile, #12) // pula para a proxima folha



Eu gostaria de colocar um contorno de preferencia com os cantos arredondados para ficar igual uma etiqueta.


Se puderem me ajudar ficarei muito grato.


Um grande abraço a todos....

Pablo
marília/SP