delphi4arab منتديات دلفي للعرب

السلام عليكم
عند طباعة التقرير باستعمال الكويك ربور يظهر التاريخ بشكل اللغة الفرنسية 12/06/2012 و المطلوب هو الشكل العربي 2012/06/12
استعملت السلاسل النصية و الان أريد كيفية تغير التاريخ الى الحروف على هذا الشكل 12 جوان 2012.
هل من مساعدة ؟

PHP كود :
const

mldmnth       : array[1..12] of string = ('جانفي','فيفري','مارس','أفريل','ماي','جوان','جويلية','اوت','سبتمبر','اكتوبر','نوفمبر','ديسمبر');
days          : array[1..7]  of string = ('الأحد','الإثنين','الثلاثاء','الأربعاء','الخميس','الجمعة','السبت');


Function DateArabe(Today : TDateTime): String;
var
    d,m,y : word; s:string;
begin
  DecodeDate(today,y,m,d);
  s:= days[DayOfWeek(today)];
  s := s + ' ' + IntToStr(d);
  s := s + ' ' + mldmnth[m];
  s := s + ' ' + IntToStr(y);
  Result := s;
end; 

بارك الله فيك اخي

للاضافة

عبدالله منداس

onexite

nadirzeghni