как прочитать txt

string mFile;

int eCol_Kib, eX_Kib, eY_Kib;
getdisplay(eCol_Kib, eX_Kib, eY_Kib);

File("r", "C:\логин.txt", "Текст", #mFile, "C:\", "file.txt");

function File(string rej, string savefile, string text, string #var, string path, string file)
{
if (rej=="r")
{
string t;
if (fopen (savefile, rej)!=0)
{
while (freadline (t))var=var+t+"^r^n";
fclose();
}
}
else
{
if (fopen (path+file, rej)!=0)
{
fwrite(text);
fclose();
}
}
}

string s[9999];
int k;

if (fopen ("C:\логин.txt", "r")!=0) // открыть файл
{
k=freadlineall(#s[0], 9999); // прочитать по строкам
fclose(); // закрыть файл

messagebox (s[2]); // показать в сообщении третью строку
writeclipboard (s[2]); // скопировать в буфер третью строку
}
else messagebox("Файл не открылся");