معرفة إذا كان الملف نصي ام لا

[mohfa]

هذا مثال

كود :

const UnicodeFl = #$FEFF; //--<<< Fist Bytes --->>> var C :WideChar; begin try Stream.Read(C, 2); Unicode := C = UnicodeFileTag; // File Is Unicode Encoding except Unicode := FALSE; end;