المشاركات : 59
المواضيع 20
:
: 4
الإنتساب : Oct 2011
السلام عليكم ورحمة الله وبركاتة
أمر form11.Hide
الأستفسار الاول اخفاء البرنامج عن الأعين بحيث عند ضغط يعمل البرنامج لاكن لايضهر وتشغيله مع بدء التشغيل
------
والأستفسار الثاني نسخ نفسه في مكان ماء احدده
المشاركات : 654
المواضيع 34
:
: 106
الإنتساب : Aug 2010
وعليكم السلام
لا أعرف إلى ماذا تلمح بالضبط
إذا كان إخفاء النماذج (Forms) فالأمر سهل
أما إذا كنت تقصدإخفاء العملية (من إدارة المهام) فالأمر ليس سهل
للإستزادة راجع:
إخفاء البرنامج بالدلفي
http://delphi4arab.net/forum/showthread.php?tid=3684
كيف اجعل بروسيس برنامجي لا يظهر في task manager -مديرالمهام
http://delphi4arab.net/forum/showthread.php?tid=370
سبحان الله وبحمده سبحان الله العظيم
المشاركات : 59
المواضيع 20
:
: 4
الإنتساب : Oct 2011
15-09-2016, 10:57 AM
(آخر تعديل لهذه المشاركة: 15-09-2016, 12:29 PM بواسطة Admin.)
يعطيك العافية
إقتباس :إذا كان إخفاء النماذج (Forms) فالأمر سهل
نعم هذا هو المقصد لاكن جميع الفورمات داخل البرنامج لاتضهر form1 form2 form3 الخ ..
لأن انا مخفيه بالطريقة المؤقت عن طريق التايمر ضايف hide لاكن هل فيه طرق اخرى
-
والشي الثاني كيف اجعل برنامج يعمل مع بدء التشغيل بكل انظمة ويندوز 8 7 xp 10
المشاركات : 654
المواضيع 34
:
: 106
الإنتساب : Aug 2010
ما الغاية من إخفائها
وهل ستظهر في حدث معين
أم أنك لا تحاجها وضح أكثر لنفهم ما تريد أن تفعل بالضبط
سبحان الله وبحمده سبحان الله العظيم
المشاركات : 259
المواضيع 35
:
: 383
الإنتساب : Feb 2011
السلام عليكم
ألق إطلالة على المقال التالي وهو بالأعجمية:
http://w-shadow.com/blog/2006/09/21/hidi...skmanager/
والله هو الموفق.
الخوف من أي محاولة جديدة طريق حتمي للفشل.
المشاركات : 654
المواضيع 82
:
: 57
الإنتساب : Mar 2011
16-09-2016, 09:40 AM
(آخر تعديل لهذه المشاركة: 16-09-2016, 09:42 AM بواسطة onexite.)
PHP كود :
اضافة الى بدأ التشغيل
uses
Registry;
procedure SetAutoStart(AppName, AppTitle: string; bRegister: Boolean);
const
RegKey = '\Software\Microsoft\Windows\CurrentVersion\Run';
// or: RegKey = '\Software\Microsoft\Windows\CurrentVersion\RunOnce';
var
Registry: TRegistry;
begin
Registry := TRegistry.Create;
try
Registry.RootKey := HKEY_LOCAL_MACHINE;
if Registry.OpenKey(RegKey, False) then
begin
if bRegister = False then
Registry.DeleteValue(AppTitle)
else
Registry.WriteString(AppTitle, AppName);
end;
finally
Registry.Free;
end;
end;
// Example:
procedure TForm1.Button1Click(Sender: TObject);
begin
// 1.Parameter: Path to your Exe-File
// 2. Parameter: the Title of your Application
// 3. Set (true) or Unset (false) Autorun
SetAutoStart(ParamStr(0), 'Title of your Application', True);
end;
ولاخفاء الفورم عند بداية التشغيل
سيكون عليك اضافة برامتر الى مسار البرنامج في الرجستري مثلا
;c:\project1.exe /hide
;وفي البرنامج
PHP كود :
begin
if pos('/hide',ParamStr(1))<>0 then
hide;