Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.03.2010, 19:06   #1
vovan1991
 
Регистрация: 23.03.2010
Сообщений: 3
По умолчанию Запись Win API TLogFont

Я пишу компонент типа CheckBox и пользуюсь типом API TLogFont для настройки текста. На инспектор объектов я вывел возможность менять угол текста, ну и некоторые другие поля этой записи. Вопрос вот в чем: Можно ли эти свойства сгрупировать так как TFont в инспекторе объектов групируется??? Если да, напишите пожалуйста простенький примерчик. Просто списочек большой получился
vovan1991 вне форума Ответить с цитированием
Старый 23.03.2010, 20:43   #2
alexBlack
Участник клуба
 
Регистрация: 12.10.2007
Сообщений: 1,204
По умолчанию

Можно выделить все свойства в отдельный класс, как это сделано с TFont, а можно зарегистрировать свойство в отдельной категории. Простой пример:

Код:
uses classes;

type
   TMyProp = class(TPersistent)
   private
      FName : String;
      FVal : integer;
   published
      property Nm : String read FName write FName;
      property Val : integer read FVal write FVal;
   end;

   TMyComponent = class(TComponent)
   private
      FProp : TMyProp;
      FOrient : integer;
   published
      property Prop : TMyProp read FProp write FProp;
      property Orient : integer read FOrient write FOrient;
   public
      constructor Create(aOwner:TComponent); override;
      destructor Destroy; override;
   end;

procedure Register;

implementation

uses DesignIntf;

constructor TMyComponent.Create(aOwner:TComponent);
begin
   inherited Create(aOwner);
   FProp := TMyProp.Create;
end;

destructor TMyComponent.Destroy;
begin
   FProp.Free;
   inherited Destroy;
end;

procedure Register;
begin
   RegisterComponents('test', [TMyComponent]);
   RegisterPropertyInCategory('Font', 'Orient');
end;
alexBlack вне форума Ответить с цитированием
Старый 23.03.2010, 21:04   #3
vovan1991
 
Регистрация: 23.03.2010
Сообщений: 3
По умолчанию

Интересная идейка, Спасибо большущее
vovan1991 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Win API -> ActiveX lebedun Общие вопросы C/C++ 0 28.03.2009 03:48
Win Forms Api Cdevelop Windows Forms 1 22.03.2009 01:01
Win Api alexov Общие вопросы C/C++ 4 29.01.2009 13:33
Win API aleks_n Общие вопросы Delphi 0 15.09.2008 11:07