Strings
24/02/2003
0
ex. if ´CARLOS´ in nome.text then begin
...
end;
Fernando Marroco
Posts
24/02/2003
Aroldo Zanela
ex. if ´CARLOS´ in nome.text then begin
...
end;[/quote:3bf23b0aa6]
Não sei se entendi corretamente, mas a função [b:3bf23b0aa6]POS[/b:3bf23b0aa6] procura uma substring dentro de uma string. Mais detalhes no help do Delphi
var S: string; begin S := ´ 123.5´; { Converte espaços para zeros } while Pos(´ ´, S) > 0 do S[Pos(´ ´, S)] := ´0´; end;
24/02/2003
Anonymous
if Pos(´Carlos´,Edit1.text) <> 0 then
showmessage(´OK´);
com a função Pos vc verificar se existe uma string dentro de outra, se a função não acha ele retorna zero, agora se ela acha a string ele retorna a posição da pirmeira letra da string procurada.
Leandro.
ICQ 128124370
Clique aqui para fazer login e interagir na Comunidade :)