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

Вниз

protected method   Найти похожие ветки 

 
oneman ©   (2002-08-09 11:06) [0]

могу ли я воспользовться subj в свой программе, например:

TComponent.ProtectedMethod ?

дело в том, что этот метод не отображает в локаторе, а мне очень необходимо им воспользоваться...


 
Юрий Федоров ©   (2002-08-09 11:08) [1]

можно пользоваться из тела метода потомка TComponent


 
Skier ©   (2002-08-09 11:19) [2]

>oneman


type
THackComponent = class(TComponent);

var
AComponent : TComponent;
begin
//................
THackComponent(AComponent).ProtectedMethod;
//................
end;


 
oneman ©   (2002-08-09 13:25) [3]

что-то никак не получается, можно подробнее, если не затруднит, дайте ссылки на доки по этому вопросу.


 
Skier ©   (2002-08-09 13:28) [4]

>oneman

> что-то никак не получается


Покажи как делаешь...


 
oneman ©   (2002-08-09 13:36) [5]

type
{skip}
diPerson: TdxDBInspector;
{skip}

procedure TfMain.diPersonChangeNode(Sender: TObject; OldNode,
Node: TdxInspectorNode);
var
Adi: TCustomdxInspectorControl;
begin
diPerson(Adi).isComplexRow // тот самый protected method;
end;

Что я делаю не так?


 
Skier ©   (2002-08-09 13:42) [6]

>oneman


type
THackdiPerson = class(TCustomdxInspectorControl);

procedure TfMain.diPersonChangeNode(Sender: TObject; OldNode,
Node: TdxInspectorNode);
var
Adi: TCustomdxInspectorControl;
begin
THackdiPerson(Adi).isComplexRow // тот самый protected method;
end;


Правда я не знаю, создаёшь ты вообще этот Adi или нет...из
приведённого кода следует что нет - обрати на это особое
внимание !


 
oneman ©   (2002-08-09 13:47) [7]

блин, я совсем запутался...есть ссылки, где об этом более подробно расписано, желетельно с рабочими примерами.


 
oneman ©   (2002-08-09 13:50) [8]

все, работает, прошу прошения за излишние беспокойство.


 
Skier ©   (2002-08-09 13:51) [9]

>oneman

Последний раз :


type
THackdiPerson = class(TCustomdxInspectorControl);

procedure TfMain.diPersonChangeNode(Sender: TObject; OldNode,
Node: TdxInspectorNode);
var
Adi: TCustomdxInspectorControl;
begin
Adi := TCustomdxInspectorControl.Create(Self);
try
THackdiPerson(Adi).isComplexRow // тот самый protected method;
finally
FreeAndNil(Adi);
end; //try
end;



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

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

Наверх




Память: 0.48 MB
Время: 0.015 c
3-71049
Big_Rom
2002-07-30 13:32
2002.08.22
Ну просто тупой запрос а сколько времени экономит


3-71066
{bas}
2002-07-31 14:07
2002.08.22
Подключение к Access через ADO c запороленной базой


3-70981
TiredDmitry
2002-07-24 18:27
2002.08.22
Мастера, ПОМОГИТЕ, не могу. Базы данных.


4-71437
аак
2002-06-19 14:08
2002.08.22
Как скопировать папку со всем ее содержимым?


1-71106
croupeir
2002-08-12 20:08
2002.08.22
как всавить код во вновь создаваемый объект