Zitat:
Delphi-Quellcode:
if InfoSize > 0 then
...
end;
Delphi-Quellcode:
if InfoSize > 0 then
...
end else
RaiseLastOSError;
Jetzt verstehe ich die Welt nicht mehr: Nun bekomme ich in ALLEN Debug Fällen, egal ob
Win32 oder Win64 die
Exception:
---------------------------
Benachrichtigung über Debugger-Exception
---------------------------
Im Projekt Sprach_ID_aus_Exe_auslesen_1.exe ist eine Exception der Klasse EOSError mit der Meldung 'Systemfehler. Code: 1813.
Der angegebene Ressourcentyp wurde nicht in der Image-Datei gefunden' aufgetreten.
---------------------------
Anhalten Fortsetzen Hilfe
---------------------------
Und die kompilierten Exe liefern in allen 4 Fällen gar nichts mehr:
Delphi-Quellcode:
ShowMessage(Format('Sprach-ID: %.4x, Codepage: %.4x', [LangID, CodePage]));
Wird anscheinend überhaupt nicht mehr ausgeführt.
Und den früheren Zustand kann ich auch nicht mehr wiederherstellen. Auch ein frisches neues Projekt verhält sich genauso...
