BGRA Controls

[karaba]

That was fast thanks.

[lainz]

Great controls.

SVN r12
I've fixed the small problems in Analog Controls, all working.

[lainz]

SVN r14
bgra-controls 3.2

We have 25 controls in the BGRA Controls pallete. BCFilters, BCEffect and units with overridable visual components. Games, Custom Drawn Drawer and TAChart demo and other example projects.

Now with Analog Controls: 2 clock and 2 gauge controls. One for quick use and other with custom styling.

Try AssignFromFile for BCButton and BCImageButton to load styles from plain text files at runtime.

Well that's all! Thanks to all contributors in the readme.txt and in this forum that helped to achieve this!

[lainz]

In the lattest SVN added: BGRAScript.pas and test_bgrascript project.

BGRAScript:
    {TFPCustomImage override}
SetSize,320,240
    {Loading functions}
SaveToFile,"file.png"
    {Loading functions}
SetHorizLine,0,0,100,"rgba(0,0,0,255)"
XorHorizLine,0,0,100,"rgba(0,0,0,255)"
DrawHorizLine,0,0,100,"rgba(0,0,0,255)"
FastBlendHorizLine,0,0,100,"rgba(0,0,0,255)"
AlphaHorizLine,0,0,100,"rgba(0,0,0,255)"
SetVertLine,0,0,100,"rgba(0,0,0,255)"
XorVertLine,0,0,100,"rgba(0,0,0,255)"
DrawVertLine,0,0,100,"rgba(0,0,0,255)"
FastBlendVertLine,0,0,100,"rgba(0,0,0,255)"
AlphaVertLine,0,0,100,"rgba(0,0,0,255)"
DrawHorizLinediff,0,0,100,"rgba(0,0,0,255)","rgba(255,255,255,255)",128
    //--
FillTransparent
Rectangle,0,0,100,100,"rgba(0,0,0,255)","rgba(255,255,255,255)"
RectangleAntiAlias,"0,5","0,5","99,5","99,5","rgba(0,0,0,255)","1,5","rgba(255,255,255,255)"

[circular]

Just a hint about rgba: the last parameter is a single from 0 to 1. I did it like that to follow CSS spec. 

[lainz]

Just a hint about rgba: the last parameter is a single from 0 to 1. I did it like that to follow CSS spec. 

Ok thanks!

[lainz]

Code: [Select]

procedure FilterRGB(Bitmap: TBGRABitmap; R, G, B: byte);

procedure RBG(Bitmap: TBGRABitmap);
procedure GRB(Bitmap: TBGRABitmap);
procedure GBR(Bitmap: TBGRABitmap);
procedure BRG(Bitmap: TBGRABitmap);
procedure BGR(Bitmap: TBGRABitmap);
procedure RRG(Bitmap: TBGRABitmap);
procedure RGR(Bitmap: TBGRABitmap);
procedure GRR(Bitmap: TBGRABitmap);
procedure RRB(Bitmap: TBGRABitmap);
procedure RBR(Bitmap: TBGRABitmap);
procedure BRR(Bitmap: TBGRABitmap);
procedure GGR(Bitmap: TBGRABitmap);
procedure GRG(Bitmap: TBGRABitmap);
procedure RGG(Bitmap: TBGRABitmap);
procedure GGB(Bitmap: TBGRABitmap);
procedure GBG(Bitmap: TBGRABitmap);
procedure BGG(Bitmap: TBGRABitmap);
procedure BBR(Bitmap: TBGRABitmap);
procedure BRB(Bitmap: TBGRABitmap);
procedure RBB(Bitmap: TBGRABitmap);
procedure BBG(Bitmap: TBGRABitmap);
procedure BGB(Bitmap: TBGRABitmap);
procedure GBB(Bitmap: TBGRABitmap);
procedure RRR(Bitmap: TBGRABitmap);
procedure GGG(Bitmap: TBGRABitmap);
procedure BBB(Bitmap: TBGRABitmap);
Added all these filters, now you can switch easily between all possible combinations of RGB channels.

Added rain project: a random generated animated rain.

[Roland57]

Hello 007!

Where can I find the latest version of BGRA-Controls? Could you give a link please?

[Jurassic Pork]

Salut Roland,

va voir par ici :   http://sourceforge.net/p/bgra-controls/code/HEAD/tree/

007  is it the good link ?

[Roland57]

Merci! That's what I was looking for.

[Basile B.]

Hi 007. Would it be possible for you to put a hook on the SF svn and then to mirror it on gitHUB ? (a bit like what's been done for FPC & Laz) ?

For example if someday, someone uses BGRA-Ctrls in a project hosted on GH it'll be more simple for the guy to put it as a sub dependency. (although it's not granted it'll ever happend).

[lainz]

that's the link.

about gh we have one copy but is outdated https://github.com/bgrabitmap

[Basile B.]

Thx. Thumb up.

http://referentiel.nouvelobs.com/file/8118406-video-de-quelle-mysterieuse-maladie-souffre-kaleem.jpg

 , yes I'm an ashole. I joke with this.

[circular]

Wow Basile that's impressive!

[Jurassic Pork]

more infos about Kaleem
here