powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TdxBarManager AV при добавлении кнопки
3 сообщений из 3, страница 1 из 1
TdxBarManager AV при добавлении кнопки
    #39620785
Valery_B
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Я пытаюсь создать в dxBarManager свою кнопку(наследник от TdxBarLargeButton) в Run-Time.
Но возникает ошибка Access Violation при установки Link.Item

Это можно как-то вылечить ?

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
type 
 TMydxBarLargeButton = class(TdxBarLargeButton)
  //класс-наследник, который не делает и не меняет вообще ничего.
 end;
....
procedure TForm1.Button1Click(Sender: TObject);
var
 Button:TdxBarLargeButton;
 Link: TdxBarItemLink;
begin
 Button:=TMydxBarLargeButton.Create(Self); //Если поменять на TdxBarLargeButton - всё работает.
 Button.Caption:='New large button';

 Link := dxBarManager1Bar1.ItemLinks.Add;
 Link.Item := Button; //<-Вот здесь AV
end;

...
Рейтинг: 0 / 0
TdxBarManager AV при добавлении кнопки
    #39620972
Polesov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Привет.

Valery_BЯ пытаюсь создать в dxBarManager свою кнопку(наследник от TdxBarLargeButton) ...

Каждому классу TdxBarItem должен соответствовать свой класс контрола - наследник от TdxBarItemControl.

Добавь в секцию инициализации модуля:
Код: pascal
1.
2.
initialization
  dxBarRegisterItem( TMydxBarLargeButton, TdxBarLargeButtonControl, True );



С уважением, Polesov.
...
Рейтинг: 0 / 0
TdxBarManager AV при добавлении кнопки
    #39621556
Valery_B
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Polesov,

Спасибо, помогло.
Даже очень помогло)
...
Рейтинг: 0 / 0
3 сообщений из 3, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / TdxBarManager AV при добавлении кнопки
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]