You've already forked lazarus-ccr
jvcllaz: Fix TJvMarkupViewer "hiding" pages in a PageControl (https://forum.lazarus.freepascal.org/index.php/topic,47499.msg344725.html#msg344725)
git-svn-id: https://svn.code.sf.net/p/lazarus-ccr/svn@7213 8e941d3f-bd1b-0410-a28a-d453659cc2b4
This commit is contained in:
@ -149,9 +149,13 @@ var
|
|||||||
// tm: TEXTMETRIC;
|
// tm: TEXTMETRIC;
|
||||||
s: string;
|
s: string;
|
||||||
begin
|
begin
|
||||||
|
if csLoading in ComponentState then
|
||||||
|
exit;
|
||||||
|
|
||||||
C := FElementStack.Count;
|
C := FElementStack.Count;
|
||||||
if C = 0 then
|
if C = 0 then
|
||||||
Exit;
|
Exit;
|
||||||
|
|
||||||
for I := 0 to C - 1 do
|
for I := 0 to C - 1 do
|
||||||
begin
|
begin
|
||||||
Element := TJvHTMLElement(FElementStack.Items[I]);
|
Element := TJvHTMLElement(FElementStack.Items[I]);
|
||||||
|
Reference in New Issue
Block a user