delphi4arab منتديات دلفي للعرب
برنامج لا تنسى صلاتك النسخة الجديدة - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي الأخرى (https://delphi4arab.net/forum/forumdisplay.php?fid=4)
+--- قسم : برامج دلفي من عمل الأعضاء (https://delphi4arab.net/forum/forumdisplay.php?fid=27)
+--- الموضوع : برنامج لا تنسى صلاتك النسخة الجديدة (/showthread.php?tid=5457)

الصفحات: 1 2 3 4


برنامج لا تنسى صلاتك النسخة الجديدة - bobo - 22-03-2014

السلام عليكم
بارك الله فيك onexite على هذه المجهودات الجبارة.
أود ان تنشر الكود سورس للبرنامج من فضلك خاصة كود سورس مواقيت الصلاة للشهر.
شكرا لك


برنامج لا تنسى صلاتك النسخة الجديدة - bobo - 22-03-2014

رائع يا يا أخي
الإضافات التي قمت بها مفيدة جدا خاصة تحديد الموقع من Map.
نود أن تنشر الكود سورس يا onexite لكي يتسنا لنا التعلم.
بارك الله فيكم.


برنامج لا تنسى صلاتك النسخة الجديدة - seddik_xp - 23-03-2014

السلام عليكم و رحمة الله و بركاته
كل الشكر للأخ onexite على البرنامج الرائع.

لكنه واجهتني مشكلة على الويندوز 7 .
عند تشغيل البرنامج لاول مرة كمسؤول ينم إضافته لبدء تشغيل النظام لكن عند إعادة تشغيل النظام ينطلق البرنامج بشكل عادي لكنه بسألك عن إضافة البرنامج لبدئ التشغيل مع انه كذلك .
المشكل يعود لكون البرنامج عند بدء التشغيل لا يشعل كمسؤول أي انه لا يمكنه قراءة قيمة مفتاح من الرجيستري :
كود :
[HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]

كون البرنامج لا يملك صلاحيلات المسؤول

لذلك و جب تغيير طريقة التحقق من وجود القيمة في الرجيستري
كود :
من OpenKey الي OpenKeyReadOnly

أو هناك حل أخر يمكنك من اضافة البرنامج لبدء التشغيل بدون صلاحيات المدير و هذا بتغيير المفتاح الي
كود :
[HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Run] بدل [HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\Run]

في هذه الحالة سيتم اضافة البرنامج لبدئ التشغيل للمسخدم الحالي فقط.


برنامج لا تنسى صلاتك النسخة الجديدة - onexite - 23-03-2014

seddik_xp كتب :لكنه واجهتني مشكلة على الويندوز 7 .
المشكل يعود لكون البرنامج عند بدء التشغيل لا يشعل كمسؤول أي انه لا يمكنه قراءة قيمة مفتاح من الرجيستري :[CODE][HKEY_LOCAL_MACHINE\SOFTWARE
شكرا على الملاحظة قمت بتغيير OpenKey الان جرب


برنامج لا تنسى صلاتك النسخة الجديدة - seddik_xp - 24-03-2014

شكرا أخ onexite لقد تم حل المشكلة الأولى
أي ان الرسالة التي تفيد بإضافة البرنامج الى بدء التشغيل لم تعد تظهر بعد الاضافة .

كود :
هل تريد اضافة البرنامج الى برامج بدأ التشغيل


لكن بقيت الرسالة التى تليها و التي تؤكد على ان مسار البرنامج تغير


كود :
تم اكتشاف ان مسار البرنامج تغير وهذا يؤثر على تشغيله مع بدأ التشغيل اذن هل تريد اضافته البرنامج الى برامج بدأ التشغيل ؟


لذلك يجب نفس التغيير لإجراءية التحقق التي تظهر الرسالة الثانية.


برنامج لا تنسى صلاتك النسخة الجديدة - onexite - 24-03-2014

PHP كود :
Procedure SetRunAsAdminFlag(PathToExe: String);
Var
  
Reg: TRegistry;
Begin
if ((GetOSInfo ='Windows 7 ')or (GetOSInfo ='Windows 8 ')or (GetOSInfo ='Windows Vista ')
or  (
GetOSInfo ='Windows Server 2008 ')or (GetOSInfo ='Windows Server 2008 R2 ')
or  (
GetOSInfo ='Windows Server 2012 '))
then begin
  Reg 
:= TRegistry.Create( KEY_WRITE );
  
with Reg do
  try
    try
      
RootKey := HKEY_CURRENT_USER;
      if 
OpenKey('Software\Microsoft\Windows NT\CurrentVersion\AppCompatFlags\Layers', True) then
       WriteString
( PathToExe, 'RUNASADMIN' );
    finally
      
CloseKey;
      
Free;
    
end;
  
except
    
Exit;
  
end;
end;

End; 

PHP كود :
function regchanged(sProgTitle,sCmdLine:string): Boolean;
begin
 with TRegIniFile
.Create(KEY_READ OR KEY_WOW64_64KEY) do begin
 
try
  
RootKey := HKEY_LOCAL_MACHINE;
  IF 
OpenKeyReadOnly('\Software\Microsoft\Windows\CurrentVersion\Run') THEN
       
if ReadString('Software\Microsoft\Windows\CurrentVersion\Run', sProgTitle, '')<>bWin(sCmdLine)+' /hide' then
 result
:=True else Result:=False;
 finally
   
Free;
 
end;

 
end;
end; 



برنامج لا تنسى صلاتك النسخة الجديدة - onexite - 25-03-2014

استطيع تشغيله كمسؤوول
PHP كود :
<security>
      <
requestedPrivileges>
        <
requestedExecutionLevel
          level
="requireAdministrator"
          
uiAccess="false"/>
        </
requestedPrivileges>
    </
security> 
لاكن لن ينطلق مع تشغيل الحاسب في حالة كان مستوى الامان مرتفع


برنامج لا تنسى صلاتك النسخة الجديدة - seddik_xp - 30-03-2014

الان قمت بتحميل اخر اصدار من الموقع مباشرة تعمل بشكل جيد حتى انها لا تحتاح لصلاحية المسؤول لتضاف لبدء التشغيل .

بقيت نقطة بسيطة لاحضتها الوم صباحا و حي ان البرنامج يؤذن لتويت شروق الشمس
الرجاء التعديل الى تنبيه فقط

ارى بعض النقائص ساوردها في ردود اخرى حى يكتمل العمل

شكرا مرة اخرى على العمل الرائع


برنامج لا تنسى صلاتك النسخة الجديدة - djsalam - 11-04-2014

شكرا جزيلا على البرنامج
باي لغة برمجة تم,,,


برنامج لا تنسى صلاتك النسخة الجديدة - onexite - 25-08-2014

djsalam كتب :باي لغة برمجة تم,,,
طبعا بالدلفي اخي العزيز