RTL Fehler beheben - System.pas

[arcticwolf]

Zitat:

Oder dieses komische Zeugs lassen wie es ist

Das funktioniert leider nicht wenn man alten "Legacy-Code", mit meiner "Playcom Console Library" compilieren möchte, welcher System.Write oder System.Writeln verwendet. Wenn man nicht den kompletten Legacy-Code umschreiben möchte, dann müssen solche Funktionen richtig arbeiten.

Ich habe das Problem jetzt umschifft, in dem ich den Patch auf die Procedure System._WriteUString anwende und somit nicht gezwungen bin eine weitere Funktion aus der System.pas aufzurufen.

Lange Rede kurzer Sinn. Ich habe, Dank Eurer Hilfe und mit dem Code von Stefan, das Problem gelöst und die System.pas gepatched. Wer an der Lösung interessiert ist kann diese unter folgendem Link finden:

https://github.com/playcom-de/Consol...ly.Patches.pas

[Stevie]

Delphi-Quellcode:

procedure ApplyPatch;
begin
  @FuncWriteString := GetWriteStringAddress;
  RedirectFunction(GetWriteLongAddress, @WriteLongFixed);
end;