something

const Arr=102400;char StrBuf[Arr];int FHandle;UnicodeString StrHld;UnicodeString Final,LStrHld;FILE *FileHLD;int Errhld=0;FTemp="";try{if(!FileExists(OpenDialog1->FileName)){if(!FileExists(OpenDialog1->FileName + ".srt")) {if(!FileExists(OpenDialog1->FileName + ".ass"))  {if(!FileExists(OpenDialog1->FileName + ".ssa"))   {if(!FileExists(OpenDialog1->FileName + ".smi"))    {Errhld=1;    }    else{FTemp=".smi";}   }   else{FTemp=".ssa";}  }  else{FTemp=".ass";} } else{FTemp=".srt";}}FTemp=OpenDialog1->FileName + FTemp;if(Errhld==0 && FileIsReadOnly(FTemp)){Errhld=2;}FileHLD=_wfopen(FTemp.w_str(), L"r+b");if(FileHLD!=NULL){FHandle=_fileno(FileHLD);FLen=filelength(FHandle);if(FLen<=Arr){ read(FHandle,StrBuf,Arr); StrHld=LeftStr(AnsiString(StrBuf),FLen);}else { for(int i=0;i<FLen;i+=Arr)  {   read(FHandle,StrBuf,Arr);   if(FLen<(i+Arr) && i<FLen)   {	StrHld=StrHld+LeftStr(AnsiString(StrBuf),FLen-i);   }   else   {	StrHld=StrHld+LeftStr(AnsiString(StrBuf),Arr);   }  }}