DirectX 12 Header

[TiGü]

Ein Namespace-Problem also!
Deine Bezeichner beißen sich mit den Delphi eigenen Headern im Winapi-Namespace.
Um es zu kompilieren, musste ich neben der Wincodec.pas noch die DXGI.pas und D2D1.pas umbenennen.
Zwar löst die IDE richtig zu deinen Headern auf, aber der Compiler denkt bei einen nacktem "D2D1" in der uses-Klausel wohl zuerst an "Winapi.D2D1".

Kann Free Pascal auch diese Pseudo-Namespaces mit Punkt in der Unit?
Vielleicht führst du deine eigenen Namespaces ein, damit das nicht kollidiert?

[SonnyBoyPro]

Hab den Namespace auf DX12 geändert.
Aktualisierte Files sind auf GitHub.

[TiGü]

Du musst noch die Namen in den Units selber und die Uses-Klauseln anpassen!

[SonnyBoyPro]

Hab die betroffenen Units noch ergänzt. Also zumindest funktionieren die jetzt unter XE2.

[TiGü]

Interessehalber habe ich mir den letzten Stand von GitHub gezogen und versucht zu kompilieren.
Leider scheitert mein XE7 bei vielen Enum-Deklarationen, wo 32-Bit Länge forciert wird.
Zwar ist überall {$Z4} definiert, aber nichts geht.

Auch solche Werte werden angemeckert:

Delphi-Quellcode:

    TD2D1_PROPERTY = (
        D2D1_PROPERTY_CLSID = $80000000,

[SMO]

Zitat von TiGü:

Interessehalber habe ich mir den letzten Stand von GitHub gezogen und versucht zu kompilieren.
Leider scheitert mein XE7 bei vielen Enum-Deklarationen, wo 32-Bit Länge forciert wird.

Bei XE6 geht das, man bekommt allerdings die Warnung "W1012 Constant expression violates subrange bounds".
Probier's mal mit einem Typecast auf Integer (D2D1_PROPERTY_CLSID = Integer($80000000)), dann sollte es klappen.