duvida simples, nao consigo achar �espa�o� em um caracter

Question

� o seguinte tenho uma fun��o que escreve um numero por exten�o, mas o maximo seria 70 caracteres por linha, para isso criei um loop onde vou formatar, at� ai td bem... so que no meio da formata��o el...

Rjun · Answer

Amigo�� � diferente de � �.Se voc� quer comparar com espa�o, ent�o fa�a:[code:1:426b7384f1]steste := Copy(editExtenso.Text,count,1); if steste = � � then   iTamanho := count; if count > 70 then   count :=139; // sai fora do loop [/code:1:426b7384f1]...

Matheuscaetano · Answer

oi Rogerio,agrade�o a colabora��o, mas o pior � que j� tentei isso tbm... n�o encontra do mesmo jeito... estranho......

Rjun · Answer

Coloque o trecho inteiro do loop(FOR ou WHILE). N�o sei qual voc� usou. Coloque tamb�m a declara��o das vari�veis que voc� esta utilizando....

Matheuscaetano · Answer

na verdade esta desta forma:

while count <> 140 do
begin
steste := Copy(editExtenso.Text,count,1);
if steste = � � then
iTamanho := count;
if count > 70 then count :=139;
Inc(count);
end;

Marco Salles · Answer

amigo por acaso voce n�o quer fazer isto ????

count:=1;
while count <> 140 do
begin
if edit1.Text[count] = � � then
  begin
    iTamanho := count;
    break;
  end;
Inc(count);
end;

Rjun · Answer

Bom, teoricamente seu c�digo est� correto. No entanto, vale notar que:

1) Voc� faz um WHILE at� 140 mas no meio voc� interrompe ele caso a vari�vel count seja maior que 70. Ent�o seria mais l�gico o loop ser at� 70;

2) Em loop com vari�veis contadoras, utilize <= e n�o <>. Imagine se por algum motivo desconhecido sua variavel pule de 139 para 141. Ele ficaria num loop infinito;

3) N�o consegui entender a finalidade desse loop, ja que a cada espa�o em branco encontrado, voc� sobscreve a vari�vel iTamanho. Se voc� quer encontrar o primeiro espa�o em branco, utilize a fun��o POS.

4) Qual a finalidade do loop?[/code]

F�rum duvida simples, nao consigo achar �espa�o� em um caracter #284840