Para diferenciar códigos entre as diferentes plataformas,
é necessário fazer uso das diretivas de compilação.
Para Win32 utilizamos {$IFDEF WIN32}
Para Win64 utilizamos {$IFDEF WIN64}
Há ainda outras diretivas para outras plataformas
como macOS, iOS, android e etc
Abaixo segueExemplo de uso:
1 2 3 4 5 6 7 8 9 10 11 12 13 14 | procedure TForm1.Button1Click(Sender: TObject); begin { Está parte do código só será considerado se você compilar Como Windows 32 bits. } {$IFDEF WIN32} ShowMessage('Compilado para Windows 32 bits'); {$ENDIF$} { Está parte do código só será considerado se você compilar Como Windows 32 bits. } {$IFDEF WIN64} ShowMessage('Compilado para Windows 64 bits'); {$ENDIF} end; |
Dúvidas ou sugestões deixe nos comentários do post.
