Contar strings em DBEdits

Delphi

12/07/2004

como é q eu faço pra contar qtos números estão em um Dbedit????


Piassa

Piassa

Curtidas 0

Respostas

Adeno

Adeno

12/07/2004

Como assim quantos números? vc quer contar o conteúdo de um DBEdit? tipo função Length?


GOSTEI 0
Lucas Silva

Lucas Silva

12/07/2004

procedure TForm1.Button1Click(Sender: TObject);
var i,n: integer;
    palavra: String;
begin
   n := 0;
   palavra := edit1.text;
   for i:= 0 to Length(palavra) do
    if palavra[i] in [´0´..´9´]  then
     Inc(n);

    ShowMessage(´No edit tem ´+IntToStr(n)+´ números´);
end;



GOSTEI 0
Piassa

Piassa

12/07/2004

Como assim quantos números? vc quer contar o conteúdo de um DBEdit? tipo função Length?




isso mesmo kra, função lenght , tentei fazer, mas tv dando erro


GOSTEI 0
Paulo_amorim

Paulo_amorim

12/07/2004

isso mesmo kra, função lenght , tentei fazer, mas tv dando erro


Olá

Que erro!?
Explique melhor ae...

Até+


GOSTEI 0
POSTAR