Custom Drawn Controls advances

[lainz]

Felipe there is a way to access all properties of a control?

Because I'm trying to add new buttons in the same drawer.

I already added:

Code: [Select]

type
  TWin7ButtonStyle = (bsNone, bsArrowLeft, bsArrowRight);

  TCDButton = class(customdrawncontrols.TCDButton)
  public
    property Win7Style: TWin7ButtonStyle;
  end;   
To use in this way:

Code: [Select]

CDButton5.Win7Style := bsArrowLeft;
But in the drawer I can't acces the property =)

[felipemdc]

There is a separation to make the drawers independent from changes in the controls. To add more info do like this:

  TMyCDButton...
  protected
    procedure CreateControlStateEx; override;
    procedure PrepareControlStateEx; override; // <-- Check how controls in customdrawncontrols.pas do those overrides

  TMyCDButtonStateEx = class(TCDButtonStateEx) // TCDButtonStateEx comes from customdrawndrawers.pas
  public
    whatever extra info
  end;

And in the drawer you can use the is operator to check if the stateex is your extended version and then cast to it.

[lainz]

Thankyou.

ok this will be useful to create a custom drawn bgrabutton.

since those special buttons do not use caption I chose not to make a new control and left them in extra1 =) changing from one style to other with caption (for now).

[v.denis]

First of all, customdrawn lcl is great beginning.

IMO when it will be mature enough, there just will be no
need it other widgetsets.

I hope to see lazarus drawn with it some day.
Close buttons on editor tabs, that's what I wanted under win

My question is:

Can controls be rendered with hardware support (where available) ?
I mean like FireMonkey in Delphi ? What's better way to implement it ?

[felipemdc]

Can controls be rendered with hardware support (where available) ?
I mean like FireMonkey in Delphi ? What's better way to implement it ?

The architecture was created thinking about this, but is not currently implemented. New backends would be required for this, for example a backend for OpenGL, OpenGL ES and/or DirectX.

[v.denis]

The architecture was created thinking about this, but is not currently implemented. New backends would be required for this, for example a backend for OpenGL, OpenGL ES and/or DirectX.

Can you please describe just brief steps how this can be done or link to wiki.
I'd like to try myself to create some h/w accelerated controls.
Need a point to start from.

[felipemdc]

Can you please describe just brief steps how this can be done or link to wiki.
I'd like to try myself to create some h/w accelerated controls.
Need a point to start from.

You have to read and familiarize yourself with the source code of LCL-CustomDrawn:

http://svn.freepascal.org/cgi-bin/viewvc.cgi/trunk/lcl/interfaces/customdrawn/?root=lazarus

There is a define for each backend. You need to add a new backend and implement everything necessary.

[Rustam Asmandiarov]

Можно ли на форму с Custom Draw Widget рисовать openGL окно или нужно создавать свое окно?
Is it possible to form with Custom Draw Widget drawing openGL window or need to create its own window?

[felipemdc]

Support for a sub-window with OpenGL support is possible but currently not implemented.

[lainz]

Hi Felipe, how I can enable the debug VerboseCDPaintProfiler? And how I can read the output of that.

Code: [Select]

And here debug information defines:
VerboseCDPaintProfiler - Adds profiling information to indicate how fast the paint event is processed

[felipemdc]

Define it in the file lcl/interfaces/customdrawn/customdrawndefines.inc

[lainz]

It's already defined, but how I can read the output of that?

[felipemdc]

In the console, like always. If you are in Windows uncheck the option "win32 graphical program" (or similar name) in the Project Options dialog

[Fahmy Rofiq]

Hello, I'm testing TCDPageControl, when I use nboShowCloseButton the close button placed incorrectly if TCDTabSheets caption length are not equal.
Any one realize this?

[felipemdc]

Please create a bug report about this in our bug tracker. Even better if you could come up with a solution and attach a patch which fixes the issue