Foros Club Delphi

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)
-   Varios (https://www.clubdelphi.com/foros/forumdisplay.php?f=11)
-   -   Duda con una String (https://www.clubdelphi.com/foros/showthread.php?t=57849)

Paulao 30-06-2008 12:13:57

Duda con una String
 
Mira, yo hizo mi codigo para traer solo el nombre de Loja asi:

Cita:

j := AnsiPos('LOJA:',s);
if j <> 0 then
Loja := Copy(s,j+5,pos('FONE:',s)-1);
Esto no estas funcionando. Lo que quiero es hacer un copy solo del nombre de LOJA, sin la palabra LOJA:, como estas arriba, en J+5. Pero estas vindo tambien la palabra FONE: Mi String estas asi:
LOJA: São Bento FONE:(11)9999-9999, pero quando cargo mi codigo viene asi: São Bento FONE:(11)9, pero debria venir asi: São Bento. Qua hago entonces?

Caro 30-06-2008 13:33:09

Hola Paulao, el ultimo parametro del copy es el número de caracteres y en tu código si se esta incluyendo el FONO mas, puedes arreglarlo así.

Código Delphi [-]
var
 FinLoja : Integer;
begin
 s := 'LOJA: São Bento FONE:11)9999-9999';
 j := AnsiPos('LOJA:',s);
 FinLoja := j+5;
 if j <> 0 then
  Loja := Copy(s,FinLoja,pos('FONE:',s)-FinLoja);

Saluditos


La franja horaria es GMT +2. Ahora son las 12:04:23.

Powered by vBulletin® Version 3.6.8
Copyright ©2000 - 2026, Jelsoft Enterprises Ltd.
Traducción al castellano por el equipo de moderadores del Club Delphi