Natürlich kann man auch direkt den Datentypen verwenden und spart sich dann die manuelle Speicherreservierung und den von dir vergessenen Ressourcenschutzblock (Try-Finally).
Delphi-Quellcode:
var
MessageStructure: TNMHdr;
SendMessage(..., LPARAM(@MessageStructure));
PS: Eigentlich müsste man beim Zugriff auf Pointer noch den Zeiger dereferenzieren
MessageStructure^.hwndFrom
,
aber Delphi macht das netterweise implizit, von sich aus, wenn man
.irgendwas
auf den Zeiger anwendet.