[HeDiBo]

In the WM_LBUTTONUP, WM_LBUTTONDOWN: part of the WndProc procedure this code has changed from AC 13.11

Code:

if Page <> ActivePage then
if SkinData.Skinned and SkinData.SkinManager.AnimEffects.PageChange.Active then begin
sVCLUtils.PrepareForAnimation(Self);
ActivePage := Page;
sVCLUtils.AnimShowControl(Self, SkinData.SkinManager.AnimEffects.PageChange.Time);
end
else
ActivePage := Page;

Exit;

In AC 13.11 this was simply:

Code:

if Page = ActivePage then begin
inherited;
Exit;

The inherited statement is missing from the new code.

The OnPageChanging event is executed.

Please help, this is a serious flaw

[Support]

Hello!

“Inherited” can't be used there anymore, because behaviour of standard code is incorrect for “RightToLeft” BidiMode.

I have sent a changed sPageControl unit via PM, please check it.

[HeDiBo]

'Support' wrote:

Hello!

“Inherited” can't be used there anymore, because behaviour of standard code is incorrect for “RightToLeft” BidiMode.

I have sent a changed sPageControl unit via PM, please check it.

The edited pagecontrol does the trick. Thank you 👌

[Author]

Posts