Текст модуля

@Aleksey1989 · Регистрация: 05.10.2010

Author24 — интернет-сервис помощи студентам

Добрый день. Помогите разобраться в следующем вопросе: почему нельзя ничего объявлять в теле модуля вне процедур?

Delphi

unit Main;
 
interface
 
uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, XPMan, jpeg, ExtCtrls, Buttons;
 
type
  TForm1 = class(TForm)
    Button1: TButton;
    procedure Button1Click(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;
 
var
  Form1: TForm1;
 
implementation
 
{$R *.dfm}
 
procedure TForm1.Button1Click(Sender: TObject);
begin
1. Randomize;
end;
 
2. Randomize;
end.

Т.е. при компиляции компилятор вызовет ошибку на генераторе Randomize #2, а вот на генераторе Randomize #1 нет. Почему так?

@Ice_and_Fire · 27.12.2011, 17:05

Потому что модуль это не программа, а набор подпрограмм. Вариант 2 не входит ни в одну подпрограмму и соответствующий код не достижим. А сама программа в файле .dpr

@Ice_and_Fire 512 / 298 / 37 Регистрация: 22.06.2011 Сообщений: 929
	27.12.2011, 17:05	2
	Потому что модуль это не программа, а набор подпрограмм. Вариант 2 не входит ни в одну подпрограмму и соответствующий код не достижим. А сама программа в файле .dpr 0