paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-28 18:21:26 +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 var
Widgets: PTVWidgets; Widgets: PTVWidgets;
ItemRect: TGdkRectangle; ItemRect: TGdkRectangle;
AColumn: PGtkTreeViewColumn; Column: PGtkTreeViewColumn;
APath: PGtkTreePath; Path: PGtkTreePath;
begin begin
Result := Rect(0, 0, 0, 0); Result := Rect(0, 0, 0, 0);
if not WSCheckHandleAllocated(ALV, 'ItemDisplayRect') then if not WSCheckHandleAllocated(ALV, 'ItemDisplayRect') then
@ -785,13 +785,13 @@ begin
begin begin
if gtk_widget_realized(MainView) = False then if gtk_widget_realized(MainView) = False then
exit; exit;
APath := gtk_tree_path_new_from_indices(AIndex, -1); Path := gtk_tree_path_new_from_indices(AIndex, -1);
try try
AColumn := gtk_tree_view_get_column(PGtkTreeView(MainView), ASubItem); Column := gtk_tree_view_get_column(PGtkTreeView(MainView), ASubItem);
gtk_tree_view_get_cell_area(PGtkTreeView(MainView), APath, AColumn, gtk_tree_view_get_cell_area(PGtkTreeView(MainView), Path, Column,
@ItemRect); @ItemRect);
finally finally
gtk_tree_path_free(APath); gtk_tree_path_free(Path);
end; end;
with ItemRect do with ItemRect do