С Новым годом! Форум программистов, компьютерный форум, киберфорум
C++ Builder
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
Рейтинг 4.67/9: Рейтинг темы: голосов - 9, средняя оценка - 4.67
98 / 81 / 14
Регистрация: 26.07.2013
Сообщений: 594

Доступ к недоступному свойству компонента

23.10.2013, 11:23. Показов 1829. Ответов 11
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
- Здравствуйте уважаемые форумчане! Возникла нужда порисовать на Canvas Панели.
Но, когда набрал: Panel1->Canvas;, то узнал, что она - недоступна!
- Где-то на форуме уже видел, как можно до нее добраться, но сейчас никак не могу найти ...
По моему метр UI был силен в таких приемах ...
Подскажите пожалуйста. Заранее спасибо! ...
0
cpp_developer
Эксперт
20123 / 5690 / 1417
Регистрация: 09.04.2010
Сообщений: 22,546
Блог
23.10.2013, 11:23
Ответы с готовыми решениями:

Как программно обратиться к свойству edit.OnKeyPress из другого компонента?
У стандартной кнопки, например, есть свойство .Click, которое не требует параметров для ввода. Как можно подобным образом из любого...

Доступ к свойству
Скажите пожалуйста, не мог понять в чём дело function get_img_size(url){ var tmpImg = new Image(); var obj = new Object(); ...

Borland C++ Builder. Как свойству Text компонента Edit присвоить значение строки?
Как свойству Text компонента Edit присвоить значение строки? string a; a = "word"; Edit1->Text = a; Вылетает ошибка: ...

11
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33197 / 21493 / 8233
Регистрация: 22.10.2011
Сообщений: 36,886
Записей в блоге: 12
23.10.2013, 11:33
Лучший ответ Сообщение было отмечено как решение

Решение

Как поймать двойной щелчок по компоненту Splitter?, можно по аналогии перенести Canvas панели в public...
3
Диссидент
Эксперт C
 Аватар для Байт
27714 / 17332 / 3810
Регистрация: 24.12.2010
Сообщений: 38,978
23.10.2013, 11:44
Как-то так
C++
1
2
3
4
5
6
class TMyPanel : public TPanel {
 __published:
    property TCavas Canvas;  // Переписать из объявления TPanel
      // и переопределить методы доступа к Canvas
...
};
я правильно понимаю?
1
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33197 / 21493 / 8233
Регистрация: 22.10.2011
Сообщений: 36,886
Записей в блоге: 12
23.10.2013, 11:57
Лучший ответ Сообщение было отмечено как решение

Решение

Зачем создавать наследника с другим именем? Чтобы потом были проблемы с использованием его в Design-тайме? Создавай класс - перехватчик, с тем же именем, что и оригинальный класс, но в своем неймспейсе, перед описанием класса формы, тогда вообще ничего менять не придется, всё так же точно будет работать, как и работало, но прибавится еще доп. функционал...
3
Диссидент
Эксперт C
 Аватар для Байт
27714 / 17332 / 3810
Регистрация: 24.12.2010
Сообщений: 38,978
23.10.2013, 12:01
Цитата Сообщение от UI Посмотреть сообщение
Создавай класс - перехватчик, с тем же именем, что и оригинальный класс, но в своем неймспейсе, перед описанием класса формы, тогда вообще ничего менять не придется, всё так же точно будет работать, как и работало, но прибавится еще доп. функционал...
Здорово!
А не скажете ли, нет ли материалов, где можно подробнее узнать об этом приемчике, с примерами...
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33197 / 21493 / 8233
Регистрация: 22.10.2011
Сообщений: 36,886
Записей в блоге: 12
23.10.2013, 12:08
Лучший ответ Сообщение было отмечено как решение

Решение

Для Дельфи эту технику описывал в одной из своих Delphi Handbooks Марко Канту (в какой точно - не помню, где-то в младших версиях Дельфи), для Билдера - не встречал, но зная С++ и зная Дельфи, умею переводить код из Дельфийского в Билдеровский.
3
98 / 81 / 14
Регистрация: 26.07.2013
Сообщений: 594
23.10.2013, 13:55  [ТС]
- Спасибо, спасибо, UI! Класс!! Именно это я и искал. Помню, что видел что-то в таком духе ...
Все даже остается под своими именами. Дополнительное пространство имен можно оформить в виде
дополнительного хедерка. А, впрочем, и не нужно. Еще раз спасибо UI! Буду переделывать ...
1
Диссидент
Эксперт C
 Аватар для Байт
27714 / 17332 / 3810
Регистрация: 24.12.2010
Сообщений: 38,978
23.10.2013, 14:08
Цитата Сообщение от Staut Посмотреть сообщение
Буду переделывать ...
Если вам не сложно, покажите, что получилось. Именно то, что касается "недоступного" Canvas-а
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33197 / 21493 / 8233
Регистрация: 22.10.2011
Сообщений: 36,886
Записей в блоге: 12
23.10.2013, 14:26
Лучший ответ Сообщение было отмечено как решение

Решение

Байт, вот так делается доступность канваса:

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
namespace MyNamespace // перед классом формы 
{
    class TPanel : public Extctrls::TPanel
    {
    public:
        inline __fastcall virtual TPanel(Classes::TComponent* AOwner) :
            Extctrls::TPanel(AOwner) {}
 
        __property Canvas; // Всё, больше ничего не надо... Canvas уже в public ...
    };
}
#define TPanel MyNamespace::TPanel
 
// #define - это чтобы компилятор не вякал на переопределение класса ...
4
98 / 81 / 14
Регистрация: 26.07.2013
Сообщений: 594
23.10.2013, 17:08  [ТС]
- Байт, вот фрагмент заголовочного файла пробного проекта:
C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
//##### ..... #####
//==============================================================================
// *** ДЛЯ ОСУЩЕСТВЛЕНИЯ ДОСТУПА К СВОЙСТВУ TPanel->Canvas. ***
namespace  My_Panel_Canvas
{
  //--------------------------------------------------------------------------
  // моя TPanel.
  class  TPanel  : public  Extctrls::TPanel
  {
  __published:
    // мое (ОТКРЫТОЕ) свойство.
    __property  Canvas;
 
  public:
    // конструктор.
    inline __fastcall virtual  TPanel(Classes::TComponent* AOwner)
      : Extctrls::TPanel(AOwner)  {}
 
  };
  //--------------------------------------------------------------------------
};  //(My_Panel_Canvas)
// подставляем вместо стандартной TPanel мою TPanel из моего Пространства Имен.
#define  TPanel  My_Panel_Canvas::TPanel
//==============================================================================
 
 
//##### ..... #####
//------------------------------------------------------------------------------
class  TForm1  : public  TForm
{
__published:    // IDE-managed Components
 
private:    // User declarations
  // указатель на динам. Панель (С УЖЕ ДОСТУПНЫМ Canvas).
  TPanel*  pnl;
 
public:     // User declarations
  // конструктор.
  __fastcall  TForm1(TComponent*  Owner);
 
};
//------------------------------------------------------------------------------
extern PACKAGE TForm1 *Form1;
//------------------------------------------------------------------------------
- pnl->Canvas - действительно доступна!
2
98 / 81 / 14
Регистрация: 26.07.2013
Сообщений: 594
24.10.2013, 11:31  [ТС]
- UI, насколько я понял, здесь важную роль играет - Extctrls ? ...
0
Супер-модератор
Эксперт Pascal/DelphiАвтор FAQ
 Аватар для volvo
33197 / 21493 / 8233
Регистрация: 22.10.2011
Сообщений: 36,886
Записей в блоге: 12
24.10.2013, 11:35
Разумеется, ты же указываешь, в каком неймспейсе описан оригинальный компонент, от которого наследуешься. Без этого у тебя просто ничего не будет компилироваться.
1
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
raxper
Эксперт
30234 / 6612 / 1498
Регистрация: 28.12.2010
Сообщений: 21,154
Блог
24.10.2013, 11:35
Помогаю со студенческими работами здесь

Доступ к свойству animate
Здравствуйте подскажите пожалуйста как реализовать следующую задачу Создать свой метод inOut, который эмулирует функционал методов...

Доступ к свойству TopItem ListView
Доброе время суток, форумчане. Не могу понять следующее: создаю динамически листвью, обращаюсь к свойству TopItem и получаю ошибку. Если...

Получить доступ к свойству в ViewModel
Кто знает как получить именно нужный биндинг или свойство? Это просто пример, в реале таких кнопок много в DataGrid внутри...

Доступ к свойству объекта через переменную
#include <iostream> class Student { public: char* fname; char* sname; Student(char* fname, char * sname) { ...

Доступ к свойству RithTextBox.Text в своем компоненте
помогите разобраться, создаю новый компонент используя RithTextBox, нужно использовать свойство Text но его нет. я пытался создать...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
12
Ответ Создать тему
Новые блоги и статьи
Модель микоризы: классовый агентный подход
anaschu 02.01.2026
Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути
Programma_Boinc 01.01.2026
Учёным и волонтёрам проекта «Einstein@home» удалось обнаружить четыре гамма-лучевых пульсара в джете Млечного Пути Сочетание глобально распределённой вычислительной мощности и инновационных. . .
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост.
Programma_Boinc 28.12.2025
Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / **********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / **********/ gallery/ bKBkQFf Пост отсюда. . .
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США.
Programma_Boinc 26.12.2025
Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .
Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка.
Programma_Boinc 23.12.2025
Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .
PhpStorm 2025.3: WSL Terminal всегда стартует в ~
and_y87 14.12.2025
PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .
Как объединить две одинаковые БД Access с разными данными
VikBal 11.12.2025
Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.
Новый ноутбук
volvo 07.12.2025
Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом
volvo 04.12.2025
Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .
От async/await к виртуальным потокам в Python
IndentationError 23.11.2025
Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru