Форум - Ответы     (  К темам )
 ?  Stas: Файл (05-02-2003 22:02:36)
Люди как прочитать последние 34 байта файла (ASCII),
Сначало надо прочитать 30 байт, а в самом конце ещё
4 байта и надо вывести информацию из них на Label.
Заранее спасибо.
 Владимир (06-02-2003 00:25:03) http://cbuilder.ru
void __fastcall TForm1::Button1Click(TObject *Sender)
{
const int RBUF=35;
char buf[RBUF];
for(int i=0; i < RBUF; i++) buf[i] = 0;

int ih = FileOpen("myFile.txt",fmOpenRead);
FileSeek(ih,-34,2);
FileRead(ih,buf,RBUF-1);
FileClose(ih);

// AnsiString sbuf = buf;
Label1->Caption = buf;
}
//---------------------------------------------------------------------------


support@cbuilder.ru