Форум: "Начинающим";
Текущий архив: 2007.04.22;
Скачать: [xml.tar.bz2];
Вниз
Глобальная переменная Найти похожие ветки
← →
Gentos (2007-04-04 11:19) [0]Добрый день уважаемые творцы. У меня есть две формы как с одной формы получить доступ к переменной типа integer другой формы , где ее и как объявлять надо вот в чем вопрос, помогите плиз
← →
Плохиш © (2007-04-04 11:24) [1]
> Gentos (04.04.07 11:19)
Неужели в книжках основ уже не oписывают?
PS. interface, public
← →
DrPass © (2007-04-04 11:25) [2]Для начала разобраться с терминологией. Есть "глобальная переменная", объявленная в самом модуле, которая не относится ни к какой форме. И есть переменная "поле класса" у формы. Тебе что надо?
← →
Сергей М. © (2007-04-04 11:28) [3]
> где ее и как объявлять надо
Глобальные переменные любого типа должны быть объявлены в разделе interface модуля.
unit uForm1;
interface
...
var
MyVariable: MyType;
...
implementation
...
unit uForm2;
...
implementation
...
uses .., uForm1, ...
...
MyVariable := MyValue;
Но к формам это все не имеет ни малейшего отношения.
← →
Gentos (2007-04-04 11:30) [4]
> Плохиш ©
Описывают только в моей не описывают.
вот объявил
unit MainFormMoney;
...
public
{ Public declarations }
c : Integer;
end;
как мне с формыunit OtchetFormMoney;
получить доступ к с MainFormMoney пишу в OtchetFormMoneyMainFormMoney.с- пишет мне учитесь, как получить доступ все таки ?
← →
Gentos (2007-04-04 11:33) [5]
> DrPass ©
Мне надо получить доступ к переменной "поле класса" формы
← →
Reindeer Moss Eater © (2007-04-04 11:33) [6]Через экземпляр и получи
← →
Сергей М. © (2007-04-04 11:34) [7]
> вот объявил
> public
> { Public declarations }
> c : Integer;
с - это не переменная, это поле класса. Заруби на носу.
← →
Gentos (2007-04-04 11:35) [8]
> Сергей М. ©
та мне всего лишь необходимо доступ к integer а Вы тут уже type пишите :)
← →
Gentos (2007-04-04 11:36) [9]
> Сергей М. © (04.04.07 11:34) [7]
зарубил :), но как получить доступ все-таки ? :)
← →
Сергей М. © (2007-04-04 11:36) [10]
> Gentos (04.04.07 11:35) [8]
integer - это тот самый MyType)
← →
Gentos (2007-04-04 11:36) [11]
> Reindeer Moss Eater © (04.04.07 11:33) [6]
а можна кодом :) ?
← →
SergGG © (2007-04-04 11:37) [12]{Unit1}
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm1 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
GlobalInt:Integer;
implementation
{$R *.dfm}
end.
{----------}
{Unit2}
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form2: TForm2;
implementation
uses Unit1;
{$R *.dfm}
end.
В Form2 будет доступ к GlobalInt
← →
Сергей М. © (2007-04-04 11:39) [13]
> как получить доступ все-таки ?
Тебе же в [6] уже сказали - через обращение к одноименному полю объекта класса, в котором это поле объявлено
MySuperPuperForm.c := 5;
← →
Reindeer Moss Eater © (2007-04-04 11:39) [14]а можна кодом :) ?
Экземпляр, точка, имя поля.
← →
Сергей М. © (2007-04-04 11:39) [15]
> как получить доступ все-таки ?
Тебе же в [6] уже сказали - через обращение к одноименному полю объекта класса, в котором это поле объявлено
MySuperPuperForm.c := 5;
← →
Gentos (2007-04-04 11:42) [16]
> SergGG © (04.04.07 11:37) [12]
большое спасибо за потраченное время , все работает, тема закрыта.
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2007.04.22;
Скачать: [xml.tar.bz2];
Память: 0.47 MB
Время: 0.04 c
