Реферат: Созание компоненты

NEdit_.Left := 24;

end;

procedure TForm1.Button1Click(Sender: TObject);

begin

Label1.Caption := FloatToStr(NEdit_.Num);

end;

end.

Наша компонента динамически создается в процедуре создания формы, т.е. в момент создания формы. Скомпилируйте программу, запустите и убедитесь, что все работает как надо. Если возникли ошибки при компиляции либо какие то вопросы, то милости просим на наш форум.

Устанавливаем компоненту на палитру компонент.

У всех компонент на палитре есть свои значки. А мы то чем хуже? Давайте нарисуем иконку для нашей компоненты. В меню Tools выбирайте команду Image Editor (если вы его установили в момент установки дельфи). В появившемся окне выбираем File->New->Component Resource File. Создастся пустой файл ресурсов для компонент. Правой кнопкой щелкаем на Contents и выбираем New->Bitmap. Устанавливаем размер 24x24 и 16 цветов. Что бы переименовать ресурс, щелкните правой кнопкой мыши на Bitmap1 и выбирите команду Rename. Установите имя ресурса TNEdit1(очень важно!!!). Дважды щелкните на TNEdit1. Откроется окно редактирование битового образа. Нарисуйте иконку и сохраните файл ресурсов в ту папку, где находится модуль NEdit1 под именем NEdit1.dcr.

Теперь, когда файл ресурсов с иконкой готов, можно приступить к непосредственно установке компоненты. Для этого выберите из меню Component команду Install Component. Откроется диалоговое окно Install Component. В поле UnitFileName укажите путь к модулю компоненты. В поле Search Path указаны пути, по которым во время установки компоненты дельфи будет искать необходимые файлы. Поле Package file name содержит имя пакета, куда будет устанавливаться компонента. Удостоверьтесь, что все поля вы заполнили правильно, нажмите кнопку Ok и потвердите обновление пакета. Если все прошло успешно то появляется окно с информацией о добавленых модулях. Вот и все. Свою компоненту вы найдете на той вкладке, которую указали в самом начале создания компоненты.