在delphi2005中如何读取数据库中的数据并填入固定的行数与列数的表格中?

就是我在开发一网站时遇到的问题,就是从SQL数据库中读取某一表格中某一列的数据,并将其读入前台的table1( )中,表格为5列,直到读完SQL数据库中那一列数据为止.我的语句如下: procedure TWebForm1.Page_Load(sender: System.Object; e: System.EventArgs);const sql_sel='select * from baby_images';var sqlada:sqldataadapter;// ds:dataset; dt:datatable; row,cell,i:integer; tRow:TableRow; tCell:TableCell; Thlimg:hyperlink;begin sqlada:=sqldataadapter.Create(sql_sel,sqlconnection1); dt:=datatable.Create; sqlada.Fill(dt);for row:=0 to unt-1 do beginif row> unt then breakelse begin if (row+1) mod 5=0 then begin Trow:=tablerow.Create; Table1.Rows.Add(Trow); for cell:=0 to unt-1 do begin TCell:=TableCell.Create; TRow.Cells.Add(TCell); Thlimg:=Hyperlink.Create; Thlimg.ImageUrl:='itvcn_images/'+dt.Rows[cell].Item['urlimages'].ToString ; Thlimg.NavigateUrl:=' '; Tcell.Controls.Add(Thlimg); Tcell.BorderWidth:=1; Tcell.BorderColor:= t_AliceBlue; end;end;end;end;end;但测试失败,望高手指点,我的QQ: 9