Okay, wenn ich die Links jetzt richtig interpretiere heißt das, dass die normalen Textfiles, die ich prüfen möchte eigentlich gar nicht prüfbar sind, da sie kein BOM enthalten, stimmts?
Ich habe mir mal folgende Function gebastelt:
Delphi-Quellcode:
function CheckTextfile(Datei : string): boolean;
var
F: File;
DateiAnfang: Array [0..100] of Byte;
I: Integer;
begin
try
AssignFile(F, Datei;
Reset(F, 1);
Blockread(F, DateiAnfang, SizeOf(DateiAnfang));
finally
CloseFile(F);
end;
for I := 0 to 100 do
if DateiAnfang[I] //wie kann man hier weitermachen?!
end;