MaskEdit

Delphi

12/08/2003

Fiz uma consulta entre datas e usei dois MaskEdit’s (mascarados como __/__/__ ) para a entrada das datas.
O problema é que se a pessoa não colocar a data completa (dd/mm/yy) dá erro na Query. Se ela colocar por exemplo dd/mm/__
Se ela esquecer algum dos 6 números dá erro na Query.

Como faço para corrigir este problema?

Valeu galera

Denysk


Denysk

Denysk

Curtidas 0

Respostas

Skaarj

Skaarj

12/08/2003

Minha pior situacao é estar sem delphi, mas tente isso..

No Onexit do MaskEdit, coloque

var
var_t:string;
begin
var_t:=copy (7,7.maskedit1.text);
//consequentemente o caracter copiado será um ´_´
if var_t=´_´ then
begin
var_t:= copy(0,6,maskedit1.text)+´2003´;
maskedit1.text:=var_t;
end;

Espero q tenha ajudado..


GOSTEI 0
POSTAR