Ищу компонент - ресайзовый уголок (как в TScrollBar)

← →
IGray (2006-08-02 12:52) [0]

Не хочется велосипед изобретать...
Т.е. сам "уголок" в ресайзовых окнах я видеть хочу, но скролбару место уступать не охота ;-/

Посоветуйте, плииз!
Заранее спасибо!

← →
IGray (2006-08-02 12:53) [1]

Сорри, речь про TStatusBar конечно...
(Не выспался :-( )

← →
Игорь Шевченко © (2006-08-02 13:03) [2]

В EhLib"е Дмитрия Большакова есть.

А просто его отрисовать не сойдет?

procedure TForm1.WMEraseBkgnd(var Msg: TMessage); begin inherited; DrawFrameControl(Canvas.Handle, Rect(ClientWidth - 18, ClientHeight - 18, ClientWidth, ClientHeight), DFC_SCROLL, DFCS_SCROLLSIZEGRIP); end; procedure TForm1.FormResize(Sender: TObject); begin Invalidate; end;

Ищу компонент - ресайзовый уголок (как в TScrollBar) Найти похожие ветки