|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
|
#1
|
||||
|
||||
закомментарь:
Код:
procedure FormCreate(Sender: TObject); procedure Button1Click(Sender: TObject); procedure Button2Click(Sender: TObject); // procedure Randomm(NQuest:Integer;var a:array of Integer); Код:
procedure Randomm(NQuest:Integer;var a:array of Integer); var m,x:Integer; f:Boolean; begin ... end; Код:
implementation {$R *.dfm} Пишу программы за еду. __________________ |