64 bit Delphi programında CreateOleObject? Bir Delphi XE7 <strong>64 bit</strong> VCL programında

Question

, birim Vcl.OleAuto bulunamıyor:

[dcc64 Fatal Error] Unit1.pas(33): F1026 File not found: 'Vcl.OleAuto.dcu'

bir 32 bit programda sorunsuz çalışır iken:

uses 
    Vcl.OleAuto; 
... 
FSWbemLocator := CreateOleObject('WbemScripting.SWbemLocator'); 

64 bit programında CreateOleObject'u nasıl kullanabilirim?

Answer 1

Vcl.OleAuto için kaynak kodu hala sağlanmış olsa da, 64 bit lib dizini Vcl.OleAuto.dcu'u içermez. Bunun yerine, System.Win.ComObj ve/veya System.Win.ComServ'u kullanmanız bekleniyor. Vcl.OleAuto kaynağının bu birimi kullanımdan kaldırılmış olarak işaretlediğini ve bunun yerine ne kullanacağınızı bildirir.

Vcl.OleAuto kaynağına bakarsanız, taşınmamış 32 bitlik bir asm kodu bulabilirsiniz. Muhtemelen Embarcadero, üniteyi kullanımdan kaldırıldığından 64 bit'e taşımamayı kararlaştırdı.