Показать сообщение отдельно
  #14  
Старый 16.03.2009, 22:53
Аватар для Karsh
Karsh Karsh вне форума
Активный
 
Регистрация: 22.09.2007
Адрес: SPb
Сообщения: 228
Версия Delphi: 7, 2009, XE2
Репутация: 70
По умолчанию

Цитата:
Сообщение от DAN
т.е. TCeTButton заменить на обычный TBitBtn, и в 8 мормах тоже? а куда надо вписывать компонент-заменитель...его отдельно создать надо?=((
создаете файл CeTButton.pas и в него вписываем код:
Код:
unit CeTButton;

interface

uses
  Graphics, Classes, Buttons;

type
  TCeTButton = class(TBitBtn)
  private
    GColor: TColor;
  protected
    { Protected declarations }
  public
    { Public declarations }
  published
    property ColorBorder: TColor read GColor write GColor;
  end;

procedure Register;

implementation

procedure Register;
begin
  RegisterComponents('Samples', [TCeTButton]);
end;

end.
Потом в Deplhi выбираем Install Component и устанавливаем этот файл как компоненет (данное описание к Dephi 7 и ниже, а к другим Дельфям я не помню как инсталить компоненты).
После установки компонента исходник будет нормально запускаться и ничего в нем менять не нужно (кроме убирания SplashScreen'а).
__________________
Начинающий программист уверен, что в 1 килобайте 1000 байт.
Законченный программист уверен, что в 1 километре 1024 метра.
Ответить с цитированием