我在DBGrid的Ontitleclick 中实现单击某一列就按某一列排序,为什么老是出现整个DBGIID框闪动的现象?(20分)

  • 主题发起人 主题发起人 hgl780428
  • 开始时间 开始时间
H

hgl780428

Unregistered / Unconfirmed
GUEST, unregistred user!
各位老大帮帮忙,如何不让他闪动/?
在这里先谢谢了
 
内容排序,控制添加。
 
请问楼上的老大,什么意思,是不是constraints 里设置,可否给我说详细点?
 
各位老大,帮帮忙呀,急用呢

老板让赶快做出来呀,救救我呀
 
你是不是用SQL语句排序的啊,如果是的话,可以在添加SQL语句之前加上
一个DisableControl和之后添加一个EnableControl就行了。
 
哥们,用这个,通用!
procedure TMainForm.DBGridTitleBtnClick(Sender: TObject; ACol: Integer;
Column: TColumnEh);
var
DataSet: TDataSet;
begin
DataSet := Column.Field.DataSet;
if DataSet is TCustomADODataSet then
with TCustomADODataSet(DataSet) do
begin
if (Pos(Column.Field.FieldName, Sort) = 1) and (Pos(' DESC', Sort) = 0) then
begin
Sort := Column.Field.FieldName + ' DESC';
end
else
begin
Sort := Column.Field.FieldName + ' ASC';
end;
end;
end;
 
to 娃娃 你好 用你的方法是可以,谢谢你哟

to dhycq 你好,对你的方法很感兴趣,你的方法中DBGridTitleBtnClick,我在dBGRID中只能找到
Dbgridtitleclick 这个事件,你是不是用了第三方的控件,可否给我一个完整的用法呀?多谢谢了
 

Similar threads

D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
1K
DelphiTeacher的专栏
D
D
回复
0
查看
2K
DelphiTeacher的专栏
D
D
回复
0
查看
851
DelphiTeacher的专栏
D
后退
顶部