本程序設(shè)計界面及運行界面如下：

程序功能是：用戶輸入一個3位正整數(shù)后，按“確定”鍵，該數(shù)字的個位、十位、百位數(shù)字分別顯示在輸出框中。如果輸入的數(shù)據(jù)不在規(guī)定范圍之內(nèi)，程序要給出錯誤提示。 
請編寫單擊“確定”按鈕的事件處理程序。

數(shù)據(jù)庫mydb中有關(guān)系表student，其結(jié)構(gòu)如下： 
student（sno學(xué)號，sname姓名，sex性別，birthday生日） 
現(xiàn)編寫一個學(xué)生信息瀏覽程序，設(shè)計界面和運行界面如下圖所示：

在下劃線處填寫相應(yīng)數(shù)據(jù)庫組件的屬性值： 
Database1. DatabaseName : mydb  
Table1. DatabaseName :  mydb  T
able1. TableName :  student 
Table1. Active :（①）          
Datasource1.DataSet :（②）         
DBNavigator1. DataSource : （③）         
DBEdit2. DataSource :（④）          
DBEdit2. DataField :（⑤）  

本程序根據(jù)用戶選擇的運算符對輸入的二個操作數(shù)進行運算，并顯示運算結(jié)果。設(shè)計界面和運行界面如圖所示。其中，運算符是一個含有4個單選按紐的RadioGroup1對象。
 

下面是單擊“運算”按鈕的事件處理程序，請根據(jù)功能要求完成程序填空。

procedure TForm1.Button1Click(Sender: TObject);//運算 
var 
   x1,x2,y :Integer; 
begin 
   x1 := StrToInt( Edit1. ①);
     x2 : = StrToInt( Edit2. ②);   
 Case ③.ItemIndex of    
 0: y := x1 + x2 ;     
1: y := x1 - x2;    
 2: y := x1 * x2;    
 3: y := x1 Div x2;   
 End; 
   Edit3. ④:= IntToStr( ⑤); 
end;