N
nullbert22
Unregistered / Unconfirmed
GUEST, unregistred user!
代码是这样的:
tmydbgrid=class(dbgrid)
...
public
constructor create(aower:tcomponent);override;
constructor tmydbgrid.create(aower:tcomponent);
begin
inherited;
sold.cbSize:=sizeof(sold);
sold.fmask:=sif_all;
sold.nMin:=1;
sold.nMax:=self.DataSource.DataSet.RecordCount;
setscrollinfo(self.Handle,sb_vert,sold,true);
end;
编译可以通过,运行咋不行呢
tmydbgrid=class(dbgrid)
...
public
constructor create(aower:tcomponent);override;
constructor tmydbgrid.create(aower:tcomponent);
begin
inherited;
sold.cbSize:=sizeof(sold);
sold.fmask:=sif_all;
sold.nMin:=1;
sold.nMax:=self.DataSource.DataSet.RecordCount;
setscrollinfo(self.Handle,sb_vert,sold,true);
end;
编译可以通过,运行咋不行呢