Помогите вспомнить

← →
sergeant (2003-10-03 18:25) [0]

В С++ есть такая вещь как указатель this, как мне такую вещь реализовать в delphi. И ещё, у меня есть 2 модуля, которые должны использовать друг друга, как это сделать? Заранее спасибо

← →
Serginio666 (2003-10-03 18:29) [1]

Self для объектов.
Переменные, константы, типы итд объявленные выше implementation доступны из всех модулей. Если имена совпадают обращение

ModuleName.Value, где ModuleName название соответствующего юнита, Value имя переменной.

← →
Arm79 (2003-10-03 18:38) [2]

> В С++ есть такая вещь как указатель this, как мне такую
> вещь реализовать в delphi

self

> И ещё, у меня есть 2 модуля, которые должны использовать
> друг друга, как это сделать?

unit unit1

uses unit2;

-------------
unit unit2

uses unit1;

← →
sergeant (2003-10-03 18:41) [3]

Нефига, объявляю тип Tstvol в интерфейсной части Unit2, в Unit2 прописываю:

interface
uses Unit1
type Tstvol .....
......

В Unit1:
inteface
.....
implementation
uses Unit2 (иначе выдает взаимное объявление)
.......
В итоге в Unit2 тип Tstvol неизвестен!?!?!?

← →
афвуд (2003-10-03 18:44) [4]

Кольцевые ссылки просто запрещены. И понятно почему.

Но всегда можно сделать так, что кольцевых ссылок не будет. Подумай сам как-нибудь.

>В итоге в Unit2 тип Tstvol неизвестен!?!?!?
Что значит неизвестен? Известен, т.е. "виден" но только в части implementation.

← →
Serginio666 (2003-10-03 18:47) [5]

Ниже Uses Unit1 будет видна.
А взаимное использование модулей плохой тон. Разбивай логику.

← →
sergeant (2003-10-03 18:52) [6]

Спасибо, все понял, буду перестраивать программу,а
>В итоге в Unit2 тип Tstvol неизвестен!?!?!?... Вместо Unit2 следует читать Unit1, извиняюсь.
Self заработал.... всё пашет

Помогите вспомнить Найти похожие ветки