Por que vc não usa uma form mesmo e no form coloca um maskedit???


On Wed, 19 Jan 2005 14:35:31 -0400, Rondinelle Lima Bispo
<[EMAIL PROTECTED]> wrote:
> Boa Tarde a Todos da lista, amigos estou com um inputbox e gostaria q o
> usuario entrasse com apenas caracteres do tipo data Ex: 19/01/2005 e mais
> nada, alguem pode me passar essa dica?
> 
> procedure TPedidos.BPesquisarClick(Sender: TObject);
> var
> LNome : String;
> begin
> If RGPor.ItemIndex = 0 then
>   begin
>    LNome:= UpperCase(inputbox('Pesquisar','Digite a Data do Pedido a ser
> pesquisado. Ex 99/99/9999',''));
>   end;
> If RGPor.ItemIndex = 1 then
>   begin
>    LNome:= UpperCase(inputbox('Pesquisar','Digite o nome do Requerente a ser
> pesquisado',''));
>   end;
> If RGPor.ItemIndex = 2 then
>   begin
>    LNome:= UpperCase(inputbox('Pesquisar','Digite o nome do Funcionário a
> ser pesquisado',''));
>   end;
> if LNome <> '' then
>   begin
> ////////////
> 
> 
> 
> 
> -- 
> <<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
> 
> Para ver as mensagens antigas, acesse:
> http://br.groups.yahoo.com/group/delphi-br/messages
> 
> Para falar com o moderador, envie um e-mail para:
> [EMAIL PROTECTED] ou [EMAIL PROTECTED]
> 
> 
> 
> Yahoo! Grupos, um serviço oferecido por:
>  
> ________________________________
> Links do Yahoo! Grupos
> Para visitar o site do seu grupo na web, acesse:
> http://br.groups.yahoo.com/group/delphi-br/
>   
> Para sair deste grupo, envie um e-mail para:
> [EMAIL PROTECTED]
>   
> O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do
> Yahoo!. 


-- 
[]'s

Emerson Moreno
Mascate Automação
Desenvolvedor





-- 
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>

Para ver as mensagens antigas, acesse:
 http://br.groups.yahoo.com/group/delphi-br/messages

Para falar com o moderador, envie um e-mail para:
 [EMAIL PROTECTED] ou [EMAIL PROTECTED]
 
Links do Yahoo! Grupos

<*> Para visitar o site do seu grupo na web, acesse:
    http://br.groups.yahoo.com/group/delphi-br/

<*> Para sair deste grupo, envie um e-mail para:
    [EMAIL PROTECTED]

<*> O uso que você faz do Yahoo! Grupos está sujeito aos:
    http://br.yahoo.com/info/utos.html

 



Responder a