Re: Создание компонентов в Delphi
От: starosta_rk6  
Дата: 24.08.04 19:47
Оценка:
Здравствуйте, Михаил Голованов, Вы писали:

МГ>Статья:



МГ>Авторы:

МГ> Михаил Голованов

МГ>Аннотация:

МГ>В статье рассматриваются основные стадии построения компонентов Delphi на примере создания собственного controla-а


Берем пример из статьи один в один:


unit uCoolLabel;

interface

uses
  SysUtils, Classes, Controls, StdCtrls;

type
  TmgCoolLabel = class(TLabel)
  private
    { Private declarations }
  protected
    { Protected declarations }
  public
    { Public declarations }
    constructor Create(AOwner:TComponent);override;
  published
    { Published declarations }
    property Height default 30;
    property Width default 85;
  end;

procedure Register;

implementation
код вырезан для экономии места
end.


и при попытке установить компонент Component-Install component...

получаем следующую ошибку:
[Fatal Error] uCoolLabel.pas(1): Program or unit 'uCoolLabel.pas' recursively uses itself


Delphi 7, все настройки по умолчанию, установка полная.
 
Подождите ...
Wait...
Пока на собственное сообщение не было ответов, его можно удалить.