Форум: "Начинающим";
Текущий архив: 2006.01.29;
Скачать: [xml.tar.bz2];
ВнизЗакрепление областей в DBGrid Найти похожие ветки
← →
ivc_vetal (2006-01-12 16:20) [0]Как сделать закрепление областей в DBGgrid подобно Excel?
← →
Ega23 © (2006-01-12 16:25) [1]
function FreezeColumns(ActiveDbGrid:TRxDbGrid):boolean;
var i:integer;
ds:tdataset;
begin
result:=false;
if NoConnectGlb then exit; //@@ 09-10-2001
try
if ActiveDbGrid=nil then exit;
try ds:=ActiveDbGrid.DataSource.dataset; if ds<>nil then ds.disablecontrols; except end;
i:=ActiveDbGrid.Col ;
if ActiveDbGrid.fixedCols=0 then ActiveDbGrid.fixedCols:= ActiveDbGrid.Col
else ActiveDbGrid.fixedCols:=0;
if i>ActiveDbGrid.fixedCols then ActiveDbGrid.Col:=i;
result:=(ActiveDbGrid.fixedCols<>0);
finally
try if ds<>nil then ds.enablecontrols; except end
end;
end;
Это?
← →
ivc_vetal (2006-01-12 16:29) [2]ага. Thanks!!! :)))
← →
Ega23 © (2006-01-12 16:58) [3]Незачто
Страницы: 1 вся ветка
Форум: "Начинающим";
Текущий архив: 2006.01.29;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.047 c