Fan nomi: Dasturlash 2 Mavzu

form2.Hide;
form1.show;

• 
  SpeedButton3 tugmasi uchun quyidagi dastur kodini yozing:
  

try
WebBrowser1.GoBack;
except
beep;
end;
SpeedButton4 tugmasi uchun quyidagi dastur kodini yozing:try
WebBrowser1.GoForward;
except
beep;
end;

• 
  Для компонента TreeView создайте обработчик события OnClick (на вкладке Events окна Object Inspector дважды щелкните по пустому полю в правом столбце рядом с текстом onClick) и внесите следующий код программы:
  

Path:=ExtractFilePath(Application.ExeName)+'Заготовки\';
case TreeView1.Selected.AbsoluteIndex of
0:Path:=Path+'Лекции.htm';
1:Path:=Path+'Лекция1.htm';
2:Path:=Path+'Лекция2.htm';
3:Path:=Path+'Лекция3.htm';
4:Path:=Path+'Лекция4.htm';
5:Path:=Path+'Лекция5.htm';
6:Path:=Path+'Лабораторные работы.htm';
7:Path:=Path+'Лабораторная работа №1.htm';
end;
WebBrowser1.Navigate(path);

• 
  Перед словом Begin в этой процедуре добавьте следующую строку: var path:string;
  
• 
  Создайте для компонента TreeView обработчик события onGetImageIndex и внесите следующий код программы:
  

Node.SelectedIndex:=2;
if Node.Count>0 then
begin
if Node.Expanded then Node.ImageIndex:=0
else Node.ImageIndex:=1;
end
else tuguni.ImageIndex: = 3;
Qidiruv oynasida 2-Shakl выпадающем списке Inspektori в Ob'ekt. Voqea-
, uncreate (uncreated) uncreated.:
Veb-sahifa1.Harakat (ExtractFilePath (Dastur.ExeName)+'\Лекции Заготовки.htm');
 Dasturni bajarish uchun ishga tushiring va ishning to'g'riligini tekshiring.
O'zgalarningo'zga, o'zgalarningo'zga xosliklari3o'zga xosliklari4. 

Amaliy ish 2. Sinov yaratish

1 darajali
Faoliyat 1. Foydalanuvchi o'quv dasturi tomonidan taqdim etilgan material bilan tanishib chiqqanidan so'ng, olingan bilimlarni nazorat qilish kerak bo'ladi. Bizning dasturda nazorat shakli sinov bo'ladi. Dastur monitor ekranidagi savolni ko'rsatishi kerak va foydalanuvchi taqdim etilgan to'g'ri javobni tanlashi kerak. Tanlov kalitlar yordamida yoki tanlov tugmalari (radio tugmalari) deb ataladi.