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

الصفحات : 1 2

السلام عليكم
شرح فيديو مصور مع الصوت للتنصيب الصامت للـ Firebird باستخدام Inno Setup و ISTool
اي سآل تفضل بطرحه لم اشرح الاكواد لكي لا يطول الفيديو لكي تفهم العملية احيلك :
شرح تنصيب أكثر نسختين FireBird الى جانب بعض

التحميل

كود :
https://drive.google.com/open?id=1eZ4xow-kMp0GNaooC34Qjqg4VUQ5n61K

لا تنسونا من صالح دعائكم

وعليكم السلام ورحمة الله وبركاته،
جزاك الله خير الجزاء و أوفاه ،
سؤال بسيط فقط ،
بمتابعة الفيديو الذي أرسلته ، فهمت أن Firebird service الجديد يوقم بعملية Start مباشرة بعد تثبيته ، دون الحاجة إلى تشغيلة يدويا.
هل فهمي هذا صحيح ؟

السلام عليكم

PHP كود :
procedure SilentInstall();
var
  ReaultCode: Integer;
begin
 Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'install -auto -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
 Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'start -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
end;

procedure CurUninstallStepChanged(CurUninstallStep: TUninstallStep);var
  ReaultCode: Integer;
begin
 if CurUninstallStep = usUninstall then
 begin
   Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'stop -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
   Exec(ExpandConstant('{pf}\D4AServer\bin\instsvc.exe'), 'remove -name D4AServerWin32', '', SW_HIDE, ewWaitUntilTerminated, ReaultCode);
   DelTree(ExpandConstant('{pf}\D4AServer'), True, True, True);
 end;
end; 

نعم يقوم بتنصيب الـ Service ثم يقوم بعمل Start له اوتوماتيكيا دون الحاجة الى ذلك يديويا
عند uninstall للبرنامج يقوم بالعكس اي Stop للـ Service ثم حذفه Remove ثم حذف مجلد الـ Firebird

السلام عليكم
الملف الذي قمت بتحميله لا يعمل

السلام عليكم الملف يعمل عادي !!!

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

موضوع يستحق الرفع ، لمن فاته مشاهذة هذا الموضوع. Cool

السلام عليكم
من فضلكم لديا مشكلة حين ربط interbase مع الدلفي حيث تظهر الرسالة التالية unavailable database
هل من مساعدة من فضلكم

(28-11-2023, 05:46 PM)hanane77 كتب : [ -> ]السلام عليكم
من فضلكم لديا مشكلة حين ربط interbase مع الدلفي حيث تظهر الرسالة التالية unavailable database
هل من مساعدة من فضلكم

و عليكم السلام ورحمة الله وبركاته.
يبدو أن الجهاز الذي تعمل عليه مُنصب عليه ال Firebird

إذا كان نعم ، قم بالخطوات التالية :
1-1- إلغاء تثبيت Interbase .
2-1- توقيف Firebird Service ، توقيف فقط و ليس إلغاء تثبيت.
3-1- تثبيت Interbase من جديد.
4-1- إعادة تنشيط Firebird Service من جديد.

يمكن أيضا قبل تشغيل Firebird Service تغيير رقم Port من 3050 إلى 3051 مثلا.
بالتوفيق.

(28-11-2023, 06:28 PM)Delphi2020 كتب : [ -> ]
(28-11-2023, 05:46 PM)hanane77 كتب : [ -> ]السلام عليكم
من فضلكم لديا مشكلة حين ربط interbase مع الدلفي حيث تظهر الرسالة التالية unavailable database
هل من مساعدة من فضلكم

و عليكم السلام ورحمة الله وبركاته.
يبدو أن الجهاز الذي تعمل عليه مُنصب عليه ال Firebird

إذا كان نعم ، قم بالخطوات التالية :
1-1- إلغاء تثبيت Interbase .
2-1- توقيف Firebird Service ، توقيف فقط و ليس إلغاء تثبيت.
3-1- تثبيت Interbase من جديد.
4-1- إعادة تنشيط Firebird Service من جديد.

يمكن أيضا قبل تشغيل Firebird Service تغيير رقم Port من 3050 إلى 3051 مثلا.
بالتوفيق.

الصفحات : 1 2

S.FATEH

أبو معاذ

S.FATEH

rida

S.FATEH

bassem_43

أبو معاذ

hanane77

Delphi2020

hanane77