Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Activex with vb examples
Message
 
 
À
10/08/2009 03:28:06
Albert Beermann
Piepenbrock Service Gmbh & Cokg
Osnabrück, Allemagne
Information générale
Forum:
Visual FoxPro
Catégorie:
Contrôles ActiveX en VFP
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP SP2
Database:
MySQL
Divers
Thread ID:
01416493
Message ID:
01417069
Vues:
88
This message has been marked as the solution to the initial question of the thread.
Hi Albert,

I didn't notice that you're dealing with 4 byte colors. They look like ARGB colors, where A stands for Alpha - transparency. The problem is that it's 32-bit integer but VFP converts such hex-decimal constants into positive numbers outside of 32-bit range. You've to cast them to 32-bit integers
*#DEFINE Black 0xFF000000
 #DEFINE Black BITAND(0xFF000000, 0xFFFFFFFF)
...
I'm not sure about transparent because Alpha=0 not FF is transparent color. Maybe they mean transparent area of the image which is often represented by almost white color 0xFFFFFFFE.
Anyway try
*#DEFINE Transparent 0xFFFFFFFE
 #DEFINE Transparent BITAND(0xFFFFFFFE, 0xFFFFFFFF)
>
>I changed the &H to 0x in the include file with no success.
>The debugger shows colornumbers with lenght 10. (4278190080 for black as example) and the error message is:
>Ole error 0x800 2000a ausserhalb des Bereichts (=outside the area (or array))
>
>Using color numbers with length 8 instead of rgb(x,y,z) works (.color = 16777088 for example)
>
>My special problem is "Transparent" which is defined as "FFFFFFFE" without an leading &H in the include file!!!
>Using .color = Tranparent shows error type conflict.
>Using .color = 4294967294 (=decimal FFFFFFFE) shows error
>Ole error 0x800 2000a ausserhalb des Bereichts (=outside the area (or array))
>
--sb--
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform