Zitat:
Delphi-Quellcode:
constructor EResException.Create(const ResString: PResStringRec; const Postfix: String = '');
begin
Message := LoadResString(ResString)+Postfix;
Identifier := ResString.Identifier;
end;
Das funktioniert so nicht. Dein "Identifier" mal typcasted nach Pointer(Identifier) ist gleich Pointer(Message); Dh. der Identifier eines PResStringRec ist beim allerersten Laden = Aufruf von LoadResString() die Resource-ID zum ResourceString. Sollte das der Fall sein so wird LoadResString() diesen String aus der Resource laden und dann in .Identifier zwischenspeichern.
Schau dir mal ResString.Identifier im Debugger mal VOR und NACH den Aufruf von LoadResString() an.
Gruß Hagen