Lokale Kopie von System.Variants.pas einbinden und nutzen, geht das?

[DenkDirNix]

Hast Du die Unit eventuell aus einer älteren Delphi-Version heraus kopiert und nicht aus der mit der Du übersetzt?

[Uwe Raabe]

Also ich kann das hier problemlos machen.

Oder hast du in deinem Projekt zufällig ein GENERICVARIANTS in den Defines? Denn nur dann wird ein uses System.Variants in System.VarUtils aktiviert.

[Rollo62]

Ich habe das in einem größeren Projekt versucht, ich versuche es morgen nochmal mit einem leeren Projekt.
Die normalen Debug-DCU's sind aktiv, es ist nichts an den Settings verstellt, ich kann also den Source normal debuggen.
Nein, ist auch nicht aus einem älternen Projekt, sondern aus dem Delphi/Source Verzeichnis, mit dem ich auch testen möchte.

[Rollo62]

Hallo Uwe,

ich habe es nochmal mit einem ganz leeren Projekt versucht, nur die System.Variants Unit lokal.
Das kompiliert nicht bei mir, weder für Win32 noch für Android32/64.

Immer mit dem Fehler
"[dcc32 Fatal Error] System.Variants.pas(1271): E2158 System.Variants unit out of date or corrupted: missing '@VarCast'"

Falls das so, ohne weiteres bei Dir kompiliert, dann wüsste ich gerne warum das hier nicht funktioniert.
Ich habe eigentlich ein ziemlich natives RadStudio 11.3, mit nur ein paar Tools geladen (TestInsight, Kastri ) sonst eigentlich nur Sourcen.

Der ursprüngliche Grund, warum ich das laden wollte, hat sich mittlerweile erledigt.
Allerdings wäre es interessant zu wissen warum es mal geht und mal nicht.

Hier ist mein minimales Testprojekt:
T489_TstSysUnit_001.zip

[Uwe Raabe]

In deinem originalen Post ging es aber nicht um System.Variants, sondern um System.VarUtils.

Bei System.Variants bekomme ich auch den gleichen Fehler.

[Kas Ob.]

Zitat von Rollo62:

Immer mit dem Fehler
"[dcc32 Fatal Error] System.Variants.pas(1271): E2158 System.Variants unit out of date or corrupted: missing '@VarCast'"

VarCast is declared as _VarCast, so in theory to make it work you need to strip all the functions in System.Variants.pas from these and adjust the whole unit to call them stripped code, though there might be something hidden to surprise you, which need to adjust system.pas itself, that most likely impossible with Delphi compiler.

If rebuilding the whole RTL (after making changes) is possible then that is the right way, in my opinion.
In case you succeeded in rebuilding the RTL, then i suggest to add global hooks with minimum interaction with the current code and declarations, these hooks and callback can be used for logging, and the RTL might still be compatible with default RTL, just food for thought.

[Rollo62]

Zitat von Uwe Raabe:

In deinem originalen Post ging es aber nicht um System.Variants, sondern um System.VarUtils.

Ja sorry, ich hatte beide probiert um die fehlende Referenzen reinzubekommen, hilft aber nichts.

Zitat von Kas Ob.:

Zitat von Rollo62:

Immer mit dem Fehler
"[dcc32 Fatal Error] System.Variants.pas(1271): E2158 System.Variants unit out of date or corrupted: missing '@VarCast'"

VarCast is declared as _VarCast, so in theory to make it work you need to strip all the functions in System.Variants.pas from these and adjust the whole unit to call them stripped code, though there might be something hidden to surprise you, which need to adjust system.pas itself, that most likely impossible with Delphi compiler.

If rebuilding the whole RTL (after making changes) is possible then that is the right way, in my opinion.
In case you succeeded in rebuilding the RTL, then i suggest to add global hooks with minimum interaction with the current code and declarations, these hooks and callback can be used for logging, and the RTL might still be compatible with default RTL, just food for thought.

Yes, I had seen the C-like notations, but that made me stop there.
To make such huge RTL change is not worth it, especially because I found the root cause meanwhile also without logging into this.

Thanks anyway, for the help here.

[Kas Ob.]

Zitat von Rollo62:

Yes, I had seen the C-like notations, but that made me stop there.
To make such huge RTL change is not worth it, especially because I found the root cause meanwhile also without logging into this.

Thanks anyway, for the help here.

I was referring to recompiling the shipped DCU's hence the RTL, from https://stackoverflow.com/questions/...sible-then-how

Code:

This is a very old question/answer, but I can confirm that this is still a working solution in Delphi 10.3. Thanks – 
Johann Burgess
 Mar 30, 2021 at 3:39