کار با فایل متنی

[arash_a]

سلام دوستان

من در دلفی با یک مشکلی مواجه شدم. اگه کمک کنید ممنون میشم .
یک فایل متنی با پسوند TXT داریم و در داخل این فایل 3 خط با محتواهای زیر داریم:

Salam chetori
khub hasti
khob khodahafez

خوب . الان من می خوام به کمک فرمان EOF و EOLN فقط محتوای خط دوم یعنی
khub hasti رو توی یک متغیر String بریزم . ولی نمی تونم.
میشه کمکم کنید ؟ :افسرده:

[Future]

سلام
این سوال 2 روز پیش مطرح شد و جواب هم گرفت یک نگاه بنداز

[راحله سعادتی]

سلام دوستان

من در دلفی با یک مشکلی مواجه شدم. اگه کمک کنید ممنون میشم .
یک فایل متنی با پسوند TXT داریم و در داخل این فایل 3 خط با محتواهای زیر داریم:

Salam chetori
khub hasti
khob khodahafez

خوب . الان من می خوام به کمک فرمان EOF و EOLN فقط محتوای خط دوم یعنی
khub hasti رو توی یک متغیر String بریزم . ولی نمی تونم.
میشه کمکم کنید ؟ :افسرده:

سوال من هم مشابه همین آقاست ولی من قصد این را دارم که خطا به خطا از فایل متنی بخواند و درون یک ListBox قرار دهد ؟

[vcldeveloper]

function ReadFileLines(const FileName : string; LineNum : integer): string;
var
Lines : TStringList;
begin
Lines := TStringList.Create;
try
if FileExists(FileName) then
begin
Lines.LoadFromFile(FileName);
Result := Lines[LineNum];
end
else
raise Exception.Create('File not found');
finally
Lines.Free;
end;
end;