![]() |
|
|
|||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
|||
|
|||
|
Однако, зравствуйте.
Имеются 2 формы и 1 модуль, в котором хранятся все процедуры и функции с общими переменными. Если на формах задействовать как-либо общие переменные, то, при их подключении, в самом приложении вылетит ошибка Access violation. Как правильно обращаться к ним? Код модуля Код:
unit Core;
----------------------------------
type
Options = record
X:string;
Y:string[32];
end;
----------------------------------
type
TCore = Class
private
public
Conf: Options;
----------------------------------Код формы: Код:
unit unti2; interface uses ......., Core; ---------------------------------- var Core : TCore; Form2: TForm2; implementation procedure TForm2.BitBtn1Click(Sender: TObject); var Ram:Options; begin Ram:=Core.Conf; end; ---------------------------------- Последний раз редактировалось IRorshachI, 17.11.2013 в 10:20. |