您的位置：軟件測試技術門戶 >> 軟件測試技術 >> 軟件測試開發技術 >> 軟件測試開發語言 >> 查看資訊

Delphi StringGrid使用全書1

發布: 2008-5-19 10:19 | 作者: 不詳 | 來源: Blog - 風之谷 | 查看: 472次 | 進入軟件測試論壇討論

begin
With StringGrid1 do
begin
　 If　(ARow= Krow) and not (acol = 0) then
　 begin
　　　Canvas.Brush.Color :=clYellow;// ClBlue;
　　　Canvas.FillRect(Rect);