procedure TForm1.Button1Click(Sender: TObject);
var
variavel1: string;
variavel2: TDate;
begin
variavel1:= '03/06/2006';
ShowMEssage(Variavel1);
variavel2:= StrToDate(variavel1);
ShowMessage(FormatDate('dd/MM/yyyy',Variavel2));
end;
Allan <[EMAIL PROTECTED]> escreveu:
Cleiton, segue:
procedure TForm1.Button1Click(Sender: TObject);
var
variavel1: string;
variavel2: TDate;
begin
variavel1:= '03/06/2006';
ShowMEssage(Variavel1);
variavel2:= StrToDate(variavel1);
ShowMessage(DateToStr(Variavel2));
end;
Fiz agora e funciona blz, só que ele tira os zeros.Qual é o pb???Fiz com D6.
[]'s
Allan
----- Original Message -----
From: Cleiton
To: Delhpi
Sent: Wednesday, May 10, 2006 1:48 PM
Subject: [SPAM] [delphi-br] Conversão De String Para Data
Olá pessoal...
Estou com um pequeno probleminha e gostaria de saber se alguém poderia me ajudar.
O que estou querendo fazer e que não está dando é converter uma string (03/06/2006) para o tipo date. Nem sei se isso é possível mas estou tentando da seguinte forma e que não está dando certo.
var
variavel 1: string;
variavel 2: TDate;
begin
variavel 1:= '03/06/2006';
variavel 2:= StrToDate(variavel1);
end;
Acontece que a variavel 2 está assumindo o valor 38871.
Alguem poderia me ajudar a resolver esse pequeno problema?
Um grande abraço a todos
Cleiton
--
Esta mensagem foi verificada pelo sistema de antivírus e
acredita-se estar livre de perigo.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
------------------------------------------------------------------------------
Links do Yahoo! Grupos
a.. Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
Links do Yahoo! Grupos
---------------------------------
Abra sua conta no Yahoo! Mail - 1GB de espaço, alertas de e-mail no celular e anti-spam realmente eficaz.
[As partes desta mensagem que não continham texto foram removidas]
--
<<<<< 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]
| 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!.
