diff options
| author | David Laurence Emerson <dle3ab@angelbase.com> | 2013-05-27 23:52:32 -0700 |
|---|---|---|
| committer | David Laurence Emerson <dle3ab@angelbase.com> | 2013-05-27 23:52:32 -0700 |
| commit | 4823d681953279fbdf6081695f55b250d098aee7 (patch) | |
| tree | 540a5e2ca4338f7e93fda8ea57d0e041138833fd /src | |
| parent | cf66621f3e5df509670a9b7bfda7952d653aa672 (diff) | |
| download | fpGUI-4823d681953279fbdf6081695f55b250d098aee7.tar.xz | |
renamed FScrollFrame (bad name) to FVisibleArea
Diffstat (limited to 'src')
| -rw-r--r-- | src/gui/fpg_scrollframe.pas | 20 |
1 files changed, 10 insertions, 10 deletions
diff --git a/src/gui/fpg_scrollframe.pas b/src/gui/fpg_scrollframe.pas index 335b97a8..d10c69fd 100644 --- a/src/gui/fpg_scrollframe.pas +++ b/src/gui/fpg_scrollframe.pas @@ -40,7 +40,7 @@ type TfpgScrollFrame = class (TfpgFrame) private FContentFrame : TfpgAutoSizingFrame; - FScrollFrame : TfpgFrame; + FVisibleArea : TfpgFrame; FHScrollBar : TfpgScrollBar; FVScrollBar : TfpgScrollBar; FScrollBarStyle : TfpgScrollStyle; @@ -348,8 +348,8 @@ begin FVScrollBar.UpdateWindowPosition; FHScrollBar.UpdateWindowPosition; - FScrollFrame.SetPosition(0, 0, visWidth, visHeight); - FScrollFrame.UpdateWindowPosition; + FVisibleArea.SetPosition(0, 0, visWidth, visHeight); + FVisibleArea.UpdateWindowPosition; FContentFrame.UpdateWindowPosition; end; @@ -358,10 +358,10 @@ constructor TfpgScrollFrame.Create(AOwner: TComponent); begin inherited Create(AOwner); - FScrollFrame := TfpgFrame.Create(self); - FScrollFrame.SetPosition(0, 0, 1, 1); + FVisibleArea := TfpgFrame.Create(self); + FVisibleArea.SetPosition(0, 0, 1, 1); - FContentFrame := TfpgAutoSizingFrame.Create(FScrollFrame); + FContentFrame := TfpgAutoSizingFrame.Create(FVisibleArea); FContentFrame.SetPosition(0, 0, 1, 1); FContentFrame.ParentScrollFrame := self; end; @@ -370,11 +370,11 @@ constructor TfpgScrollFrame.Create(AOwner: TComponent; ContentFrameType: TfpgASF begin inherited Create(AOwner); - FScrollFrame := TfpgFrame.Create(self); - FScrollFrame.Left := 0; - FScrollFrame.Top := 0; + FVisibleArea := TfpgFrame.Create(self); + FVisibleArea.Left := 0; + FVisibleArea.Top := 0; - FContentFrame := ContentFrameType.Create(FScrollFrame); + FContentFrame := ContentFrameType.Create(FVisibleArea); FContentFrame.Left := 0; FContentFrame.Top := 0; FContentFrame.ParentScrollFrame := self; |