Delphi 锁住listview防止刷新

本文整理自网络，侵删。

 
    //更新数据
    //锁住listview防止刷新
    LockWindowUpdate(Self.ListView1.Handle);
    ListView1.Items.BeginUpdate;
    try
      with ListView1 do
      begin
        for i := 0 to Items.Count - 1 do
        begin

            Items.Item[i].SubItems.Strings[2] := CurrPx;
            Items.Item[i].SubItems.Strings[3] := ChangeRate;
            Items.Item[i].SubItems.Strings[5] := chosenTime;

        end;
      end;
    finally
      ListView1.Items.EndUpdate;
      //解锁listview
      LockWindowUpdate(0);
    end;

    //增加数据
    with listview1.items.add do
    begin
      subitems.add(Stockid);
      subitems.add(StockName);
      subitems.add(CurrPx);
      subitems.add(ChangeRate);
      subItems.Add(Ajson.ItemByName('changeRate').AsString);
      subitems.add(chosenTime);
    end;

 

相关阅读 >>

Delphi rect()

trichedit 是一个标准的rtf编辑器

Delphi使用hough变换查找直线

Delphi中设置系统时间方法

Delphi access中只取时间的日期部分的函数

Delphi利用webbrowser登陆qq群文档

Delphi webbrowser控件的事件

Delphi memo 字符串换行

Delphi firemonkey限制tedit只能输入数字的完美方法

Delphi listview基本用法大全

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi 锁住listview防止刷新