Warnung vor WinMD :(

[himitsu]

Seit 'ner Weile befindet sich ja ein eigentlich nettes Projekt im GetIt.
siehe GetIt "Windows API from WinMD"

Microsoft stellt Metadaten (API-Definionen) in einem maschienenlesbarem Format bereit
und Embarcadero versucht daraus automatisch die Delphi-Implementationen zu übersetzen/generieren.
https://learn.microsoft.com/de-de/uw...ef/winmd-files

Viele WinAPI fehlen ja im Delphi, Andere sind extrem veraltet und dann überall hier und da auch mal Übersetungsfehler. (die leider zu oft nicht behoben werden)

Nur leider ist es aktuell nicht wirklich nutzbar,
vor allem da z.B. an extrem vielen Stellen Char anstatt AnsiChar verwendet wird, wo's SDK oder des MSDN learn.microsoft.com etwas von BYTE-Arrays reden.
Oder Integer bzw. Int64, wo es eigentlich ein NativeInt sein sollte, also vor allem bei compilerabgängigen Definitionen.

https://quality.embarcadero.com/browse/RSP-44096

[himitsu]

Ich würde gern seit Tagen den schwachsinnigsten Bug melden, aber geht nicht.
Sobald die Windows.Foundation eingebunden ist, geht fast sofort garnichts mehr.

Hat überhaupt irgendjemand auch nur eine Sekunde mal reingesehn, was sie da verbockt haben?

Delphi-Quellcode:

{$REGION 'BUGFIX'}

// C:\Users\%username%\Documents\Embarcadero\Studio\23.0\CatalogRepository\WindowsAPIfromWinMD-1.0\Windows.Foundation.pas
//
// TRUE = $1 {1};
// FALSE = $0 {0};
//
// BOOL = Integer;

type
  BOOL = Winapi.Windows.BOOL;

const
  True  = System.True;
  False = System.False;

{$ENDREGION}

Leider klappt das mit dem Zurückändern des BOOL natürlich nicht, da verwendete Funktionen in deren Units natürlich bereits mit dem falschen Typ deklariert wurden. (also muß direkt dort verändert werden)

[himitsu]

So, nachdem ich mal wieder in Versuchung war und WinMD nutzen wollte .... hab verzweifelt aufgeben müssen.
Dachte noch neues Delphi, neues Glück,
aber der dahingerotzte Scheißdreck ist ja immernoch in selbiger Version 1.0

Falsche Typen, massig Inkompatibilitäten, viele Fehler,
aber ganz Pervers war, dass Parameter als VAR deklariert wurden, und zwar auf den TYP, obwohl es ein [out] oder den Pointer des Pointer-Typen sein müsste, also ein VAR auf den Pointer, nicht auf den Typ.

Wenn die API aber einen Zeiger ausgibt, und zwar auf ein offenes Array, und nicht den "einen" Inhalt, dann geht das sowas von garnicht.


OK, es gibt inzwischen ein Delphi-Projekt, welches .Net-Debuginfos auslesen kann,
aber bevor ich selbst anfange diese auslesen und verarbeiten zu wollen, um eigene WinMD-Delphi-Header zu generieren,
dachte ich mir, ich probiere erstmal den WinMD-Exporter von Microsoft und schaue, was deren XML für mich bereitstellen,
aber irgendwie will das nichts machen.

Windows Runtime Metadata Export Tool
https://learn.microsoft.com/de-de/do...ta-export-tool

Also erstmal die BasisLib reingeworfen und (in einem leeren und beschreibbarem Verzeichnis ausgeführt)

Code:

"C:\Program Files (x86)\Microsoft SDKs\Windows\v10.0A\bin\NETFX 4.8 Tools\WinMDExp.exe" "C:\Windows\System32\WinMetadata\Windows.Foundation.winmd"

Zitat:

error WME1090 : Could not determine the core reference assembly. Please make sure mscorlib.dll and System.Runtime.dll
is referenced using the /reference switch.

OK, dann weiter ...

Code:

"C:\Program Files (x86)\Microsoft SDKs\Windows\v10.0A\bin\NETFX 4.8 Tools\WinMDExp.exe" /doc:xmldoc.xml /out:metafile.weissnicht /reference:"C:\Windows\Microsoft.NET\Framework\v4.0.30319\System.Runtime.dll" /reference:"C:\Windows\Microsoft.NET\Framework\v4.0.30319\mscorlib.dll" /utf8output "C:\Windows\System32\WinMetadata\Windows.Foundation.winmd"

Zitat:

error WME1046 : Platform Attribute 'Windows.Foundation.Metadata.ActivatableAttribute' is either defined in an assembly
that is not referenced or does not have the expected constructor. Please ensure that your assembly references include
the .NET Framework and Windows Runtime platform assemblies, such as System.Runtime.dll and Windows.winmd.

Hmmmm, aber jetzt weiß ich auch erstmal nicht mehr weiter
und das Internet zeigt auch keine Lösungswege auf, bzw. kaum jemand scheint das mal versucht zu haben, oder niemand hat Probleme damit.