Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.11.20;
Скачать: CL | DM;

Вниз

Подскажите где ошибка   Найти похожие ветки 

 
DelphiLexx ©   (2005-10-28 20:17) [0]

Есть наследник от TControl"a TMyControl = class(TControl).
в Create пишу:

procedure TMyControl.Create(AOwner: TComponent);
  Self.Parent := AOwner;
  panel := TPanel.Create(Self)
  with panel do begin
    panel.Visible := false;
    DoubleBuffered := true;
    Parent := TWinControl(Self);
  end;
  GlueImageTop := TImage.Create(panel);  
  with GlueImageTop do begin
    Parent := TWinControl(panel);
    Align := alTop;
    Cursor :=crUpArrow;
    Transparent := true;
  end;
end.


 
Джо ©   (2005-10-28 20:24) [1]


> в Create пишу:

Тело процедуры должно начинаться с begin.


 
DelphiLexx ©   (2005-10-28 20:33) [2]


> Тело процедуры должно начинаться с begin.

begin я случайно забыл. Вообщем не в begin то дело


 
Джо ©   (2005-10-28 20:39) [3]


> Вообщем не в begin то дело

А в чем?


 
Anatoly Podgoretsky ©   (2005-10-28 20:41) [4]

DelphiLexx ©   (28.10.05 20:33) [2]
И ты хочешь, что бы по другому коду мы сделали диагноз?


 
Джо ©   (2005-10-28 20:46) [5]


>  [4] Anatoly Podgoretsky ©   (28.10.05 20:41)
> И ты хочешь, что бы по другому коду мы сделали диагноз?

Диагноз уже вот-вот сделают :))

2 DelphiLexx ©
Опиши, что должен выполнять твой код, что он на самом деле выполняет и, если есть, сообщение об ошибке и строку.


 
jack128 ©   (2005-10-28 22:00) [6]

DelphiLexx ©   (28.10.05 20:17)
TMyControl = class(TControl).

DelphiLexx ©   (28.10.05 20:17)
procedure TMyControl.Create(AOwner: TComponent);

DelphiLexx ©   (28.10.05 20:17)
Parent := TWinControl(Self);

Как прикажешь тебя понимать, Саид???



Страницы: 1 вся ветка

Текущий архив: 2005.11.20;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.047 c
14-1130221641
КаПиБаРа
2005-10-25 10:27
2005.11.20
Навыки Успеха для тех, кому от 16 до 30 лет


11-1110221256
Shanker
2005-03-07 21:47
2005.11.20
Проблемы с установкой Socket


1-1130526619
John Doe
2005-10-28 23:10
2005.11.20
Односвязный список,почему у меня не связывает? :)


1-1129799131
Layner
2005-10-20 13:05
2005.11.20
Вводится ли шрифт балтийских языков в поле, где CHARSET=


14-1130423242
oldman
2005-10-27 18:27
2005.11.20
Опрос. Приглашаются мужчины и (особенно) женщины.