Foros Club Delphi - problema manejando datos =(

Foros Club Delphi (https://www.clubdelphi.com/foros/index.php)

- Conexión con bases de datos (https://www.clubdelphi.com/foros/forumdisplay.php?f=2)

- - problema manejando datos =( (https://www.clubdelphi.com/foros/showthread.php?t=3812)

CI>140

20-09-2003 15:42:12

problema manejando datos =(

tengo un problema, quiero saber como puedo restringir que en un tedit.text pueda yo solo escribir numeros y no letras ya que en mi tabla tiene que llenarse por numeros (campo numerico y moneda).

de igual forma como hago que si enuna tabla tengo un campo en formato memo sea visto en un dbgrid

marcoszorrilla

20-09-2003 15:51:14

Un TEdit lmitado para entrar números
Pon este código en el evento OnKeyPress de tu TEdit y sólo admitirá números:

Código:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

          begin

            if ( StrScan('0123456789.-',Key) <> nil ) or

               ( Key = Char(VK_BACK) ) then { BackSpace Key }

            begin

              {Aqui tu tratamiento normal del evento}

              {Here the normal event treatment}

            end

            else

              Key := #0;

          end;

Un Saludo.

roman

20-09-2003 20:08:33

Una forma muy parecida a la de marcoszorrila pero que me parece un poquito más clara:

Código:

procedure TForm1.Edit1KeyPress(Sender: TObject; var Key: Char);

begin

  if Key in ['0'..'9', '.', '-', Char(VK_BACK)] then

  begin

    { Tratamiento normal del evento }

  end

  else

    Key := #0;

end;

// Saludos

Cabanyaler

22-09-2003 09:27:35

Tambien puedes utilizar los componentes TCurrencyEdit y trabajar con su propiedad DisplayFormat del modo ,0.00 ;-,0.00, de esta forma sólo te admitira números positivos o negativos con dos decimales.

__cadetill

22-09-2003 09:56:16

Cita:

Posteado originalmente por Cabanyaler
Tambien puedes utilizar los componentes TCurrencyEdit

Sólo aclarar que este componente pertenece a las RX (para que nadie ande loco buscándolo por los componentes estándars de Delphi)

La franja horaria es GMT +2. Ahora son las 11:10:50.