ОПП

[Juni]

unit Unit2;
interface
uses // используемые модули
type
TForm = class(TForm)
// описание процедур и функций
private
{ Private declarations }
public
{ Public declarations }
published
{ Published declarations }
protected
{ Protected declarations }
end;
var Form2: TForm;
implementation
{$R *.dfm}
// реализация процедур и функций
initialization
finalization
end.

Не трудно догадаться, что описание процедур и функций до оператора private в теле TForm = class(TForm) относится к public по умолчанию. Поскольку все визуальные компоненты размещаются там, то для главного модуля видны все функции, свойства и переменные данного модуля. Ради познавательного интереса, как их можно скрыть? Если оператор private поднять выше то генерируется ошибка, а если var Form2: TForm; объявить ниже implementation то основная программа не увидит эту форму. Вообще, на С++, например, по умолчанию в начале идут скрытые описания? А тут наоборот.

Если есть исчерпывающий источник по данной тематике, напишите пожалуйста!

[uberchel]

Дык в private и пиши !

[sinedSpb]

То что автогенирит дельфовый дизайнер форм относится даже не к public а к published. Поля и свойства с такой видимостью автосохраняются в DFM. Это есть фишка дизайнера форм и ее вот так вот просто ну никак не обойти. Если так уж хочется скрыть форму , можно использовать следующий прием

TMyFormController = class
private
fPrivateForm : TMyForm;
public
constructor Create;
//здесь методы для манипуляции формой
end;

constructor TMyFormController.create;
begin
fPrivateForm := TMyForm.create(Application);
end;

[Juni]

2 sinedSpb

Спасибо!