كيف يمكن حفظ إعدادات ؟

[kachwahed]

السلام عليكم
أخي نبيل
لم أفهم ما قصدته في السؤال الأول
أما بخصوص حفظ إعدادات المكونات بصفة عامة، فأفضل طريقة ملفات التدفقات TFileStream
مثال لـ TTreeView:

PHP كود :

// Save

procedure TForm1.Button1Click(Sender: TObject);
var
F: TFileStream;
begin
F := TFileStream.Create('c:\TreeView.dat', fmCreate or fmShareCompat);
try
F.WriteComponent(TreeView1);
finally
F.Free;
end;
end;


// Load

procedure TForm1.Button2Click(Sender: TObject);
var
F: TFileStream;
begin
F := TFileStream.Create('c:\TreeView.dat', fmOpenRead or fmShareDenyWrite);
try
F.ReadComponent(TreeView1);
finally
F.Free;
end;
end; 


ويمكن حفظ جميع مكونات البرنامج بنفس الطريقة:

كود :

for i := 0 to ComponentCount - 1 do ...