selam arkadaşlar
vb de yazılmış bi cihaz kontrol kodu var axtivex olduğu icin delphidede kontrol edebilyorum fakat takıldığım bi nokta var yardımcı olabilirmsiiniz?
vb de bir module tanımlanmış ve icine
Kod:
Public Const SIZE_OF_IMAGE = 98304
boye bir tanımlama yapılmış

form sayfasındada
Kod:
Private Sub CommandTI_Click() 'event handler for TI Logo click Dim buffer(SIZE_OF_IMAGE) As Byte Dim varbuffer As Variant Dim filename As String Dim path As String path = App.path 'set path to point to image file path (same as application path) filename = "TILOGO.bmp" 'set filename to TI logo image file varbuffer = buffer 'init image storage Show_Image path, filename, varbuffer 'load and display image
diğer kodları delphiye cvirebilyorum fakat analadığım kadarıyla
Kod:
Dim buffer(SIZE_OF_IMAGE) As Byte
diyerek bir dizi değişken tanımlanmış
sonrada Kod:
varbuffer = buffer 'init image storage
diyerek variant tipindeki değişkene iceriği atılmış
burda kalıyorum
delphide bi diziyi bir varianta ataamıyoruz !
bu konudayardımlarınız bekliyorum
__________________