• <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>
    • 測試技術
    • 博客
    • 視頻
    • 開源
    • 論壇
    • 沙龍
    • 下載
    • 雜志
    • 招聘

    字號: | 推薦給好友 上一篇 | 下一篇

    Delphi StringGrid使用全書3

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

    領測軟件測試網

    K{ fi8@,Hi軟件測試技術第一門戶0qA/c#c6I p_)N{(T
    Sg:=TStringGrid.Create(self);
    +r-pGBb!GE_1M軟件測試技術第一門戶z7P N_*e%g
    with SG do 軟件測試技術第一門戶&tk0tJ1^,jv
    begin
    ?&L3A1a7d7E-P%|rYparent:=self;
    UK ~rBmRRIalign:=alclient; 軟件測試技術第一門戶T5f;UI!P
    DefaultDrawing:=false;
    ;u uBs9_J4Z#rFixedColor:=clYellow;
    3H'JxUFRowCount:=30; 軟件測試技術第一門戶9? qk_0RP
    ColCount:=20; 軟件測試技術第一門戶nf*MJ?t
    FixedCols:=1;
    *Eh]'V[WG4J vyFixedRows:=1;
    %N4m3x3N%|qi.]%NGridLineWidth:=0;
    Wr M;DfF$`Options:=Options+[goEditing]-[goVertLine,goHorzLine,goRangeSelect]; 軟件測試技術第一門戶3u,zO\D'p
    OnDrawCell:=SGDrawCell;
    "P6H$j5pA\eOnTopLeftChanged:=SGTopLeftChanged;
    w1[ie#Wb@[{~5UCanvas.Font.name:=’宋體’;
    +w;t#?| w.{GCanvas.Font.Size:=10; 軟件測試技術第一門戶l Cz9~ }4v mx
    軟件測試技術第一門戶Hp1`3^dw%o7n;o
    for i:=0 to colCount-1 do 軟件測試技術第一門戶/DR7C)|_ 老湿亚洲永久精品ww47香蕉图片_日韩欧美中文字幕北美法律_国产AV永久无码天堂影院_久久婷婷综合色丁香五月

  • <ruby id="5koa6"></ruby>
    <ruby id="5koa6"><option id="5koa6"><thead id="5koa6"></thead></option></ruby>

    <progress id="5koa6"></progress>

  • <strong id="5koa6"></strong>