delphi4arab منتديات دلفي للعرب
أخطاء في الكود مسار قاعدة البيانات - نسخة قابلة للطباعة

+- delphi4arab منتديات دلفي للعرب (https://delphi4arab.net/forum)
+-- قسم : منتديات دلفي للعرب التعليمية (https://delphi4arab.net/forum/forumdisplay.php?fid=3)
+--- قسم : سؤال و جواب حول دلفي (https://delphi4arab.net/forum/forumdisplay.php?fid=15)
+--- الموضوع : أخطاء في الكود مسار قاعدة البيانات (/showthread.php?tid=9966)

أخطاء في الكود مسار قاعدة البيانات - SOUFYANE2018 - 20-12-2018

السلام عليكم ممكن مساعدة من فضلكم

[صورة: p_10831frtz1.jpg]

RE: مساعدة من فضلكم - ferrero_100 - 20-12-2018

PHP كود :
procedure TSAVE.Button2Click(Sender: TObject);
var source,path1,PATH:string;
   hichsoft: longbool;
   i:integer;

begin
  path:=ExtractFilePath(Application.EXEName);
  i:=0;
  While i<5 do
   begin
     Path1:= label3.Caption+'\'+ListBox1.Items.Strings[i];
     Source:=path+ListBox1.Items.Strings[i];
     CopyFile(pchar( source),pchar( path1),hichsoft);
     i:=i+1;
     ProgressBar1.Position:= ProgressBar1.Position+1;
   end;
    ShowMessage('Sauvegarde Terminée..');
    ProgressBar1.Position:=0;
end;





procedure TSAVE.FormCreate(Sender: TObject);
begin
  ListBox1.Items[0]:='Client.db';
  ListBox1.Items[1]:='Client.mb';
  ListBox1.Items[2]:='Client.px'; 


RE: أخطاء في الكود مسار قاعدة البيانات - S.FATEH - 20-12-2018

السلام عليكم
مرحبا في منتدى دلفي للعرب
إختر عنوان مناسب لموضوعك
إختر القسم المناسب لموضوعك
راجع القوانين وشروط الكتابة كي لا تحذف مشاركتك