请教怎样判断dbgrideh 改变的是哪个列宽度
请问怎样判断dbgrideh 改变的是哪个列宽度
请问怎样判断dbgrideh 改变的是哪个列宽度,急啊!
------解决方案--------------------
procedure TForm1.DBGridEh1ColWidthsChanged(Sender: TObject);
var i:Integer;
begin
for i:=0 to TDBGridEh(Sender).Columns.Count-1 do
begin
if TDBGridEh(Sender).Columns[i].Tag<>TDBGridEh(Sender).Columns[i].Width then
begin
TDBGridEh(Sender).Columns[i].Tag:=TDBGridEh(Sender).Columns[i].Width;
Caption:=IntToStr(i);
end;
end;
end;
请问怎样判断dbgrideh 改变的是哪个列宽度,急啊!
列宽 Delphi
------解决方案--------------------
procedure TForm1.DBGridEh1ColWidthsChanged(Sender: TObject);
var i:Integer;
begin
for i:=0 to TDBGridEh(Sender).Columns.Count-1 do
begin
if TDBGridEh(Sender).Columns[i].Tag<>TDBGridEh(Sender).Columns[i].Width then
begin
TDBGridEh(Sender).Columns[i].Tag:=TDBGridEh(Sender).Columns[i].Width;
Caption:=IntToStr(i);
end;
end;
end;