在DBGrid中設置不滾動的列及復制與粘貼[1]

    ——此文章摘自《Delphi開發經驗技巧寶典》定價￥　特價￥ 購買>>http://tracklinktechcn/?m_id=dangdang&a_id=A&l=&l_type= width= height= border= nosave>

    在DBGrid中設置不滾動的列

    應用程序可以鎖定表格中指定的幾列不進行滾動我們知道Delphi的TStringGrid有一個屬性FixedCols可用於指定不滾動的列雖然TDBGrid不能直接使用這一屬性但通過強制類型轉換也可以實現這一功能因為這兩個類都來自TCustomGrid類如圖所示

http://developcsaicn/delphi/images/jpg>
圖  在DBGrid中設置不滾動的列

    單擊設置固定列按鈕中把DBGrid表格強制轉換為TstringGrid類型然後設置固定列的序號主要代碼如下
    procedure TFrmOrderByBtnOrderClick(Sender: TObject);
    begin
      TStringGrid(DBGList)FixedCols := ;
    end;

     說明此方法在以下操作後失效:
    （）鼠標將其中一欄的寬度拉大後
    （）被鎖定列的標題文字無法顯示
    （）在移動標題欄或改變DBGrid的行或列時

    如何在DBGrid中實現復制粘貼功能

    在應用程序中DBGrid經常會被用來對數據進行編輯如果沒有復制和粘貼功能使用起來會非常不方便因為DBGrid不是一個標准的Windows組件所以沒有CopyToClipboard（復制）和PasteFromClipboard（粘貼）這兩個方法但是可以把DBGrid需要復制的數據轉移到文本框中然後通過文本框的 CopyToClipboard（復制）和PasteFromClipboard（粘貼）方法對數據進行復制和粘貼如圖所示

http://developcsaicn/delphi/images/jpg>
圖  在DBGrid中實現復制粘貼功能

    在DBGrid的ColEnter事件中設置文本框的連接字段也就是在單擊列的時候把當前列連接字段賦給文本框使文本框顯示的內容和當前選擇的單元格的值保持一致主要代碼如下
    procedure TFrmOrderByDBGListColEnter(Sender: TObject);
    begin
      dbedtDataField := DBGListSelectedFieldFieldName
    end;

right>[]  [http://developcsaicn/delphi/htm>]  

From:http://tw.wingwit.com/Article/program/Delphi/201311/8523.html