Essa função não considera número negativo ?
________________________________ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Nicolas Enviada em: sexta-feira, 25 de julho de 2008 16:02 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] duvidas sobre strings Desculpe pessoal, de tanto usar já tava achando que era função nativa, tá aqui o fonte da função: Function IsNumeric(const s: string): boolean; var i: integer; begin Result := True; for i:=1 to length(s) do if not (s[i] in ['0'..'9']) then begin Result := False; Break; end; end; []s Alexandre ----- Original Message ----- From: Rubem Nascimento da Rocha To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Sent: Friday, July 25, 2008 3:43 PM Subject: RE: [delphi-br] duvidas sobre strings Em qual unit tá definida essa função? Já revirei o help do Delphi de cabo a rabo e num achei nada! Sds. ________________________________ To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> From: [EMAIL PROTECTED] <mailto:nicolas%40qualitysystem.com.br> Date: Fri, 25 Jul 2008 15:39:42 -0300 Subject: Re: [delphi-br] duvidas sobre strings Ops, é isnumeric( ) alexandre ----- Original Message ----- From: fabio giro To: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Sent: Friday, July 25, 2008 3:32 PM Subject: Re: [delphi-br] duvidas sobre strings Onde está a função IsNumber? --- Em sex, 25/7/08, Nicolas <[EMAIL PROTECTED] <mailto:nicolas%40qualitysystem.com.br> > escreveu: De: Nicolas <[EMAIL PROTECTED] <mailto:nicolas%40qualitysystem.com.br> > Assunto: Re: [delphi-br] duvidas sobre strings Para: delphi-br@yahoogrupos.com.br <mailto:delphi-br%40yahoogrupos.com.br> Data: Sexta-feira, 25 de Julho de 2008, 14:11 e eu ainda acrescentaria: if (isnumber(Edit1. text) ) and (Length(Edit1. text)=Edit1. MaxLenght) then showmessage( 'é igual´); []s alexandre ----- Original Message ----- From: Luciano Calenzani Simões To: [EMAIL PROTECTED] os.com.br Sent: Friday, July 25, 2008 1:47 PM Subject: Res: [delphi-br] duvidas sobre strings if Length(Trim( Edit1.Tex) ) = Edit1.MaxLength then showmessage( 'É igual!') Luciano Calenzani Simões ----- Mensagem original ---- De: Leonardo Baldino Para: Grupo_Delphi Enviadas: Sexta-feira, 25 de Julho de 2008 10:12:01 Assunto: [delphi-br] duvidas sobre strings eu tenho um edit e eu preciso verificar se todos os espaço disponivel dentro do edit foi preenchido por numero inteiros, por isso eu gostaria de saber se alguem sabe como eu posso fazer isso -- Leonardo Carlos Baldino - The Highlander __________________________________________________________ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br <http://mobile.live.com/signup/signup2.aspx?lc=pt-br> No virus found in this incoming message. Checked by AVG - http://www.avg.com <http://www.avg.com> Version: 8.0.138 / Virus Database: 270.5.6/1572 - Release Date: 25/7/2008 06:51 [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]