[Giuseppe]

QUOTE (Support @ May 13 2009, 11:16 AM)

I found a cause of issue, here is changed acLFPaint.pas file, please try him (just replace old).

Now it's ok.

And about cx progressbar ?

[Support]

While LookAndFeel technology is not used there, skinning is not possible.
Why you can't use TsProgressBar? Some specific features?

[Giuseppe]

QUOTE (Support @ May 13 2009, 01:55 PM)

While LookAndFeel technology is not used there, skinning is not possible.
Why you can't use TsProgressBar? Some specific features?

No, only to avoid to modify existing projects… Anyway I'll change it.
ThankYou very much.
Giuseppe

[plasticut]

Прорисовка прогрессбара нужна!
Т.к. в cxGrid его можно установить в роли редактора колонки.
В варианте который есть на данный моммент выглядит кривовато.

AC:
[attachment=3263:acProgress.JPG]

DX:
[attachment=3264:dxProgress.JPG]

Буду весьма признателен если Вы добавите поддержку этого контрола!

[Support]

QUOTE (plasticut @ May 16 2009, 04:39 PM)

Буду весьма признателен если Вы добавите поддержку этого контрола!

Есть идеи как это сделать? Лук&фил ведь не поддерживается в нем?

[plasticut]

QUOTE (Support @ May 18 2009, 11:42 AM)

Есть идеи как это сделать? Лук&фил ведь не поддерживается в нем?

В классе TcxCustomLookAndFeelPainter методы
class procedure DrawProgressBarBorder(ACanvas: TcxCanvas; ARect: TRect; AVertical: Boolean); virtual;
class procedure DrawProgressBarChunk(ACanvas: TcxCanvas; ARect: TRect; AVertical: Boolean); virtual;
class function ProgressBarBorderSize(AVertical: Boolean): TRect; virtual;
class function ProgressBarTextColor: TColor; virtual;

Версия dx .42

Могу вечерком их попробывать реализовать.

[plasticut]

Progress bar painter modification for cxGrid

CODE

class procedure TcxACLookAndFeelPainter.DrawProgressBarChunk(ACanvas: TcxCanvas; ARect: TRect; AVertical: Boolean);
var
s: string;
si: integer;
b: TBitmap;
CI: TCacheInfo;
begin
if Skinned then
begin
if AVertical then s := s_ProgressV else s := s_ProgressH;
si := DefaultManager.GetSkinIndex(s);
b := CreateBmp24(WidthOf(ARect), HeightOf(ARect));
try
CI := MakeCacheInfo(<img src="style_emoticons//cool.gif” style=”vertical-align:middle” emoid=”:cool:” border=”0″ alt=”cool.gif” />;
PaintItem(si, s, ci, True, 0, aRect, Point(0, 0), b.Canvas.Handle, DefaultManager);
BitBlt(ACanvas.Handle, aRect.Left, aRect.Top, b.Width, b.Height, b.Canvas.Handle, 0, 0, SRCCOPY);
finally
b.Free
end;
end
else inherited;
end;

Для сетки вроде хватает и этого метода, а для контрола нужно еще бордеры перирисовать…

[Author]

Posts