Модераторы: Snowy, MetalFan, bems, Poseidon
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Созданный компонент не отображается в палитре, создал компонент, но не могу подключить 
:(
    Опции темы
lavrenty
Дата 12.10.2012, 23:18 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.3.2007

Репутация: нет
Всего: нет



Здравствуйте все! Пробую создать свой компонент в D2010. Ни разу раньше не делал, взял простой пример, всё вроде прошло, ошибок нет. Библиотеку bpl (с моим компонентом) через Component -> Install Packages подключил, но ни палитры, ни компонента не вижу. Что не так делаю?
PM MAIL   Вверх
northener
Дата 13.10.2012, 00:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
***


Профиль
Группа: Завсегдатай
Сообщений: 1361
Регистрация: 2.9.2010

Репутация: 12
Всего: 20



Цитата(lavrenty @  12.10.2012,  23:18 Найти цитируемый пост)
Ни разу раньше не делал, взял простой пример, всё вроде прошло, ошибок нет. 

Код в студию!


--------------------
Но только лошади летают вдохновенно.
Иначе лошади разбились бы мгновенно!
PM MAIL   Вверх
lavrenty
Дата 13.10.2012, 09:33 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Новичок



Профиль
Группа: Участник
Сообщений: 15
Регистрация: 13.3.2007

Репутация: нет
Всего: нет



Код

unit CountBtn;

interface

uses
  System.SysUtils, System.Classes, Vcl.Controls, Vcl.StdCtrls, Vcl.Dialogs;

type
  TCountBtn = class(TButton)
  private
    { Private declarations }
    FCount  : integer;

  protected
    { Protected declarations }

  public
    { Public declarations }
    procedure ShowCount;
    procedure Click ; override;
  published
    { Published declarations }
    property Count  : integer read FCount write FCount;
    constructor Create(Aowner : TComponent); override;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('MyComponents', [TCountBtn]);
end;

constructor TCountBtn.Create(Aowner : TComponent);
begin
  inherited Create(Aowner);
end;

procedure TCountBtn.ShowCount;
begin
 Showmessage('По кнопке '+ caption+' вы сделали: '+inttostr(FCount)+' клик(а/ов)');
end;


end.

PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Для новичков"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Для новичков | Следующая тема »


 




[ Время генерации скрипта: 0.0645 ]   [ Использовано запросов: 21 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.