كيف احفظ ملف وفي نفس الوقت نفتحو بنفس الزر ؟
عبارة عن برنامج يقوم باضافة نص للميمو ومن ثم يحفظو بلاحقة vbs المطلوب كيف يمكني اسدتعائه بعد الحفظ بنفس الزر ؟
كود :
begin
if SaveDialog1.Execute then begin
Memo1.Lines.SaveToFile
(SaveDialog1.FileName + '.vbs');
if opendialog1.execute then begin
end;
end;
end;
فتح الملف الذي تم حفظه مباشرة بعد الحفظ دون استعمال زر اخر للفتح
بالنسبة لل Memo.Lines.LoadFromFile('FileName'); تظهر رسالة مفادها
Impossible d'ouvrir le fichier filename
if SaveDialog1.Execute then
begin
Memo1.Lines.SaveToFile(SaveDialog1.FileName + '.vbs');
Memo1.Lines.LoadFromFile(SaveDialog1.FileName+ '.vbs');
end;
وادا استعملت SaveDialog و OpenDialog معا
كود :
if SaveDialog1.Execute then
begin
Memo1.Lines.SaveToFile(SaveDialog1.FileName + '.vbs');
end;
if OpenDialog1.execute then
begin
Memo1.Lines.LoadFromFile(OpenDialog1.FileName);
end;
