paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-27 21:20:30 +02:00
Code Issues Packages Projects Releases Wiki Activity

gtk2: changed local variables names inside my latest patch

Browse Source 
git-svn-id: trunk@23924 -
This commit is contained in:
zeljko 2010-03-10 16:49:06 +00:00
parent 7962b7d3ab
commit 4bafb78e75
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
lcl/interfaces/gtk2/gtk2wscustomlistview.inc
View File

@ -773,8 +773,8 @@ class function TGtk2WSCustomListView.ItemDisplayRect(
var
Widgets: PTVWidgets;
ItemRect: TGdkRectangle;
AColumn: PGtkTreeViewColumn;
APath: PGtkTreePath;
Column: PGtkTreeViewColumn;
Path: PGtkTreePath;
begin
Result := Rect(0, 0, 0, 0);
if not WSCheckHandleAllocated(ALV, 'ItemDisplayRect') then
@ -785,13 +785,13 @@ begin
begin
if gtk_widget_realized(MainView) = False then
exit;
APath := gtk_tree_path_new_from_indices(AIndex, -1);
Path := gtk_tree_path_new_from_indices(AIndex, -1);
try
AColumn := gtk_tree_view_get_column(PGtkTreeView(MainView), ASubItem);
gtk_tree_view_get_cell_area(PGtkTreeView(MainView), APath, AColumn,
Column := gtk_tree_view_get_column(PGtkTreeView(MainView), ASubItem);
gtk_tree_view_get_cell_area(PGtkTreeView(MainView), Path, Column,
@ItemRect);
finally
gtk_tree_path_free(APath);
gtk_tree_path_free(Path);
end;
with ItemRect do