السلام عليكم
في كل الدورات التي تبعتها لم أجد شرح لمكونات Dialog و في هذا أنا محتاج لتشغيل مكونSaveDialog مرة واحدة في تشغيل البرنامج للمرة الأولى فقط حتى نحفظ قاعدة البيانات في مكان مخصص
وشكرا لكم
شكرا جزيلا أخي المشرف العام
و ياليت تتابع معي المناقشة الى آخرها
بعدما استدعيت المكون واستخدمت اسم الملف ومساره المختار ونجح كل شيئ الى الأن واستعملت طريقة النسخ لكي تبقى لنا نسخة محفوظة عل كل
واستعملت الكود التالي
إقتباس :procedure TForm2.FormCreate(Sender: TObject);
Var
a:Boolean;
begin
if SaveDialog1.Execute then
begin
CopyFile('D:\program\data\bd\infoetud.DB',Pchar(SaveDialog1.filename),true);
end;
end;
لكن تبين لي مشكل رهيب جدا أن الملف المنسوخ هو قاعدة البيانات فلا تتصور الخطأ الذي خرج لي
أن alise موجه الى السار الأول لأني استعملت طريقة ملفات ini مما يستوجب الآن توجيه قبلة الجداول الى المسار الجديد وفكرت في نسخ المجلد بالكامل أي حتى ملفات ini ولكن عثرت هنا
كيف يمكن تحويل المجلدبالكامل وماهو امتداده وهل تنجح الفكرة
أما الباقي أظن أني بالامكان القيام به
شكرا لتفاعلك أخي
ما الفكرة التي تحاول القيام بها ؟
سؤال المستخدم عن مكان تخزيد قاعدة البيانات ونسخها عند كل تنفيذ ؟
والسلام عليكم
الفكرة التي أحاول القيام بها
أنه عند تثبيت المستخدم للبرنامج و عند تشغيله لأول مرة يختار المستخدم لأن ينقل قاعدة المعطيات من المسار
C:\Program Files لمسار يراه آمن سواء في d أو غيره
هل تبينت الفكرة أثابك الله
يمكن ان تقوم بالتالي:
عند تنفيذ البرنامج يحاول قرائة المسار من ملف ini
فان وجده يستخدمه وان لم يجده يطلبه من المستخدم ويحفظه في ملف ini
والسلام عليكم