[tmorris]

Attached is the example.

Behavior happens with a tabbed DevExpress cxGrid. When toggling the active property it throws an AV. Specifically in acLFPainter. It appears the following code is suspect:

Code:

function Skinned(Ctrl: TControl = nil): boolean;
var
F: TCustomForm;
begin
Result := False;
DefManager := DefaultManager;
if DefManager <> nil then begin
if Ctrl <> nil then begin
F := GetParentForm(Ctrl);
if (F = nil) or not WndIsSkinned(F.Handle) then
Exit;
end;
Result := DefManager.CommonSkinData.Active
end;
end;

The call to DefManager.CommonSkinData.Active appears to be a deprecated property.

Also maybe it should be SkinCommonInfo?

[Support]

Hello and thank you for the demo. This error will be fixed in the nearest release.

“DefManager.IsActive” should be used there.

[Author]

Posts