سؤال عن Add , Del

بسهولة باستخدام امر

fopen('win.ini','w+); ثم قم بكتابة ما تريد باستخدام fprintf

ولمزيد من التوضيح ابحث في المساعده في نفس الدلفي عن هذين الامرين

شكراً يا اخ عنيزه

لكن هل تستطيع الشرح اكثر بوضع مثال

:)

بسم الله الرحمن الرحيم

اخي العزيز بو فهد

في البداية ارحب بك معنا في هذا المنتدى

والأجابة على سؤالك حسب الأتي :

(( طبعاً الطريقه التي سأذكرها لك طويله بعض الشيء ولكنها عمليه ))

في البداية صرح عن متغيير يحمل قيمة TStringList ولنفرض اننا سميناه s

اليك هذا المثال :

var

S:TStringList;

ثم قم بعدها بتنفيذ هذا المتغير بأستخدام امر Create

اليك هذا المثال

S:=TStringList.Create;

وبعدها تستطيع التعامل مع هذا المتغير كما تتعامل مع ListBox او Memo اوغيرها

بحيث حينما تريد ان تحمل ملف فيها تقوم بذلك بواسطة امر LoadFromFile ثم تحدد الملف

اليك هذا المثال :

s.LoadFromFile('win.ini');

وحينما تريد ان تضيف نصاً الى هذا الملف تقوم بذلك بواسطة ADD

اليك هذا المثال :

s.Add('load=lkfj.exe ');

وحينما تريد ان تحذف سطر تقوم بذلك بواسطة Delete

s.Delete(5);

وهكذا

وحينما تنتهي يجب عليك حفظ التغييرات وذلك بأستخدام امرSaveToFile

اليك هذا المثال :

s.SaveToFile('win.ini');

وحينما نجمع كل شي سويه

يصبح الكود بهذا الشكل :

procedure TForm1.Button1Click(Sender: TObject);

var

s:TStringList;

begin

S:=TStringList.Create;

s.LoadFromFile('win.ini');

s.Add('load=lkfj.exe ');

s.SaveToFile('win.ini');

end;

طبعاً هذا المثال يقوم بفتح ملف win.ini ثم يقوم بأضافة كلمة load=lkfj.exe ثم يحفظ البيانات

وتقبل اطيب تحياتي اخوك SUM

بوفهد:

======

أخي SUM رد عليك برد ولا أحلى مننه... لكن , ما اتوقع انه هذا اللي بغيته فيه صح؟

اللي كنت تريده انه البرنامج يظيف اسم لكي يشغله بأول ما يشتغل الوندوز... صح ولا أنا غلطان؟ و الاستاذ SUM رد عليك كيف تظيف في اخر الملف... لكن ما قالك كيف تظيف في السكشوف [windows] و اعتقد هذا اللي انت كنت تريده لكي يعمل له لود عند تشغيل الوندوز, لأنه لو ما حطيته بالسكشون للوندوز ما اتوقع انه راح يشتغل في البدايه (ما ني متأكد ما جربتها لكن اغلب الظن يقول انها ماراح تشتغل)... لذلك انا جيت اتفلسف.. و ان شاء الله يكون هذا اللي تبيه :)

اولا يجب عليك التعامل مع الـinifiles (ما ادري يسمونها مكتبه بالدلفي ولا يسمونها اداه ولا ايش؟)

ما يهم, في الـuses تبع البرنامج اظف عليهم inifiles

و انظر الى الكود هذا و ستجد ما تريد :

procedure TForm1.Button1Click(Sender: TObject);
var
ini:Tinifile;
begin
ini:= Tinifile.Create('win.ini');
ini.UpdateFile;
ini.WriteString('windows','Load','FileName.exe');
ini.free;
end;

لاحظ في السطر :

ini.WriteString('windows','Load','FileName.exe');

الـwindows اعني بها السكشون للوندوز... و هو اول ما تفتح win.ini راح تلاقيه عادة فوق..

و الـload هو الاسم للمتغير

و الـFileName.exe هو اللي تبي تظيفة في قسم الـLoad ...

أتمنى فهمت مقصدي... و لك مني و للاستاذ SUM كل التحيه :)

السلام عليكم

والله انتو اثنينكم احلى من بعض ما توقعت ان اجد الاجابه المطلوبه

:)

Sum مشكور يا اخي كفيت و وفيت هذا الي ابيه بالظبط

DR-A مشكور يا حبيبي هذا ماكان المطلوب بس لو ناطر شويه كان سألتك عنه :) وأاكد لك انه فادني كثيراً

مع الشكر