[Delphi] Quebra de linha em String !!

[The°Hacker 6]

Olá, bem minha duvida é o seguinte... preciso de um método para quebrar linha a partir de uma posição na string, exemplo?

 

Tenho a variavel Frase com a seguinte palavra: 'EMBALAGEM'

 

e mais duas variaveis que receberão o resultado da divisão:

var Palavra1, Palavra2: String;

 

Como alguns devem saber, cada letra na string tem uma posição né

 

Frase[0]:= 'E';

Frase[1]:= 'M';

Frase[2]:= 'B';

Frase[3]:= 'A';

Frase[4]:= 'L';

Frase[5]:= 'A';

Frase[6]:= 'G';

Frase[7]:= 'E';

Frase[8]:= 'M';

 

Então, eu queria q a partir da posição 4 Ouvesse uma quebra na string, e determinar o resultado nas variaveis Palavra1 e Palavra2:

A variavel Palavra1 receberia o resto da palavra EMBAL.

A variavel Palavra2 receberia o resto da palavra AGEM

 

Preciso disso antes de passar o valor de uma variavel via parametros pro Rave Reports.

 

Caso não tenham entendido só falar q tento simplificar, desculpa qualquer erro.

 

Obrigado a quem puder me ajudar !!

[Lucas ' ~ 4]

Eu fiz de uma forma aqui não sei se é do jeito que você quer.

 

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

 

Espero ter ajudado.

PS: Coloquei os edits só pra ter certeza que separou a string mesmo xD.

[Windox 0]

Existem vários tipos, tem como você fazer com o código que o Lucas ' ~ te deu, ou, usando um MEMO, é mais fácil, você vai na PROPRIEDADE LINES e digita o texto. Com Rich Edit também dá, não sei se era isso que você queria, mas de qualquer forma o código do Lucas ' ~ da certo.

 

Atenciosamente,

WINDOX

[AceStryker 32]

Fiz essa função aqui para você:

É necessário se cadastrar para acessar o conteúdo.

• Entre
• ou
• Cadastre-se

[The°Hacker 6]

Muito obrigado a todos, consegui resolver aqui já... muito obrigado mesmo ajudaram bastante..

 

Adm pode dar close aqui, problema resolvido :D

 

Att,

 

TheºHacker