LAMW How convert colors to TARGBColorBridge
lazarus / 43-Android

----------------------------------------------------------------------
maxx · 2017-10-03 04:56

Hello!
Is it possible convert colors from TColorRGB to TARGBColorBridge,
or choose a similar color from TARGBColorBridge in run-time?

----------------------------------------------------------------------
maxx · 2017-10-03 08:29

Done.
Code: Pascal  [Select][+][-]window.onload = function(){var x1 =
document.getElementById("main_content_section"); if (x1) { var x =
document.getElementsByClassName("geshi");for (var i = 0; i function
TAndroidModule1.ARGBtoCustomColor(conv_clr: TColorRGBA): DWORD;begin 
Result := (conv_clr.A shl 24) + (conv_clr.R shl 16) + (conv_clr.G shl
8) + conv_clr.B;end; procedure
TAndroidModule1.AndroidModule_ColorPickJNIPrompt(Sender: TObject);var 
my_color: TColorRGBA;begin   //My Custom color Yellow (as example) 
my_color.A := $FF; //Not transparent  my_color.R := $FF;  my_color.G
:= $FF;  my_color.B := $00;   jPanel_Current_ColorPick.CustomColor :=
ARGBtoCustomColor(my_color);  
jPanel_Current_ColorPick.BackgroundColor := colbrCustom;end;

----------------------------------------------------------------------
maxx · 2017-10-03 12:00

I did it for this little prog.

ColorPicker example for LAMW:Android

Enjoy friends!

----------------------------------------------------------------------
jmpessoa · 2017-10-03 20:13

Added to LAMW repo  as GUI demo "ColorPicker"!

ref. https://github.com/jmpessoa/lazandroidmodulewizard

Thank you!

----------------------------------------------------------------------
neuro · 2022-07-15 22:44

In year 2017 maxx made Color Picker demo, which had a serious defect –
it was constantly writing color picker image to file.
I completely rewrote it – I eliminated writing of color picker image
to file, so now Color Picker works faster and all calculations are
done in memory.
Attachment is available in page:
https://forum.lazarus.freepascal.org/index.php/topic,52567.0.html