Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];
ВнизПеременная для нескольких форм Найти похожие ветки
← →
Moris The Cat (2003-05-25 22:32) [0]Как и где задать глобальную переменную, действующую сразу на несколько форм в проеке?
← →
Song (2003-05-25 22:47) [1]После Var в implementation]
Для использования не забудь перечислить этот модуль в Uses
← →
Palladin (2003-05-25 22:53) [2]а книжки все пылятся, забытые давно...
← →
Moris The Cat (2003-05-25 23:17) [3]Song: ээээ ... ну пачти что понял =)
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;
a:integer
implementation
{$R *.dfm}
end.
Так? Но мне нужно для нескольких форм! А так у меня он говорит ошибку!
← →
Arch-vile (2003-05-25 23:21) [4]uses unit1;
← →
Moris The Cat (2003-05-25 23:22) [5]То есть в Uses надо прописать те формы, на которые действует эта переменная???
← →
Arch-vile (2003-05-25 23:28) [6]нет в тех юнитах, где должна действовать эта переменная, надо прописать тот юнит, где объявлена эта переменная.
т.е.
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;
a:integer
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Variants, Classes, Graphics,
Controls, Forms, Dialogs;
type
TForm2 = class(TForm)
private
{ Private declarations }
public
{ Public declarations }
end;
uses unit1;
var
Form2: TForm2;
← →
Moris The Cat (2003-05-25 23:33) [7]понял! спасибо!
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.06.05;
Скачать: [xml.tar.bz2];
Память: 0.45 MB
Время: 0.011 c