Você pode testar aonde está o último espaço (dentro desses 40 caracteres) e fazer a quebra nele. Dê uma olhada na função LastDelimiter que vai te ajudar com isso.
[]'s
Ezequiel
Tiago de Assis Pimenta escreveu:
>
>
> Galera, boa tarde, estou com o seguinte problema.
>
> Preciso quebrar um string em varias linhas, as condições são as seguintes,
> cada linha não pode passar de 40 caracteres.
>
> Isso é para imprimir uma Ordem de Serviço, então por exemplo, chegou em 40
> caracteres, ele pula para a proxima linha e assim sucessivamente.
>
> Agora a duvida, como faço isso por exemplo, se o limite de caracter der no
> meio de uma palavra ? Vai fica estranho !!!
>
> Então tava pensando em pular a linha só quando achar um espaço em branco.
>
> Sera que alguem tem outra ideia para me ajudar ???
>
> Tiago de Assis Pimenta
>
> MSN: <mailto:[EMAIL PROTECTED]
> <mailto:tiagopimenta%40hotmail.com>> [EMAIL PROTECTED]
> <mailto:tiagopimenta%40hotmail.com>
> Skype: tiagopimenta_skype
> Gtalk: tiagopimenta
>
>
> [As partes desta mensagem que não continham texto foram removidas]
>
>
> Mensagens neste tópico
> <http://br.groups.yahoo.com/group/delphi-br/message/167918;_ylc=X3oDMTM4ZTV2OWZrBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE2NzkxOARzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzExNzIyNTU1MzIEdHBjSWQDMTY3OTE4>
>
> (1) Responder (através da web)
> <http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJyZXNqb2VkBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE2NzkxOARzZWMDZnRyBHNsawNycGx5BHN0aW1lAzExNzIyNTU1MzI-?act=reply&messageNum=167918>
>
> | Adicionar um novo tópico
> <http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJlbHI0ZmhrBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTE3MjI1NTUzMg-->
>
>
> Mensagens
> <http://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlZnIwYXQ0BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTE3MjI1NTUzMg-->
>
> | Arquivos
> <http://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmMzJkcXJnBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzExNzIyNTU1MzI->
>
> | Fotos
> <http://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlYzdjOXVvBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTE3MjI1NTUzMg-->
>
> | Links
> <http://br.groups.yahoo.com/group/delphi-br/links;_ylc=X3oDMTJmMDI5aHF0BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2xpbmtzBHN0aW1lAzExNzIyNTU1MzI->
>
> | Banco de dados
> <http://br.groups.yahoo.com/group/delphi-br/database;_ylc=X3oDMTJjNmpnMW8zBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2RiBHN0aW1lAzExNzIyNTU1MzI->
>
>
> --
