Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Loadpicture and activex troubles
Message
 
To
27/04/2001 16:10:17
Cetin Basoz
Engineerica Inc.
Izmir, Turkey
General information
Forum:
Visual FoxPro
Category:
ActiveX controls in VFP
Miscellaneous
Thread ID:
00500933
Message ID:
00501094
Views:
20
Thanks Cetin, but i try all issues and dont work any, my last chance is convert the API LoadImage from VB Code to VFP code, thanks in advance (if you can help :-) )

With Best Regards

Francisco Morosini

>>Hello people, well i have a big problem, i expect your help please:
>>
>>i download an activex where i need put a picture object reference, BUT the loadpicture dont work with this activex, now, in VB works fine then i make a dll for return the object reference of the VB loadpicture but dont work, send me a error message, change a variant an return a number, i try with Imagelist and dont too, i try with HWND control and dont too, finally i found a function (thanks to Vlad Grynchyshyn) called loadimage,http://www.allapi.net/api/LoadImage.php, the problem is thats function is VB and we dont idea how change this function in VFP code, someone help us please, because we have a dead line for the project and this activex is need for user interface, or maybe someone knows another method for obtain a object variable for an activex control.
>>
>>thanks in Advance, really
>>
>>Francisco Morosini
>>
>>the activex is addflow and is in www.lassalle.com
>
>Francisco,
>VB Activex controls are generally vague with their property, method assignments and picture loading. Could you try if one of these works :
>
>
myForm.MyActivex.MyWhatEverCollection(n).Picture = LoadPicture(Getpict())
>myForm.MyActivex.MyWhatEverCollection(n).Object.Picture = LoadPicture(Getpict())
>*Assuming you added an imagelist control with name OleImages
>myForm.MyActivex.MyWhatEverCollection(n).Picture = ;
>thisform.OleImages.ImageList(1).Picture
>
>*And finally - suspect last one would be the first to try with a VB thing < bg >
>myForm.MyActivex.MyWhatEverCollection(n).Picture(Loadpict(GetPict()))
>
Cetin
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform