Реферат Навчальні програми з інформатики

ttostr (i) + 'сторінка з 63';. Navigate (getcurrentdir + ' html3 ' + inttostr (i) + '. htm') ; i = 63 then button2.Enabled: = false;; TForm8.Button3Click (Sender: TObject);. Show;. Hide;. Navigate (getcurrentdir + ' html3 1064.htm');. Enabled: = false;. Caption : = '1 сторінка з 63 ';: = 1;. Visible: = true;. Visible: = false;; TForm8.Image1Click (Sender: TObject);. FieldAddress (getcurrentdir +' html3 1001.htm ');. Enabled: = false;. Caption: = '1 сторінка з 63 ';

i: = 1;;.

Додаток 4

Про програму.

unit Unit9;, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, StdCtrls, ExtCtrls, jpeg; = class (TForm): TImage;: TButton;: TLabel;: TLabel; : TImage;: TLabel;: TLabel;: TLabel; FormClose (Sender: TObject; var Action: TCloseAction); Button1Click (Sender: TObject);

{Private declarations}

{Public declarations};: TForm9; Unit1;

{$ R *. dfm} TForm9.FormClose (Sender: TObject; var Action: TCloseAction);. show;; TForm9.Button1Click (Sender: TObject);. Hide;. show;

end;.