Fórum Como tirar espaços no início de um Edit. #194793
13/11/2003
0
E aí, blz.
Como eu tiro espaços no ínicio dos Edits, quando alguém digitar algo.
valeu.
Como eu tiro espaços no ínicio dos Edits, quando alguém digitar algo.
valeu.
Giovani
Curtir tópico
+ 0
Responder
Posts
13/11/2003
Omero
no evento onExit do Edit faça o seguinte código;
var S: string;
begin
S := Edit1.Text;
while S[1] = ´ ´ do delete(S, 1, 1);
Edit1.Text := S;
end;
var S: string;
begin
S := Edit1.Text;
while S[1] = ´ ´ do delete(S, 1, 1);
Edit1.Text := S;
end;
Responder
Gostei + 0
13/11/2003
Marcelo Saviski
ou
[b:fb2ed4f49b]TrimLeft [/b:fb2ed4f49b]tira os Espaços a esquerda;
[b:fb2ed4f49b]TrimRight [/b:fb2ed4f49b]tira os espaços a direita;
[b:fb2ed4f49b]Trim [/b:fb2ed4f49b]tira os espaços a esquerda e a direita;
Edit.Text := TrimLeft(Edit.Text)
[b:fb2ed4f49b]TrimLeft [/b:fb2ed4f49b]tira os Espaços a esquerda;
[b:fb2ed4f49b]TrimRight [/b:fb2ed4f49b]tira os espaços a direita;
[b:fb2ed4f49b]Trim [/b:fb2ed4f49b]tira os espaços a esquerda e a direita;
Responder
Gostei + 0
Clique aqui para fazer login e interagir na Comunidade :)