MI-L Visual and MI OLE (Color Problem) THANK YOU !!

[MAGS (Mapping Global Solutions)]

Thank you veru much to Eric and Trey for your help !.
Really thanks a lot.

Alejandro


----- Original Message -----
From: Eric <[EMAIL PROTECTED]>
To: Gerencia-Mags <[EMAIL PROTECTED]>; MapInfo-L
<[EMAIL PROTECTED]>
Sent: Monday, May 07, 2001 12:33 PM
Subject: RE: MI-L Visual and MI OLE (Color Problem)


> your email adress bounces back to me, so I send this snippet thru the list
> ...
>
> Public Function RGBRed(RGBCol As Long) As Integer
> 'Return the Red component from an RGB Color
>     RGBRed = RGBCol And &HFF
> End Function
>
> Public Function RGBGreen(RGBCol As Long) As Integer
> 'Return the Green component from an RGB Color
>     RGBGreen = ((RGBCol And &H100FF00) / &H100)
> End Function
>
> Public Function RGBBlue(RGBCol As Long) As Integer
> 'Return the Blue component from an RGB Color
>     RGBBlue = (RGBCol And &HFF0000) / &H10000
> End Function
>
> Hope it helps
> Eric.
>
> > -----Message d'origine-----
> > De : [EMAIL PROTECTED]
> > [mailto:[EMAIL PROTECTED]]De la part de
> > Gerencia-Mags
> > Envoy� : lundi 7 mai 2001 09:44
> > � : MapInfo-L
> > Objet : MI-L Visual and MI OLE (Color Problem)
> >
> >
> >
> >
> >
> > Dear List (and Trey Patillo of course !)
> >
> > I have the next problem:
> >
> > I have a VBsaic dialog in which I select diferents values including a =
> > Color using the VBasic CommonDialog control to select a Color.
> >
> > I want to draw all lines in MI (via OLE of course) in that color =
> > selected.
> >
> > The problem is that the CommonDialog don't return excatly the RBG color
=
> > like MI needs.
> > F.E for red return 255, when the RGB color for Red is 255 * 65536.
> >
> > In MapBasic the RGB color is: Red * 65536 + Green * 255 + Blue
> > But in Visual Basic it seems is in the other hand: Blue * 65536 + Green
=
> > * 255 + Red
> >
> > Am I mad?
> >
> > Neither I found a way in V.Basic to obtein the Red, Green and Blue value
=
> > to calculate the RGB color.
> >
> > Any help please ?
> >
> > Regards
> > Alejandro
> >
> >
> >
> > _______________________________________________________________________
> > List hosting provided by Directions Magazine | www.directionsmag.com |
> > To unsubscribe, send e-mail to [EMAIL PROTECTED] and
> > put "unsubscribe MapInfo-L" in the message body.
>
>
>
> _______________________________________________________________________
> List hosting provided by Directions Magazine | www.directionsmag.com |
> To unsubscribe, send e-mail to [EMAIL PROTECTED] and
> put "unsubscribe MapInfo-L" in the message body.
>



_______________________________________________________________________
List hosting provided by Directions Magazine | www.directionsmag.com |
To unsubscribe, send e-mail to [EMAIL PROTECTED] and
put "unsubscribe MapInfo-L" in the message body.