Conversion de String a fecha

[pmtzg]

mi pregunta es la siguiente

si tengo en delphi


Código Delphi [-]
fecha : TdateTime;
str : string;
str:= '01/01/2007';

fecha :=StrtoDate(str);
edit1.text:=FormatDateTime('dd/MMM/yy',fecha);





me convierte el string a formato fecha y lo formateo
y queda de la siguiente manera 01/Ene/07

pero si lo quiero regresar de formato 01/Ene/07 a 01/01/07
Como le Hago , hay alguna opcion o funcion ... gracias

[marcoszorrilla]

Código Delphi [-]
Edit1.Text:=FormatDateTime('dd/mmm/yyyy',Fecha);
Edit1.Text:=FormatDateTime('dd/mm/yyyy',Fecha);

Un Saludo.

[pmtzg]

me marca error 01/Ene/07 is not valid date

ya lo hice

gracias

[marcoszorrilla]

Código Delphi [-]
procedure TForm1.Button1Click(Sender: TObject);
var
Fecha:Tdate;
begin
Fecha:=Date;
edit1.text:=FormatDateTime('dd/MMM/yy',fecha);
edit2.text:=FormatDateTime('dd/MM/yy',fecha);
end;

Un Salud.

[pmtzg]

me sigue marcando error +

me dice raised exeption class EconvertError whit message "01/Ene/07"
is not valid date

[marcoszorrilla]

Date cuenta que trabajo con la variable fecha, no con el Edit, puesto que el texto que contiene no puede transformarse a fecha.

Un Saludo.