таСодержіт конфігураційні установки для проектаUg.dofФайл параметрів проектаСодержіт поточні установки проекту: настройки компілятора і компонувальника, імена службових каталогів, умовні діректівиUg.dprФайл проектаСвязивает всі файли, з яких складається пріложеніеUg.resФайл ресурсовСодержіт піктограми , графічні ізображеніяUnit1.dcuОб'ектний файл для Unit1.pasОткомпілірованная версія Unit1.pasUnit1.dfmФайл форми № 1Содержіт список властивостей всіх компонентів, включених у форму № 1Unit1.pasФайл програмного модуля для форми # 1Определяет функціональність форми № 1Unit2.dcuОб'ектний файл для Unit2.pasОткомпілірованная версія Unit2 . pasUnit2.dfmФайл форми № 2Содержіт список властивостей всіх компонентів, включених у форму № 2Unit2.paФайл програмного модуля для форми # 2Определяет функціональність форми № 2Unit3.dcuОб'ектний файл для Unit3.pasОткомпілірованная версія Unit3.pasUnit3.dfmФайл форми № 3Содержіт список властивостей всіх компонентів, включених у форму № 3Unit3.pasФайл програмного модуля для форми # 3Определяет функціональність форми № 3Unit4.dcuОб'ектний файл для Unit4.pasОткомпілірованная версія Unit4.pasUnit4.dfmФайл форми № 4Содержіт список властивостей всіх компонентів, включених у форму № 4Unit4.pasФайл програмного модуля для форми # 4Определяет функціональність форми № 4
Текст програми
Наводиться повний лістинг програми, яка містить 4 модулі (Unit):
unit Unit1;
interface, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms, Dialogs, StdCtrls, ActnList, ComCtrls; = class (TForm): TButton;: TButton;
Label1: TLabel;
UpDown1: TUpDown;
Edit1: TEdit;
Label2: TLabel;
Button3: TButton;
Label3: TLabel;
Label4: TLabel;
Label5: TLabel;
Label6: TLabel;
Button4: TButton;
procedure Button2Click (Sender: TObject);
procedure Button1Click (Sender: TObject);
procedure UpDown1Click (Sender: TObject; Button: TUDBtnType);
procedure Button3Click (Sender: TObject);
function FormHelp (Command: Word; Data: Integer;
var CallHelp: Boolean): Boolean;
procedure Button4Click (Sender: TObject);
private
{Private declarations}
public
{Public declarations}
end;
Form1: TForm1;
ch: integer ;//загадує число
s: integer ;//Кількість спроб
p: integer ;//Номер партії