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

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

Вернуться   Форум программистов > Delphi программирование > Компоненты Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

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

Ответ
 
Опции темы Поиск в этой теме
Старый 16.03.2016, 12:07   #1
BLACK_RAIN
Форумчанин
 
Регистрация: 13.02.2012
Сообщений: 867
По умолчанию создание своего компанента в Delphi 2007

Здравствуйте.
Решил попробовать написать свой компонент. Всё более чем понятно, легко и просто. Однако, наткнулся на траблу.
написал примерно это:
Код:
unit Button1;

interface

uses
 Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
 StdCtrls, ExtCtrls;

type
 TCountBtn = class(TButton)
  private
   { Private declarations }
  FCount: integer;
  protected
   { Protected declarations }
  procedure Click;override;
  public
   { Public declarations }
  procedure ShowCount;
  published
   { Published declarations }
  property Count:integer read FCount write FCount;
  constructor Create(aowner:Tcomponent); override;
 end;
 
procedure Register;

implementation

procedure Register;
begin
 RegisterComponents('aaaaaaaa', [TCountBtn]);
end;
 
constructor TCountBtn.Create(aowner:Tcomponent);
begin
 inherited create(Aowner);
end;
 
procedure Tcountbtn.Click;
begin
 FCount:=FCount+1;
 Caption := Inttostr(FCount);
  inherited click;
end;

procedure TCountBtn.ShowCount;
begin
 Showmessage('?? ?????? '+ caption+' ?? ???????: '+inttostr(FCount)+' ????(?/??)');
end;
end.
и сохранил как C:\button2.pas.
В Delphi 7 нажимаем Component > Install component и выбираем наш Pas. Компонент установлен.
А в Delphi 2007 предлагается выбрать BPL-файл. Нельзя выбрать pas.
Как создать BPL-файл для своего компонента?
BLACK_RAIN вне форума Ответить с цитированием
Старый 16.03.2016, 13:20   #2
BLACK_RAIN
Форумчанин
 
Регистрация: 13.02.2012
Сообщений: 867
По умолчанию

всё, дошло. Спасибо.
BLACK_RAIN вне форума Ответить с цитированием
Ответ


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



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Создание своего класса в Delphi 7 - фигуры для шахматной доски electric Компоненты Delphi 18 24.10.2013 15:06
Создание своего календаря Avalon_Albio Помощь студентам 7 06.03.2012 11:19
Удаление ленты в 2007 excel и создание своего меню Raikhman Microsoft Office Excel 2 19.10.2010 00:18
MDI динамическое создание компанента не дочерней форме Grandistok Общие вопросы Delphi 2 14.09.2009 20:39
Создание своего класса AlexandrSid Общие вопросы Delphi 3 19.05.2008 13:28