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

MG: fixed changing notebook pageindex at designtime

Browse Source 
git-svn-id: trunk@3569 -
This commit is contained in:
lazarus 2002-10-26 15:56:45 +00:00
parent c5daac918e
commit dad4a3d66c
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
lcl/include/customnotebook.inc
View File

@ -585,6 +585,8 @@ Begin
if FPageIndex>=PageCount then if FPageIndex>=PageCount then
FPageIndex:=-1; FPageIndex:=-1;
Change; Change;
if csDesigning in ComponentState then
OwnerFormDesignerModified(Self);
end; end;
end; end;
else else
@ -679,6 +681,9 @@ end;}
{ ============================================================================= { =============================================================================
$Log$ $Log$
Revision 1.24 2002/10/26 15:56:45 lazarus
MG: fixed changing notebook pageindex at designtime
Revision 1.23 2002/10/24 08:56:30 lazarus Revision 1.23 2002/10/24 08:56:30 lazarus
MG: fixed TnoteBook AddPage and double creation of MeinMenu MG: fixed TnoteBook AddPage and double creation of MeinMenu