Ver Mensaje Individual
  #1  
Antiguo 11-08-2012
novato_erick novato_erick is offline
Miembro
 
Registrado: ago 2010
Ubicación: Panamá
Posts: 396
Reputación: 14
novato_erick Va por buen camino
Procedimiento en de validacion

Nuevamente Saludos a Todos:

Se creo este procedimiento en mi formulario para validar campos:

Código Delphi [-]
procedure TfrmIArticulo.IngresoNumeros(Sender: TObject; var Key: Char);
begin
 if (key <#48) or (key >#57) then  // si mi numeros son mayor a 0 y menor a 9 entonces
 begin
    showmessage ('Error solo Numeros');
    key :=#0;
  end;
end;

en teoria tengo entendido que solamente al llamar este procedimiento funcional en el evento OnkeyPress del dbEdit deberia de funcionar:

Código Delphi [-]
procedure TfrmIArticulo.dbedtCod_BarraKeyPress(Sender: TObject; var Key: Char);

begin
IngresoNumeros;
end;

pero me manda este error: [DCC Error] IArticulos.pas(113): E2035 Not enough actual parameters

que sucede? Parametro?


//Saludos
Responder Con Cita