Текущий архив: 2003.10.02;
Скачать: CL | DM;
Вниз
Переменные Найти похожие ветки
← →
DimChan (2003-09-19 07:27) [0]Помоги-и-и-те!!! Как исползовать значение одной переменной в разных UNIT (формах) в рамках одного проекта.
← →
Думкин (2003-09-19 07:34) [1]Создать общий юнит и там ее объявить в implementation
← →
Думкин (2003-09-19 07:35) [2]Тьфу - в interface
← →
DimChan (2003-09-19 07:40) [3]А как создать общий UNIT?
← →
Denizzz (2003-09-19 07:40) [4]Потом, в юнитах, которые используют глобальную переменную, добавь в uses имя юнита глоб. переменных. Например
var
FMain: TFMain;
implementation
uses Form2, Varius;
{$R *.DFM}
← →
Думкин (2003-09-19 07:42) [5]> DimChan © (19.09.03 07:40)
Общим его ты сделаешь, способом описанным
> Denizzz (19.09.03 07:40)
а так - обычный юнит.
File-New-Unit.
← →
DimChan (2003-09-19 07:45) [6]Varius ???
← →
Verg (2003-09-19 07:50) [7]
> Varius ???
What !?
← →
DimChan (2003-09-19 08:13) [8]Господа я запутался в коде. Мне необходимо взять значение из Unit2 и вставить в Unit1. H-e-e-e-LP
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
Db, DBTables, ExtCtrls, DBCtrls, Grids, DBGrids, StdCtrls, Buttons, Menus;
type
TForm1 = class(TForm)
Edit1: TEdit;
private
{ Private declarations }
public
{ Public declarations }
end;
var
FilePath : string;
implementation
uses Unit2;
unit Unit2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, ComCtrls, Tabnotbk;
type
TForm2 = class(TForm)
Edit6: TEdit;
private
{ Private declarations }
public
{ Public declarations }
end;
var
FileSaveName , FileName: string;
Form2: TForm2;
implementation
uses Unit1, dir;
{$R *.DFM}
← →
Digitman (2003-09-19 08:24) [9]
unit Unit1;
interface
uses ..., Unit2;
unit Unit2;
implementation
uses ..., Unit1;
← →
DimChan (2003-09-19 08:52) [10]T-H-A-N-K-S !!!!!
Страницы: 1 вся ветка
Текущий архив: 2003.10.02;
Скачать: CL | DM;
Память: 0.46 MB
Время: 0.01 c