برنامج مواقيت الصلاة لكل ولايات الوطن ( للجزائر فقط )
#31
لتغيير ترميز الوقت ( ؛حذف AM/PM )
PHP كود :
procedure TimeFormat(_RestartThisApp: Boolean=False) ;
 var
 
Section: string;
 
begin
   Section 
:= 'Control Panel\International' ;
   
with TRegIniFile.Create('') do
     try
       
RootKey := HKEY_CURRENT_USER;
      if 
LowerCase(ReadString(Section, 'sTimeFormat', 'HH:mm:ss'))<>'hh:mm:ss' then begin
       WriteString
(Section, 'sTimeFormat', 'HH:mm:ss') ;
       
WriteString(Section, 's1159', '') ;
       
WriteString(Section, 's2359', '') ;
       if 
_RestartThisApp then
       Form1
.RestartThisApp;
      
end;
     finally
       
Free;
     
end;
 
end; 
PHP كود :
procedure TForm1.FormCreate(Sender: TObject);
begin
TimeFormat
(True); 
رابط التحميل ( السورس كامل مع الملف التطبيقي )
PHP كود :
http://www.mediafire.com/download/tg8dd8dba4sphab/ALPHA_SRC%26BIN.rar 
الرد


الردود في هذا الموضوع
برنامج مواقيت الصلاة لكل ولايات الوطن ( للجزائر فقط ) - بواسطة onexite - 07-09-2014, 01:11 PM

التنقل السريع :


يقوم بقرائة الموضوع: بالاضافة الى ( 1 ) ضيف كريم