Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Глобальные переменные. [D6, WinXP]


PaRL ©   (2002-09-29 15:28:00) 

Есть два Unit"а. Нужно объявить тип (record) и массив этого типа, и чтобы в обоих модулях было доступно и то и другое. Я пробовал в public, но у меня не получилось. Пример, если можно...?


PaRL   (2002-09-30 12:10:00) [1]

Newguy, Спасибо.


PaRL   (2002-09-30 12:03:00) [2]


> Лучшиц способ организации глобальных переменных, это поместить
> их в отдельный Unit и его потом прописать везде в Uses и
> все будет Ок!

Вы что, не выспались сегодня?
Я и спрашиваю ГДЕ ИМЕННО НАДО прописать глобальные переменные, а не в каком unit"e это сделать!


Viktor Kushnir   (2002-09-30 07:15:00) [3]

Я тоже это хотел написать.


Separator   (2002-09-30 06:29:00) [4]

Лучшиц способ организации глобальных переменных, это поместить их в отдельный Unit и его потом прописать везде в Uses и все будет Ок!


newguy   (2002-09-30 04:08:00) [5]

...
public
procedure .....
end;

type
rec = record
FieldF : string;
FieldS : integer;
end;
massiv = array of rec;
var f : massiv;


PaRL   (2002-09-29 18:12:00) [6]

В общем, если писать после interface, то выводится ошибка, если после uses, то ошибка не выводится, но второй unit не видит тип и массив первого, а вот если написать в public переменную, например типа integer, то второй unit спокойно это принимает...
(Form1.VarInteger := 5;)

Так что вот...


Cr@sh   (2002-09-29 17:15:00) [7]

По-моему var в предпоследней строчке не надо. Но возможно ошибаюсь...


MBo   (2002-09-29 17:14:00) [8]

при чем тут public?
после слова interface пиши type и т.д.


PaRL   (2002-09-29 16:21:00) [9]

uses чтоли? Это и так понятно.
...
public
type
rec = record
FieldF : string;
FieldS : integer;
end;
var f : array of rec;
end;

Выводится ошибка.


Shrek   (2002-09-29 15:44:00) [10]

во втором обявить первый


Наверх

Титульная страница Поиск, карта сайта Написать письмо