ANTICHAT - Показать сообщение отдельно - Реализация многопоточности [delphi]

Цитата:

Сообщение от None

уверен?

Немного ошибся из других классов доступ не получить(напрямую к полю), а вот у создананого экземпляра можно.

Код:

SimpleClass = class
     private G: string;
  end;

Код:

var
  Form1: TForm1;
  H : SimpleClass;

implementation

{$R *.dfm}

procedure TForm1.Button1Click(Sender: TObject);
begin
  H.G := 'g';
end;

Тесть получаем доступ к приват члену в обход свойств(если бы были).

Если все это объявлено в одном юните.