mirror of
https://gitlab.com/freepascal.org/lazarus/lazarus.git
synced 2025-11-01 03:09:36 +01:00
LCL: grids cleanup
git-svn-id: trunk@35215 -
This commit is contained in:
parent
a83c4d7f3f
commit
3956876f16
@ -7055,8 +7055,6 @@ begin
|
||||
end;
|
||||
|
||||
procedure TCustomGrid.CMMouseEnter(var Message: TLMessage);
|
||||
var
|
||||
pt: TPoint;
|
||||
begin
|
||||
inherited;
|
||||
FSavedHint := Hint;
|
||||
@ -7481,9 +7479,6 @@ begin
|
||||
end;
|
||||
|
||||
function TCustomGrid.GetCellHintText(ACol, ARow: Integer): string;
|
||||
var
|
||||
txt1: String;
|
||||
txt2: String;
|
||||
begin
|
||||
Result := '';
|
||||
if Assigned(FOnGetCellHint) then
|
||||
|
||||
Loading…
Reference in New Issue
Block a user