Converter string em date URGENTE POR FAVOR!
Como faço para corverter string em date, estou fazendo o seguinte:
StrToDate(MaskEdit1.Text);
o problema é que esse MaskEdit tem uma mascara de data, então ele mantem as barras para separar dia/mes/ano, e não aceita, alguém pode me ajudar por favor.
Obrigado
StrToDate(MaskEdit1.Text);
o problema é que esse MaskEdit tem uma mascara de data, então ele mantem as barras para separar dia/mes/ano, e não aceita, alguém pode me ajudar por favor.
Obrigado
Janete
Curtidas 0
Respostas
Rafael Roni
26/05/2003
defina uma variavel como Variant
e carregue esse valor
ex:
var
teste : Variant
begin
teste:=maskedit1.text;
end;
mais tarde eu testo se não der certo vou verificar como fazer
Um abraço!
e carregue esse valor
ex:
var
teste : Variant
begin
teste:=maskedit1.text;
end;
mais tarde eu testo se não der certo vou verificar como fazer
Um abraço!
GOSTEI 0
Rafael Roni
26/05/2003
Acabei de testar se for isso funciona despois de carregar a variavel teste
com o maskedit use a conversão vartodate;
ex:
procedure TForm1.Button1Click(Sender: TObject);
var
teste : variant;
begin
teste:=maskedit1.text;
DateTimePicker1.Date:=VarToDateTime(teste);
showmessage(´se for isso que vc quer´);
end;
end.
com o maskedit use a conversão vartodate;
ex:
procedure TForm1.Button1Click(Sender: TObject);
var
teste : variant;
begin
teste:=maskedit1.text;
DateTimePicker1.Date:=VarToDateTime(teste);
showmessage(´se for isso que vc quer´);
end;
end.
GOSTEI 0