Difference between revisions of "ColorBox"
From Lazarus wiki
Jump to navigationJump to searchLine 38: | Line 38: | ||
To create the component at runtime use the following code : | To create the component at runtime use the following code : | ||
− | procedure TForm1.Form1Create(Sender: TObject); | + | procedure TForm1.Form1Create(Sender: TObject); |
− | begin | + | begin |
− | + | cbColorBox := TColorBox.Create(Self); | |
− | + | cbColorBox.Parent := Self; | |
− | + | cbColorBox.Left := 100; | |
− | + | cbColorBox.Top := 100; | |
− | + | cbColorBox.Palette := cpFull; | |
− | end; | + | end; |
Make sure you don't forget to declare a global variable cbColorBox. | Make sure you don't forget to declare a global variable cbColorBox. |
Revision as of 18:18, 16 June 2005
About
ColorBox is a component that lets you select any predefined color with preview. There are two predefined palettes available:
- cpDefault (some frequently used named colors)
- cpFull (all named colors)
The download contains the component, and a patch to make use of the cpFull option.
This component was designed for cross-platform applications.
Author
License
Download
The latest stable release can be found on the Lazarus CCR Files page.
Change Log
- Version 1.0 2005/05/16
Dependencies / System Requirements
- None
Status: Beta
Issues: Tested on Windows. Needs testing on Linux.
Installation
- Apply the patch colorbox.diff
- Install the component or create it at runtime
Creation at runtime
To create the component at runtime use the following code :
procedure TForm1.Form1Create(Sender: TObject); begin cbColorBox := TColorBox.Create(Self); cbColorBox.Parent := Self; cbColorBox.Left := 100; cbColorBox.Top := 100; cbColorBox.Palette := cpFull; end;
Make sure you don't forget to declare a global variable cbColorBox.