Цитата:
Сообщение от 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'а).