+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ (/showthread.php?tid=1021)
الصفحات:
1
2
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - AL-MOB4RM3G - 05-07-2009
اخواني بارك الله لكم
ما هو الحلّ مع قآعدة البيانات ؟
يعني مثلا,, قآعدة البيانات موصولة مع adoconnection تحت العنوان c:/somthing/somthing
عند الزبون هو شئ آخر,, من المؤكد ان البرنامج لا يجد قآعدة البيانات,,
عندي قاعدة البيانات هي موجودة في نفس مجلد البرنامج,,
لذلك,, لو وصلت قاعدة البيانات برمجيّا,, هل اتجنب المشاكل في ذلك الحين ؟
وكيف اصل قأعدة البيانات برمجيا؟ بارك الله لكم
ملاحظة,, لو وضعت اسم قآعدة البيانات فقط دون المسآر الكآمل يعمل البرنامج بنجآح,,
لكن كل ال shortscuts لا تعلم :confused: لذلك افكر في ان اصله برمجيّا,,
بارك الله لكم
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - touhami - 05-07-2009
السلام عليكم
يمكنك معرفة مسار تثبيت البرنامج بواسطة الدالة ExtractFilePath
كود :
Example code : Extract all of the parts of a full file name
var
fullFileName : string;
begin
// Set up a full file name with drive and path
fullFileName := 'C:\Program Files\Borland\Delphi7\Projects\Unit1.dcu';
// Show the component parts of this full name
ShowMessage('Drive = '+ExtractFileDrive (fullFileName));
ShowMessage('Dir = '+ExtractFileDir (fullFileName));
ShowMessage('Path = '+ExtractFilePath (fullFileName));
ShowMessage('Name = '+ExtractFileName (fullFileName));
ShowMessage('Ext = '+ExtractFileExt (fullFileName));
end;
Drive = C:
Dir = C:\Program Files\Borland\Delphi7\Projects
Path = C:\Program Files\Borland\Delphi7\Projects\
Name = Unit1.dcu
Ext = .dcuبالتوفيق أن شاء الله.
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - STRELiTZIA - 05-07-2009
السلام عليكم و رحمة الله
إقتباس :لذلك,, لو وصلت قاعدة البيانات برمجيّا,, هل اتجنب المشاكل في ذلك الحين ؟يمكنك انشاء ملف configuration عند اول استعمال للبرنامج مع حفظ خيارات مسار قاعدة البيانات.
إقتباس :عندي قاعدة البيانات هي موجودة في نفس مجلد البرنامجمن الأفضل ان تكون ملفات الدادتا بايزز في مجلد مستقل، هي مسألة تنظيم فقط. خصوصا عند عمل Backups و غيرها...
إقتباس :وكيف اصل قأعدة البيانات برمجيا؟
اليك انسب طريقة...
1- عندك مجلد البرنامج يحتوي على مجلد آخر فيه الداتا بايزز نسميه : data مثلا
2- اكتب المسار بهذا الشكل :
كود :
[COLOR=red].\[/COLOR]dataهذه الطريقة تحل مشاكل مسارات الداتا بايزز نهائيا و مهما كان مسارها، البرنامج يجدها بكل سهولة.
بالتوفيق ان شاء الله
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - AL-MOB4RM3G - 05-07-2009
طيب اخواني الكرام ,, يبدوا الخلل عني بعض الشئ غريب,,
استخدم برنامج ال installshild express
و كل شي تمام,, يتم نتصيب البرنامج عآدي وكل شئ,, لكن ال shortqut يبدوا غريب بعض الشئ,,
لأنه لا يعمل,, يعني عندما يكون الشورت كات على سطح المكتب تهر رسآلة تقول ان البرنامج لم يجد قأعدة البيآنات في سطح المكتب,, لكن لو فتحت البرنامج مبآشرة من مسآره تحت السي / بوجرامس يتم فتح البرنامج بدون خلل,, طيب لو انا عمل اختصار جديد اي shortqut جديد على سطح المكتب فإنه يعمل بدون مشآكل ,,, :confused:
ما القصّة بارك الله لكم,, هل حصل هذا مع احد منكم ؟
صورة توضح رسآلة الخلل التي تأتي عندما افتح البرنامج من الشورت كات لبرنامج ال installshild
![[صورة: adocone2.jpg]](http://img11.imageshack.us/img11/5131/adocone2.jpg)
شكرا لكم
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - محمد عبد العزيز - 05-07-2009
يبدو انك تستخدم نسخة سويدية
في مكان ما قبل فتح قاعدة البيانات اكتب هذا
كود :
ChDir(ExtractFilePath(Paramstr(0)));بالتوفيق
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - AL-MOB4RM3G - 06-07-2009
نعم هذا صحيح,, كيف عرفت هذا ؟ هل تعرف السويديّة ؟
اخي الكريم,, لم اجرب طريقتك,, لأأني لم ارها الّى الآن,, لكن مشي معي الحال من برنامج ال installshild ,,, لا ادري ما المشكلة كانت لكن مشي الحآل على كل حال بعد الضغط على عدة ازرآر,, ؟
سأحآول ان اعرف ما هي المشكلة لأتجنبها في المستقبل ان شاء الله تعلى,...
وان عرفت اضع الجوآب للمشكلة هنا ان شاء الله
شكرا لكم على كل حال
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - kachwahed - 06-07-2009
إقتباس :نعم هذا صحيح,, كيف عرفت هذا ؟ هل تعرف السويديّة ؟كنت أعلم أنك في السويد عندما شاهدت arkiv في أعلى يسار نافذة من مكتبك
راسلني إذا لم تحل المشكلة، التوفيق.
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - AL-MOB4RM3G - 07-07-2009
kachwahed كتب :
كنت أعلم أنك في السويد عندما شاهدت arkiv في أعلى يسار نافذة من مكتبك
راسلني إذا لم تحل المشكلة، التوفيق.
اهلا بك اخي
لا عليك, تم حل المشكلة ولله الحمد,,
في القيقة لا ادري السبب ما هو لكن حذفت ال shortqut من البرانمج ووصلته مرة اخرى فمشي معي الحال,,
على كل, ,شكرا لكم جميعا
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - محمد عبد العزيز - 09-07-2009
الخطا (ان صح تسميته خطا) كان في الاختصار
بالاختصار هناك خيار به مكان/مجلد تنفيذ البرنامج
عندما يكون المكان فارغ يعني الحالي/مكان تواجد الاختصار/سطح المكتب
برنامجك يبحث عن قاعدة البيانات في ./Data
مجلد بالمكان الحالي/سطح المكتب
ولايوجدالقاعدة بسطح المكتب، يحدث الخطأ
احدد الحلول هو الكود الذي كتبته سابقا اي الانتقال الى مجلد البرنامج
وصل قآعدة البيانات بدون ارتباط بمسار بعيّن؟ - AL-MOB4RM3G - 10-07-2009
نعم اخي الكريم,, هذا هو الذي كان يحدث معي 100%
وتحليلك للخطأ صحيح,, لكن ما دام ان الموضوع انفتح من جديد
لدي تسآئل,, وظيفة الإختصار او chortqut ما هو ؟
اليس هو فقد لينك الى مكان البرنامج الأصلي؟
طيب لماذا في حآلتي انا كان يتوقع البرنامج وجود قاعدة البيانات
على سطح المكتب ان كان الشورت كات فقت لينك ؟
+ الكود الذي وضعته اخي الكريم ديلتا عزيز,,
هل ينفع استخدآمه في حآلت التصميم ام انه فقد كود برمجي؟
شكرا كثيرا