More Colors?

VCL TMS VCL UI Pack
1

Hi Bruno,


I use TAdvOfficeColorSelector to enable the user to select a color.  The other day I realized that in my apps the "More Colors" doesn't do anything.  After fumbling around for quite some time (and with no luck), I fired up the demos.  They also don't do anything when you press "More Colors". 

So how do you use the "More Colors" option?

Thanks,

Steve
2

This is in the FAQ:

http://www.tmssoftware.com/site/advofficegraphics.asp?s=faq&show=289
3

Thanks!


I'd recommend adding this to the demo,

Best regards,

Steve
4

Hi Bruno,


When I added the code the application looses focus once the "More Colors" button is pressed.  Here is a video which shows the issue using your demo:

http://screencast.com/t/ZYXyk4iPd

Any pointer?

Steve
5

We have implemented an improvement to have better control over this. The next update will have this improvement to allow you to use the code:


procedure TForm1.AdvOfficeColorSelector1Select(Sender: TObject; Index: Integer;
  Item: TAdvSelectorItem);
begin
 if item.Index = 41 then
  begin
    AdvOfficeColorSelector1.BlockDropDown(True);
    if colordialog1.Execute(0) then
      AdvOfficeColorSelector1.SelectedColor := colordialog1.Color;

    AdvOfficeColorSelector1.BlockDropDown(false);
  end;
end;
6

Great!  Thanks!

7

Hi Bruno,


It's still not quite working as it should.  Here's a short video which explains the problem.

http://screencast.com/t/jm1atZQhLAL

Thanks,

Steve

P.S. The demos do not have the More Colors capability