LoadResource lädt 2 Resourcen statt nur einer / falsches Encoding

[RandomDD]

Mehr gibt es nicht

Ich erstelle die RES-Datei, binde sie ein und versuche die HTML-Datei in der RES-Datei mit LoadTextFromResourceByName zu laden.

Code:

Datei_0 RCDATA ".\Datei_0.txt"
Datei_1 RCDATA ".\Datei_1.htm"
Datei_2 RCDATA ".\Datei_2.htm"
Datei_3 RCDATA ".\Datei_3.htm"

Zitat:

C:\> brcc32.exe HTML-Content.rc

{$R HTML-Content.RES}

Delphi-Quellcode:

function LoadTextFromResourceByName(ResourceName: AnsiString): AnsiString;
var
 ResourceStream: TResourceStream;
begin
 try
  ResourceStream := TResourceStream.Create(HInstance, ResourceName, RT_RCDATA);

  try
   SetLength(Result, ResourceStream.Size);
   ResourceStream.ReadBuffer(Result[1], ResourceStream.Size);
  finally
   ResourceStream.Free;
  end;
 except
 end;
end;

Delphi-Quellcode:

var Datei1: String;
 begin
  Datei1 := LoadTextFromResourceByName('Datei_1');
 end;

Datei1:

Zitat:

Lorem Ipsum Test ÄÖÜ é è

Resultat im Programm, siehe bitte Screenshot.

Alle HTML-Dateien sind laut Notepad++ in UTF8 ohne BOM kodiert.