[Delphi] Przekazywanie komunikatów w Delphi XE2 64bit

[sybic]

Dokonałem migracji swojego programu z Delphi XE na Delphi XE2 i skompilowałem go do 64-bit. Właściwie wszystko chodzi i nawet szybciej, jednak poza komunikatami między okienkami wysyłanymi PostMessage.

Helpu do Delphi XE2 nie zdołałem już ściągnąć (rzecz jasna bawię się wersją trial) więc nie wiem gdzie kryje się haczyk.Może ktoś wie i na szybko pomoże?

[Stelma]

To chyba nie będzie wina kompilatora bo przecież PostMessage. Jest funkcją z WinApi.

[DevPort]

Czyli się dobrze zrozumiałem, wysyłanie funkcją PostMessage nie działa ?

Jeżeli tak to sprawdź : uchwyt okna czy jest 64bit? czyli QWord lub int64.

Używanie integer i cardinal nie ma sensu domyślnie są to longint i longword, a te z kolei nie nadają się do win64 bo są 32bit.

M$ pisał w MSDN, że w Win64 uchwyt okna jest 64bit czyli QWord lub int64.

Sprawdź to i daj znać

[sybic]

No faktycznie, uchwyt miałem zadeklarowany jako word. Zmieniłem na hWnd i wszystko działa

[DevPort]

hWND pochodzi z THandle, to z kolei jest w zadeklarowane jako DWord = longword (4B) pod win32 i qword(8B) pod win64.

Co doskonale pokazuje ten skrawek kodu w pewnym unicie kompilatora.

 

{$ifdef CPU64}
 THandle = QWord;
 ULONG_PTR = QWord;
{$else CPU64}
 THandle = DWord;
 ULONG_PTR = DWord;
{$endif CPU64}

[Stelma]

Czyli wniosek jest prosty kto "poprawnie" pisał programy ten nie musi przejmować się uchwytami przy przenoszeniu aplikacji na 64 bity (dobrze rozumiem ?).

[DevPort]

Można tak to powiedzieć