Apagar somente os espaços em branco de um Dbedit

Delphi

09/04/2003

Como faco para apagar somente os espaços em brancos dos Dbedits pois sempre que cadastro ou salvo a altereção ele apresenta um erro de edição

grato

falow
Hacson Alexandre


Hacson Menezes

Hacson Menezes

Curtidas 0

Melhor post

Anonymous

Anonymous

09/04/2003

dbEdit1.Text := Trim(dbEdit1.Text);



GOSTEI 1

Mais Respostas

Fbsouza

Fbsouza

09/04/2003

Hacson,

no evento onexit do Dbedit coloque o seguinte codigo
var x:string;
.
.
x:=dbedit1.text;
while pos(´ ´,x)>0 do delete(x,pos(´ ´,x),1);
dbedit1.text:=x;


Faz isto que da certo.
Falo


GOSTEI 0
Anorex

Anorex

09/04/2003

tente usar o comando stringreplace.


GOSTEI 0
POSTAR