ReSQL.ru
     
powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / использование ссылок на классы
7 сообщений из 7, страница 1 из 1
использование ссылок на классы
    #39768816
Swv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swv
Участник
Здравствуйте.


Запутался в двух соснах.


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

первый и третий объявлены в одном юните. основной - в другом. в uses идет перекрестное использование юнитов. и естественно не компилируется.

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

можно как нибудь вывернуться из этой ситуации? в любом случае первый класс должен уметь обращаться к функциям основного. А основной понимать что есть первый.
Можно конечно просто свалить их в один юнит. Но как то не хочется все в один
...
Рейтинг: 0 / 0
03.02.2019, 02:43
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39768817
asviridenkov
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
asviridenkov
Участник
Swv,

можно почитать про dependency injection.
...
Рейтинг: 0 / 0
03.02.2019, 02:47
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39768820
Фэйтл Эра
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фэйтл Эра
Участник
Swv,

стало быть, Class_1 ассоциирован с Основным, Основной ассоциирован с Class_3.
Cмело разноси классы по разным модулям, если нет других зависимостей.

Код: pascal
1.
2.
3.
unit uClass_3;
Class_3  = class
end;



Код: pascal
1.
2.
3.
4.
5.
unit uОсновной;
uses uClass_3;
Основной  = class
  поле1 : Class_3 
end;


Код: pascal
1.
2.
3.
4.
5.
unit uClass_1
uses uОсновной;
Class_1  = class
  поле1: Основоной;
end;



Или не мучайся, вали все зависимые классы в один модуль. Это дельфи. :)
...
Рейтинг: 0 / 0
03.02.2019, 03:49
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39768934
Swv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swv
Участник
Фэйтл ЭраSwv,

стало быть, Class_1 ассоциирован с Основным, Основной ассоциирован с Class_3.
Cмело разноси классы по разным модулям, если нет других зависимостей.

Код: pascal
1.
2.
3.
unit uClass_3;
Class_3  = class
end;



Код: pascal
1.
2.
3.
4.
5.
unit uОсновной;
uses uClass_3;
Основной  = class
  поле1 : Class_3 
end;


Код: pascal
1.
2.
3.
4.
5.
unit uClass_1
uses uОсновной;
Class_1  = class
  поле1: Основоной;
end;



Или не мучайся, вали все зависимые классы в один модуль. Это дельфи. :)

не. в итоге получается так

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
unit uОсновной;
uses uClass_1;
Основной  = class
  поле1 : Class_1 
end;

unit uClass_1
uses uОсновной;
Class_1  = class
  поле1: Основоной;
end;
...
Рейтинг: 0 / 0
03.02.2019, 16:43
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39769020
Фэйтл Эра
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Фэйтл Эра
Участник
Swv,

Цикл же.
...
Рейтинг: 0 / 0
03.02.2019, 23:42
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39769024
Swv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Swv
Участник
Фэйтл ЭраSwv,

Цикл же.

именно. заменил на pointer
а юнит подключил в implementation
...
Рейтинг: 0 / 0
04.02.2019, 00:23
| Ответить | Цитировать | Написать  
использование ссылок на классы
    #39769043
goldmi45
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
goldmi45
Участник
Swvзаменил на pointer

зачем? есть же TObject. Зачем же к нетипизированному указателю?
...
Рейтинг: 0 / 0
04.02.2019, 08:27
| Ответить | Цитировать | Написать  
7 сообщений из 7, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / использование ссылок на классы
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение   Полит. конфиден.  
NoSQL.ru       Кролег: Проекты, Новости, Чат       РЕД ФОРУМ       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&msg=39769043&tid=2039859]:
 0ms
get settings:
 7ms
get forum list:
 14ms
check forum access:
 2ms
check topic access:
 2ms
track hit:
 424ms
get topic data:
 8ms
get forum data:
 2ms
get page messages:
 40ms
get tp. blocked users:
 1ms
others: 202ms
total:  702ms
созд. / загр.: 702ms
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]