.Items.Item [6]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки бібліотека VCL tipymetod.htm '); streeview1.Items.Item [8]. Selected then webbrowser1.Navigate (GetCurrentDir +' сторінки створення візуальних компонент proverka.htm '); streeview1.Items.Item [9]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки створення візуальних компонент isxkod.htm'); streeview1.Items.Item [10]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки створення візуальних компонент realiz.htm'); streeview1.Items. Item [12]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки стандартні компоненти elemypr.htm'); streeview1.Items.Item [13]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки стандартні компоненти additional. htm '); streeview1.Items.Item [14]. Selected then webbrowser1.Navigate (GetCurrentDir +' сторінки стандартні компоненти intfakt.htm '); streeview1.Items.Item [16]. Selected then webbrowser1.Navigate (GetCurrentDir +' сторінки створення не візуальних компонент dialog.htm '); streeview1.Items.Item [17]. Selected then webbrowser1.Navigate (GetCurrentDir +' сторінки створення не візуальних компонент mainform.htm '); streeview1.Items.Item [18]. Selected then webbrowser1.Navigate (GetCurrentDir + ' сторінки створення не візуальних компонент nevkomp.htm');;
TForm3.sButton1Click (Sender: TObject);. show;. Hide;;
TForm3.sButton2Click (Sender: TObject); messagedlg ('Ви дійсно хочете вийти?', mtConfirmation, mbOKCancel, 0) = 1 then;;
TForm3.N1Click (Sender: TObject);. Hide;. show;; TForm3.N2Click (Sender: TObject);. Hide;. show;;
TForm3.N3Click (Sender: TObject); messagedlg ('Ви дійсно хочете вийти?', mtConfirmation, mbOKCancel, 0) = 1 then;;
TForm3.N4Click (Sender: TObject);. Hide;. Show;;
. Unit4;
, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,, Menus, jpeg, ExtCtrls, StdCtrls, Buttons, sBitBtn, acPNG, sPanel; = class (TForm): TMainMenu;: TMenuItem ;: TMenuItem;: TMenuItem;: TsBitBtn;: TImage;: TsPanel;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TEdit;: TImage;: TImage;: TImage;: TEdit;: TImage;: TImage;: TImage;: TEdit;: TImage;: TImage;: TImage;: TImage;: TImage;: TEdit;: TImage;: TImage;: TImage;: TImage;: TImage;: TEdit;: TImage; : TImage;: TImage;: TsBitBtn;: TsBitBtn;: TsPanel;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage ;: TImage;: TEdit;: TImage;: TImage;: TImage;: TImage;: TImage;: TImage;: TMemo;: TImage;: TImage;: TImage;: TMemo;: TImage;: TImage;: TImage;: TEdit;: TImage;: TImage;: TImage;: TImage;: TImage;: TMenuItem; FormClose (Sender: TObject; var Action...
