Вниз
Скачать: CL | DM;

Глобальные переменные.   Найти похожие ветки 

 
PaRL ©   (2002-09-29 15:28) [0]

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


 
Shrek ©   (2002-09-29 15:44) [1]

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


 
PaRL ©   (2002-09-29 16:21) [2]

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

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


 
MBo ©   (2002-09-29 17:14) [3]

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


 
Cr@sh ©   (2002-09-29 17:15) [4]

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


 
PaRL ©   (2002-09-29 18:12) [5]

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

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


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

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

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


 
Separator ©   (2002-09-30 06:29) [7]

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


 
Viktor Kushnir ©   (2002-09-30 07:15) [8]

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


 
PaRL ©   (2002-09-30 12:03) [9]


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

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


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

Newguy, Спасибо.



Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.47 MB
Время: 0.01 c
4-32073
Лерман Константин
2002-08-26 07:49
2002.10.10
DialUp + Ras WindowsNT


1-31765
Петя
2002-10-01 14:40
2002.10.10
А Есть ли такой компанент???


1-31695
123000
2002-09-30 16:14
2002.10.10
Папки


8-31914
Slavon
2002-06-10 01:25
2002.10.10
алгоритмы сжатия мп3


4-32100
Nikolab
2002-08-28 11:38
2002.10.10
Dlia nekotorie vk_xxx TCheckBox.OnKeyDown ne vuizivaetsia




   Наверх