CF.RGBtoHex ( DRGB )

Converts RGB color string into a Hex color string

Average rating: 4.6 (24 votes) Log in to vote

Thomas Hellwig
DELASOCIAL GmbH
http://www.delasocial.com/

Sample input:

CF.RGBtoHex ( "255083064" )

Sample output:

#FF5340

Function definition: (Copy & paste into FileMaker's Edit Custom Function window)

/*
___ Function name: CF.RGBtoHex ( DRGB )
___ Version: 2.0 (Apr. 24th 2014)
___ Code language: German 
___ FMP version: 12 
___ Feb. 27th 2014
___ Author: Thomas Hellwig 
___ Contact: grafzahl68@gmx.de

Description:
This function converts a decimal RGB color string like "255083064" into a hexadecimal color string like "#FF5340".

Parameter ( DRGB ):
A decimal string of nine digits (red, green, blue).

Comment:
The bug in version 1.0 is now corrected.

Examples:
Input                                  Output
_______________________________________
015016017                         #0F1011
000001255                         #0001FF
002201254                         #02C9FE

*/
 
//############################################################################################


SetzeVars (
[
HEXCS = "123456789ABCDEF";

R3 = LiesAlsZahl ( ZeichenLinks ( DRGB ; 3 ) ) ;
G3 = LiesAlsZahl ( ZeichenMitte ( DRGB ; 4 ; 3 ) ) ;
B3 = LiesAlsZahl ( ZeichenRechts ( DRGB ; 3 ) ) ;

RR = Falls ( R3 < 16 ; "0" ; ZeichenMitte ( HEXCS ; Ganzzahl ( R3 / 16 ) ; 1 ) ) & Falls ( R3 > 16 ; ZeichenMitte ( HEXCS ; Mod ( R3 ; 16 ) ; 1 ) ; R3 = 0 ODER R3 = 16 ; "0" ; ZeichenMitte ( HEXCS ; R3 ; 1 ) ) ;
GG = Falls ( G3 < 16 ; "0" ; ZeichenMitte ( HEXCS ; Ganzzahl ( G3 / 16 ) ; 1 ) ) & Falls ( G3 > 16 ; ZeichenMitte ( HEXCS ; Mod ( G3 ; 16 ) ; 1 ) ; G3 = 0 ODER G3 = 16 ; "0" ; ZeichenMitte ( HEXCS ; G3 ; 1 ) ) ;
BB = Falls ( B3 < 16 ; "0" ; ZeichenMitte ( HEXCS ; Ganzzahl ( B3 / 16 ) ; 1 ) ) & Falls ( B3 > 16 ; ZeichenMitte ( HEXCS ; Mod ( B3 ; 16 ) ; 1 ) ; B3 = 0 ODER B3 = 16 ; "0" ; ZeichenMitte ( HEXCS ; B3 ; 1 ) )
] ;

"#" & RR & GG & BB

) //---------- EndVars

This function converts a decimal RGB color string like "255083064" into a hexadecimal color string like "#FF5340".

Comments

		unix, Japan Mar 2, 2014
In your result, some value should be 0 become 1 ? Let ( s = GetAsCSS ( TextColor ( Â¶ ; Left ( DRGB ; 3 ) 256256 + Middle ( DRGB ; 4 ; 3 ) * 256 + Right ( DRGB ; 3 ) ) ) ; Middle ( s ; Position ( s ; "#" ; 1 ; 1 ) ; 7 ) )

		T. Hellwig, Hamburg (GER) Mar 8, 2014
thank you! i am working to solve the problem. and thanks for your alternative example!

Note: these functions are not guaranteed or supported by BrianDunning.com. Please contact the individual developer with any questions or problems.

CF.RGBtoHex ( DRGB )

Comments

Support this website.

Support this website.