Eduardo, como eu posso explicar para o diretor financeiro da Amil, que o ERP que eles tem funciona com qualquer formato de data e o meu sistema não.
Pelo menos no meu ponto de vista, não é o usuário que tem que se adaptar ao meu software e sim o meu software se adaptar ao usuário. Quando o separador de milhar é ',' você pode para ele mudar também ? Acho que isto é uma questão de opinião, respeito a sua, mas não posso concordar com ela, já que existe inúmeras maneiras de contornar problemas como este. Eduardo Eduardo Silva dos Santos escreveu: > > Então Eduardo Castro, pra evitar esse problema com o farmata das datas eu > criei essa rotina: > > if AnsilowerCase( ShortTimeFormat ) <> 'hh:mm' then begin > Aviso( 'O Formato da hora em seu computador não está no padrão hh:mm, > exemplo 09:57.' + #13 + > 'Mude para esse formato nas configurações regionais no painel de > controle.' ); > ExecuteFile( 'Control.exe', 'intl.cpl' ); > Application.Terminate; > end; > > if AnsilowerCase( ShortDateFormat ) <> 'dd/mm/yyyy' then begin > Aviso( 'O Formato da data em seu computador não está no padrão > dd/mm/yyyy, exemplo 14/01/1981.' + #13 + > 'Mude para esse formato nas configurações regionais no painel de > controle.' ); > ExecuteFile( 'Control.exe', 'intl.cpl' ); > Application.Terminate; > end; > > Em 10/05/07, Eduardo Castro Alves <[EMAIL PROTECTED] > <mailto:ecastroa_edu%40yahoo.com.br>> escreveu: > > > > Isto não da aplicação e sim as configurações regionais do Windows, então > > > > cada usuário do sistema operacional usa de um jeito. > > > > Em uma empresa que eu trabalhei, tive um problema exatamente por causa > > disso, teve um "infeliz" que usava a data com o formato "mm-dd/yyyy", o > > usuario disse que tinha varios softwares e todos funcionavam com este > > formato de data, então por que o meu sistema não poderia funcionar > assim. > > > > Passei a usar sempre Decode e Encode quando trabalho com data e sempre > > tentou prever este tipo de situação. > > > > Eduardo > > > > Eduardo Silva dos Santos escreveu: > > > > > > acho que ninguem usa data nesse formato. pelo menos nunca vi em > > aplicações > > > comerciais. > > > > > > Em 10/05/07, Eduardo Castro Alves <[EMAIL PROTECTED] > <mailto:ecastroa_edu%40yahoo.com.br><ecastroa_edu%40yahoo.com.br> > > > <mailto:ecastroa_edu%40yahoo.com.br>> escreveu: > > > > > > > > Se a data estiver no formato "mm/dd/aaaa" não vai funcionar desta > > forma, > > > > > > > > quando li a pergunta foi a primeira coisa que pensei tb. > > > > > > > > Eduardo > > > > > > > > Eduardo Silva dos Santos escreveu: > > > > > > > > > > que tal assim: > > > > > > > > > > Try > > > > > StrToDate( '01/' + MaskEdit.Text ); > > > > > except > > > > > ShowMessage( 'Data inválida' ); > > > > > end; > > > > > > > > > > simples e rasteiro, > > > > > > > > > > Em 09/05/07, Eduardo Castro Alves <[EMAIL PROTECTED] > <mailto:ecastroa_edu%40yahoo.com.br><ecastroa_edu%40yahoo.com.br> > > > <mailto:ecastroa_edu%40yahoo.com.br><ecastroa_edu%40yahoo.com.br> > > > > > <mailto:ecastroa_edu%40yahoo.com.br>> escreveu: > > > > > > > > > > > > Ve se ajuda. > > > > > > > > > > > > if (Trim(Copy(MaskEdit1.Text, 2))) <> '' then > > > > > > case StrToInt(Trim(Copy(MaskEdit1.Text, 2))) of > > > > > > 1..12 : Null > > > > > > else > > > > > > ShowMessage('Data invalida !'); > > > > > > end; > > > > > > //ou > > > > > > if (Trim(Copy(MaskEdit1.Text, 2)) <> '') and > > > > > > ((StrToInt(Trim(Copy(MaskEdit1.Text, 2))) < 1) or > > > > > > (StrToInt(Trim(Copy(MaskEdit1.Text, 2))) > 12)) then > > > > > > ShowMessage('Data invalida'); > > > > > > > > > > > > Eduardo > > > > > > > > > > > > Raphae Fonseca escreveu: > > > > > > > > > > > > > > Boa tarde amigos da lista > > > > > > > > > > > > > > preciso de uma ajuda de vcs. num maskeit eu mm/aaaa. > > > > > > > > > > > > > > gostaria de fazer a critica se por acaso o usuário digitar > > > 13/2007, > > > > > > > dando uma mensagem de erro. > > > > > > > > > > > > > > algum amigo poderia me ajudar?? > > > > > > > > > > > > > > Raphael > > > > > > > > > > > > > > __________________________________________________ > > > > > > > Fale com seus amigos de graça com o novo Yahoo! Messenger > > > > > > > http://br.messenger.yahoo.com/ > <http://br.messenger.yahoo.com/> > > > <http://br.messenger.yahoo.com/ <http://br.messenger.yahoo.com/>> > <http://br.messenger.yahoo.com/ <http://br.messenger.yahoo.com/> > > > <http://br.messenger.yahoo.com/ <http://br.messenger.yahoo.com/>>> > > > > > <http://br.messenger.yahoo.com/ > <http://br.messenger.yahoo.com/> <http://br.messenger.yahoo.com/ > <http://br.messenger.yahoo.com/>> > > > <http://br.messenger.yahoo.com/ <http://br.messenger.yahoo.com/> > <http://br.messenger.yahoo.com/ <http://br.messenger.yahoo.com/>>>> > > > > > > > > > > > > > > [As partes desta mensagem que não continham texto foram > > removidas] > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > > > Eduardo Silva dos Santos > > > > > DRD Sistemas. > > > > > (27) 3218-4201 > > > > > MSN: [EMAIL PROTECTED] <mailto:eduardo.drd%40gmail.com> > <eduardo.drd%40gmail.com> <mailto:eduardo.drd%40gmail.com> > > > > > <eduardo.drd%40gmail.com> <mailto:eduardo > > > > .drd%40gmail.com> > > > > > Site: http://www.drdsistemas.com/ > <http://www.drdsistemas.com/> <http://www.drdsistemas.com/ > <http://www.drdsistemas.com/>> > > > <http://www.drdsistemas.com/ <http://www.drdsistemas.com/> > <http://www.drdsistemas.com/ <http://www.drdsistemas.com/>>> > > > > > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > > > > > > > > > > > > > > > -- > > > Eduardo Silva dos Santos > > > DRD Sistemas. > > > (27) 3218-4201 > > > MSN: [EMAIL PROTECTED] <mailto:eduardo.drd%40gmail.com> > <eduardo.drd%40gmail.com> <mailto:eduardo > > .drd%40gmail.com> > > > Site: http://www.drdsistemas.com/ <http://www.drdsistemas.com/> > <http://www.drdsistemas.com/ <http://www.drdsistemas.com/>> > > > > > > [As partes desta mensagem que não continham texto foram removidas] > > > > > > > > > > > > > > -- > Eduardo Silva dos Santos > DRD Sistemas. > (27) 3218-4201 > MSN: [EMAIL PROTECTED] <mailto:eduardo.drd%40gmail.com> > Site: http://www.drdsistemas.com/ <http://www.drdsistemas.com/> > > [As partes desta mensagem que não continham texto foram removidas] > >