ذخیره مستقیم مقدار ادیت یا لیبل در فایل

[Mask]

با سلام
میخاستم بدونم چطوری میشه مقدار کپشن یک لیبل یا تکست یک ادیت رو به صورت مستقیم ریخت در یک فایل txt.
منظورم از مستقیم اینه که نریزیم در یک ممو یا چیزه دیگه.
ممنون از جوابتون.

[Felony]

var
StrL: TStringList;
begin
StrL:= TStringList.Create;
try
StrL.Text:= Edit1.Text;
StrL.SaveToFile('C:\Test.txt');
finally
StrL.Free;
end;
end;

[Mask]

ممنون
اما من که گفتم به صورت مستقیم.
این کدی که نوشتید رو می دونم .شما مقدار ادیت رو ریختید در یک استرینگ لیست و بعد ذخیره کردید.
منظورم به صورت مستقیمه.
با تشکر

[Felony]

var
SampleFile : TextFile;
begin
AssignFile(SampleFile, 'C:\Test.txt');
ReWrite(SampleFile);
Write(SampleFile, Edit1.Text);
CloseFile(SampleFile);
end;

[Mahmood_M]

علاوه بر مثالي كه جناب SilverSoft گذاشتن ، مي تونيد به اين لينك (http://delphi.about.com/od/fileio/a/ascii_textfile.htm) و يا اين لينك (http://www.delphibasics.co.uk/Article.asp?Name=Files) مراجعه كنيد ...

موفق باشيد ...