yuish
Member | Редактировать | Профиль | Сообщение | Цитировать | Сообщить модератору MagistrAnatol мало написать TMainForm = class(TdxCustomRibbonForm) надо поместить на форму сам TdxRibbon. В нем ApplicationButton сделать визибле труе, добавить там в Glyph иконку (не менее 24*24). Точно не помню, но кажется еще в труе надо поставить SupportNonClientDrawing. PS и еще забыл. надо в юзес обязательно добавить dxRibbonForm пример кода: unit Unit7; interface uses Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, cxClasses, dxRibbon, cxControls,dxRibbonForm; type TForm7 = class(TdxCustomRibbonForm) dxRibbon1Tab1: TdxRibbonTab; dxRibbon1: TdxRibbon; private { Private declarations } public { Public declarations } end; var Form7: TForm7; implementation {$R *.dfm} end. | Всего записей: 218 | Зарегистр. 10-02-2003 | Отправлено: 13:20 18-05-2007 | Исправлено: yuish, 13:26 18-05-2007 |
|