ReSQL.ru
     
powered by simpleCommunicator - 2.0.49     © 2025 Programmizd 02
Мобильная версия    Контакт    Правила    FAQ    Помощь
Доб. в избранное | Игнор. тему | Прикреп. тему | Пометить прочит. / непрочит. | Фильтр
Форумы / Delphi [игнор отключен] [закрыт для гостей] / как сделать глобальную видимость
14 сообщений из 14, страница 1 из 1
как сделать глобальную видимость
    #40107430
Mizer73
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mizer73
Гость
TStringList * lst = new TStringList;
...
Рейтинг: 0 / 0
27.10.2021, 15:33
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107440
Фотография DarkMaster
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
DarkMaster
Участник
Mizer73,

Вынести в модуль, который подключить ко всем.

P.S. Зачем - не спрашиваю
...
Рейтинг: 0 / 0
27.10.2021, 15:43
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107447
Mizer73
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Mizer73
Гость
DarkMaster
Mizer73,

Вынести в модуль, который подключить ко всем.

P.S. Зачем - не спрашиваю

так и в отдельном модуле он должен быть объявлен глобально.
в паблике.
...
Рейтинг: 0 / 0
27.10.2021, 15:54
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107458
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Mizer73,

Не в "паблике", а в интерфейсной части.
...
Рейтинг: 0 / 0
27.10.2021, 16:12
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107469
didgik
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
didgik
Участник
Mizer73
extern TStringList * lst
TStringList * lst = new TStringList;
...
Рейтинг: 0 / 0
27.10.2021, 16:39
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107474
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Тьфу-ты, это же С++.

Mizer73, ты форумом промахнулся.
...
Рейтинг: 0 / 0
27.10.2021, 16:53
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107536
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kealon(Ruslan)
Участник
rgreat,

ну почему, если никто ему не мешает pas-модуль подключить к проекту
...
Рейтинг: 0 / 0
27.10.2021, 19:22
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107723
Фотография Кроик Семён
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Кроик Семён
Участник
Mizer73,

Я предпочитаю не переменную-ссылку на объект делать глобальной, а, наоборот, прятать её, а наружу выводить через функцию.
Этим гарантируется, что никто ни в каком модуле не перепишет ссылку, т.к. сама ссылка получается в этом случае для всех read-only. Дополнительно, если хочется, можно ссылку вообще не инстанцировать при запуске программы, а делать это лишь при первом обращении к функции.

Например, такое

Код: pascal
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
UNIT frxPrinter;

INTERFACE

...
function frxPrinters(): TfrxPrinters;


IMPLEMENTATION

...

var
  FPrinters: TfrxPrinters = nil;


function frxPrinters(): TfrxPrinters;
begin
  if FPrinters = nil then
    FPrinters := TfrxPrinters.Create;

  Result := FPrinters;
end;


INITIALIZATION
  FPrinters := nil;

FINALIZATION
  if FPrinters <> nil then
    FPrinters.Free;

  FPrinters := nil;

END.
...
Рейтинг: 0 / 0
28.10.2021, 13:18
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107725
rgreat
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
rgreat
Участник
Кроик Семён,

IMHO еще лучше сделать через class var или class function.
...
Рейтинг: 0 / 0
28.10.2021, 13:23
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107810
Fr0sT-Brutal
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Fr0sT-Brutal
Гость
Кроик Семён
Mizer73,

Я предпочитаю не переменную-ссылку на объект делать глобальной, а, наоборот, прятать её, а наружу выводить через функцию.
Этим гарантируется, что никто ни в каком модуле не перепишет ссылку, т.к. сама ссылка получается в этом случае для всех read-only. Дополнительно, если хочется, можно ссылку вообще не инстанцировать при запуске программы, а делать это лишь при первом обращении к функции.


В FPC для подобного сделали unit property, прикольная штука. Хоть и сахар
...
Рейтинг: 0 / 0
28.10.2021, 17:23
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107885
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kealon(Ruslan)
Участник
Кроик Семён,

а ещё лучше генерик сделай
Код: pascal
1.
CreateOnce<T: TObject>
...
Рейтинг: 0 / 0
28.10.2021, 23:00
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107900
Фотография _Vasilisk_
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
_Vasilisk_
Участник
kealon(Ruslan)
а ещё лучше генерик сделай
В Делфи дженерик-функции нельзя объявить. Только дженерик-методы.
...
Рейтинг: 0 / 0
29.10.2021, 00:25
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107905
ъъъъъ
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
ъъъъъ
Гость
_Vasilisk_,

у ТС же ж не Delphi.
...
Рейтинг: 0 / 0
29.10.2021, 00:42
| Ответить | Цитировать | Написать  
как сделать глобальную видимость
    #40107942
kealon(Ruslan)
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
kealon(Ruslan)
Участник
_Vasilisk_
kealon(Ruslan)
а ещё лучше генерик сделай
В Делфи дженерик-функции нельзя объявить. Только дженерик-методы.
ну объяви метод в хелпере к TObject
вы часто в процах пишете?
...
Рейтинг: 0 / 0
29.10.2021, 09:33
| Ответить | Цитировать | Написать  
14 сообщений из 14, страница 1 из 1
Форумы / Delphi [игнор отключен] [закрыт для гостей] / как сделать глобальную видимость
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Найденые пользователи ...
Разблокировать пользователей ...
Читали тему (0):
Читали форум (0):
Пользователи онлайн (0):
Польз. соглашение
NoSQL.ru       Новости, Чат       Фотоальбом: Участники, Встречи
Закрыть
start [/forum/topic.php?fid=58&fpage=9&tid=2036923]:
 0ms
get settings:
 10ms
get forum list:
 14ms
check forum access:
 4ms
check topic access:
 4ms
track hit:
 41ms
get topic data:
 12ms
get forum data:
 3ms
get page messages:
 53ms
get tp. blocked users:
 2ms
others: 268ms
total:  411ms
созд. / загр.: 411ms
x
x
Закрыть


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