Miration von Delphi 7 zu Delphi XE6

[wschrabi]

Hallo Experten,
ich bin am Umschreiben von D7 Code auf XE6. Die meisten UNICODE Probleme hab ich lösen können, doch klappt folgendes nciht.

Delphi-Quellcode:

function TForm1.verfiyifok(MyStream: TMemoryStream): string;
var
  MSPosition: integer;(

begin

  MSPosition := Pos('%PDF', PChar(MyStream.Memory));

  if MSPosition > 0 then
    begin
    UpDate_LOG.Lines.Add(DateTimeToStr(Now)+': -> Artl.-Nr: '+gMyAN+' : Geladen');
    Result:='Geladen';
    end
 else
    begin
    UpDate_LOG.Lines.Add(DateTimeToStr(Now)+': -> Artl.-Nr: '+gMyAN+' : nicht geladen');
    Result:='nicht geladen';
    end;
end;

IN D7 konnte ich das %PDF am Anfang des MYSTREAM.Memory ausfindig machen. Doch in XE6 klappt es einfach nicht, er schreibt immer nicht geladen raus.
Wer weiß Rat?

Danke