Delphi Memdata Date ?

[KOROGLUCW]

DateSeparator :='/';
Txt_Okudizi:= ansileftstr(degeriki,2)+DateSeparator+ansimidstr(degeriki,3,2)+DateSeparator+ansirightstr(degeriki,4);


şöyle bir şey yazdım i'nin değerine atıyorum.
Ama alanı açarken ftDate olarak açmaktayım. Tarih alanı diye.
Ama şöyle bir sorunla karşılaşıyorum.
DateSeparator normalde ben tanımlıyorum '/' bu olsun diye ama genede verilieri '.' formatında açıyor.

Normalde 01/01/2010 olacağına 01.01.2010 olarak cxgrid yansıtmaktadır.
nerde hata yapıyorum ki.
Zaten
şöyle de yaptım

tarih diye Tdate; var bloğunda tanımlama yaptım.
sonra

tarih := StrToDate(ansileftstr(degeriki,2)+DateSeparator+ansimidstr(degeriki,3,2)+DateSeparator+ansirightstr(degeriki,4));
Txt_Okudizi:= DateToStr(tarih);


formatında atıyorum ama zaten tarih değişkenine atama yaparken '.' çevirmektedir.
Hata nerde ama yazılımcı abey şöyle dedi sistemin formatına çeviriyor o yüzden '/' ler '.''ya çevrilmektedir dedi.
Ne gibi bir şey yapmam lazim ki?

FormatDate benzeri bir yöntem kullansam olmaz mı?

VeSSeLaM.