| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Как создать объект с глобальной видимостью? [D7, XP]

Страницы:   < 1 2 >

neveGreen ©   (2008-12-07 23:07:00) 

Как создать объект с глобальной видимостью, чтобы он был видим как Application?

---

DVM   (2008-12-07 23:24:00) [21]

> neveGreen   (07.12.08 23:07)  

или еще проще:


program Project1;

{$APPTYPE CONSOLE}

uses
 SysUtils, Classes;
var
 L: TList;
begin
 L := TList.Create;
 try
   //
 finally
   L.Free;
 end;
end.


---

Юрий Зотов   (2008-12-07 23:16:00) [22]

Например:

unit MyUnit;

uses ....

interface

type
 TMyClass = class(...)
 ...
 end;

var
 MyVar: TMyClass;

implementation
...
initialization
 MyVar := TMyClass.Create(...);
finalization
 MyVar.Free;
end.

Подробности см. в справке.

---

DVM   (2008-12-07 23:13:00) [23]

Собственно, все объекты "глобально видимы".

---

Юрий Зотов   (2008-12-07 23:12:00) [24]

Так же, как и любую другую переменную - объявить ее в секции interface.

---

Страницы:   < 1 2 >

Наверх