paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-12 14:29:36 +02:00
Code Issues Packages Projects Releases Wiki Activity

added ptach from Jesus Reyes A.

Browse Source 
git-svn-id: trunk@3793 -
This commit is contained in:
mattias 2003-01-06 17:42:46 +00:00
parent 2d0fb715b4
commit bee1819dea
1 changed files with 12 additions and 15 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
lcl/grids.pas
View File

@ -1428,7 +1428,6 @@ end;
procedure TCustomGrid.Paint;
begin
Inherited Paint;
If Not (csDesigning in ComponentState) Then begin
If FUpdateCount=0 Then begin
//WriteLn('Paint: FGCache.ValidGrid=',FGCache.ValidGrid );
DrawEdges;
@ -1443,7 +1442,6 @@ begin
DrawColRowMoving;
End;
End;
End;
End;
procedure TCustomGrid.ResetOffset(chkCol, ChkRow: Boolean);
@ -2321,7 +2319,6 @@ begin
inherited MouseDown(Button, Shift, X, Y);
If Not FGCache.ValidGrid Then Exit;
If Not (ssLeft in Shift) Then Exit;
Gz:=MouseToGridZone(X,Y, False);
Case Gz of
gzFixedCols: