Добро пожаловать в форум, Guest  >>   Войти | Регистрация | Поиск | Правила | В избранное | Подписаться
Все форумы / Delphi Новый топик    Ответить
Топик располагается на нескольких страницах: Ctrl  назад   1 [2]      все
 Re: Обращение к полю/методу класса из вложенного класса  [new]
registered
Member

Откуда:
Сообщений: 87
сделал так:
type
  TMyThread = class(TThread) 
  private
    parent_class:pointer;
  protected
    constructor Create(suspended:boolean;parent_class:pointer);
  end;

type TMyClass = class
  private
    MyThread:TMyThread;
  protected
    MyField:TDumbField;
  end;

constructor TMyThread.Create(suspended:boolean;parent_class:pointer);
begin
inherited Create(suspended);
self.parent_class:=parent_class;
end;

procedure TMyThread.Execute;
begin
TMyClass(parent_class^).MyField:=arrgh;
end;

procedure A;
begin
MyClass:=TMyClass.Create; 
MyClass.MyThread:=TMyThread.Create(true,MyClass);
end;


определение не вложенное, потому что сначала не получилось, а потом - уже не помню
27 мар 21, 10:07    [22300688]     Ответить | Цитировать Сообщить модератору
 Re: Обращение к полю/методу класса из вложенного класса  [new]
asutp2
Member

Откуда: Тюмень
Сообщений: 834
registered,

с профессией не ошиблись?
27 мар 21, 11:11    [22300698]     Ответить | Цитировать Сообщить модератору
 Re: Обращение к полю/методу класса из вложенного класса  [new]
Fr0sT-Brutal
Member

Откуда:
Сообщений: 682
Объявить nested класс внутри юнита, инстанс сделать указателем, а в методах приводить к nested классу
29 мар 21, 11:43    [22301342]     Ответить | Цитировать Сообщить модератору
Топик располагается на нескольких страницах: Ctrl  назад   1 [2]      все
Все форумы / Delphi Ответить