er: TObject); messagedlg ('Ви дійсно хочете вийти?', mtConfirmation, mbOKCancel, 0) = 1 then;;
TForm5.N2Click (Sender: TObject);. Hide;. Show;. Close;; TForm5.N1Click (Sender: TObject);. Hide;. Show;. Close;;
TForm5.sbtbtn1Click (Sender: TObject);
. FileName: = GetCurrentDir + ' Відео Основні компоненти Delphi
TForm5.sbtbtn2Click (Sender: Delphi 2010. Компонент ProgressBar .. mpg ';. Open;. DisplayRect: = spnl1.ClientRect;; TForm5.sbtbtn3Click (Sender: Delphi. Компонент MediaPlayer. Воіспр. Звуків. Файл.mpg ';. Open;. DisplayRect: = spnl1.ClientRect;;
TForm5.sbtbtn4Click (Sender: Delphi. Нова версія. Працюємо з компонентом Timage .. mpg ';
mp1.Open;. DisplayRect: = spnl1.ClientRect;;
TForm5.sbtbtn5Click (Sender: se;;
Ttest.chk19Click (Sender: TObject);: = 0;. Checked: = False;. Checked: = False;. Checked: = False;;
Ttest.chk20Click (Sender: TObject);: = 0;. Checked: = False;. Checked: = False;. Checked: = False;;
Ttest.FormHide (Sender: TObject);
begin.Caption: = 'Що з перерахованого ставитися до візуальних компонентів?';
Ttest.btn6Click (Sender: TObject);
begin.Caption: = 'У слідстві чого создаеться обьект типу TwebRequest';
Ttest.FormClose (Sender: TObject; var Action: TCloseAction);. Close;; Ttest.sbtbtn1Click (Sender: TObject);. img1.Picture.LoadFromFile (GetCurrentDir + ' Image zast.jpg ');. Hide;. Show;;
Ttest.N3Click (Sender: TObject);. Hide;. show;;
Ttest.N1Click (Sender: TObject);. img1.Picture.LoadFromFile (GetCurrentDir + ' Image zast.jpg');. Hide;. Show;
;
Ttest.N5Click (Sender: TObject); MessageBox (Glav.Handle,
PChar ('Ви дійсно хочете вийти'),
PChar ('Вихід'), MB_YESNO or MB_ICONQUESTION) = mrYes.Close;;.