الفريق العربي للبرمجةأرشيف المنتديات · 2000 – 2023
نسخة أرشيفية للقراءة فقط — التسجيل والمشاركة مغلقان، والمحتوى محفوظ كما كان.

سؤالين في ال DataBase :

مغلق
بدأه fadi2003 في 8 مارس 2003 · 8 رد · 1,029 مشاهدة · في لغة Delphi
مشاركة: واتساب X فيسبوك تيليجرام
#1 صاحب الموضوع

السلام عليكم ورحمة الله وبركاته

أرجو التكرم بالإجابة عن هذين السؤالين :

1 - صنعت برنامج باستخدام جداوال الـ DataBsae وأريد أن أقوم بتشغيل هذا البرنامج على جهاز آخر بدون أن أضطر إلى تعريف الـ Alias أو إستخدام برنامج الـ (InstallShield ) بمعنى آخر أريد إجراءعملية نسخ ولصق فقط وتشغيل هذا البرنامج مباشرة ، فهل هناك من طريقة .

2 - صنعت برنامج باستخدام جداوال الـ DataBsae وحجمة حوالي 140 ميغابايت وسؤالي هو كيف يمكن أن أجعل المستثمر يقوم بتنزيل جزء من هذا البرنامج حوالي ( 2 - 5 ميغلبايت)على القرص الصلب بحيث يبقى بحاجة إلى السيدي لكي يعمل البرنامج .

وشكرا جزلاً لكم .

#2

في سؤالك الأول كان تريد تشغيله من الcd مثلا

أم ماذا وماهي قاعدة البيانات التي تعمل عليها(f)

#3

أخي reda :

في السؤال الأول أقصد تشغيل أي برنامج يستخدم قواعد البيانات دون الإضطرار إلى تعريف الألياس لها .

وفي السؤال الثاني أقصد : أريد أن أصنع للبرنامج Setup وأنسخه على قرص ليزري ولكن سؤالي هو : عندما يريد المستخدم تنزيل البرنامج على حاسبه أريده أن لا يحمّل كل ملفات البرنامج إلى حاسبه و إنما جزء منها فقط ليبقى بحاجة السيدي .

وأما عن قاعدة البيانات فهي من نوع : Paradox

شكرا لك .

#4

اخي العزيز

بالنسبة لسؤلك الأول اذا كانت قاعدة البيانات هي برادوكس فسوف ابعث لك مثال على ذلك

#5

يا أخ فادي يمكن أن تضع هذا الكود في Form Create

Table1.DatabasName:= ExtractFilePath(Application.ExeName)+'المجلد';

لكن مجلد قاعدة البانات في نفس مجلد الملف التنفيذي

#6

شكرا لكل من حاول مساعدتي وشكرا جزيلا لك أخي Barca على هذا الكود

#7

أخي الحبيب

بالنسبة للسؤال الاول فهناك العديد من الحالات

أبسط طريقة هي تعريف الAlias وقت التنفيذ(اضع لك إحداها إن أردت)

وهناك العديد من الحالات الاخرى سنتطرق إليها في ما بعد

بالنسبة لسؤالك الثاني هناك طرق أخرى لاجبار المستخدم على الcd (من وجهة نظري)

أفضل من ربط قاعدة البيانات

الامر يعود لكي أخي

#8

أخي العزيز reda :

أرجو أن تضع لي إحدى هذه الطرق لتعريف الـ Alies

وشكرا جزيلا لك.

#9

هذا الاجراء

procedure AddBDEAlias(sAliasName, sAliasPath, sDBDriver: string);
var
  h: hDBISes;
begin
  DBIInit(nil);
  DBIStartSession('dummy', h, '');
  DBIAddAlias(nil, PChar(sAliasName), PChar(sDBDriver),
    PChar('PATH:' + sAliasPath), True);
  DBICloseSession(h);
  DBIExit;
end;

ومن ثم استعديه إذا أردت on Great form

أو أين ما ناسبك

AddBDEAlias('fadi', 'd:a.db', 'DBASE');

حيث أن

fadi هي اسم الalias

d:a.db

هو قاعدة اليانات مع مكان وجودها

'dbase' هو مكان وجودها

طبعا لاتنسى إضافة الوحدتين

DBIProcs, DBITypes

للuses

هذا الموضوع مغلق.

مواضيع مشابهة