Hi:
in the \Alaska\Xppw32\Source\Samples\Basics\Ownerdrw it has a ORNWEDRW.PRG.
I think the code below (lines 220 ... 226) has an error in the line 224.
Am I wrong?

    IF cStr == NIL
       aDims[1] := ::BarWidth   + ::ItemWidth + ITEM_SPACING *4 + ::FontWidth *8
       aDims[2] := ::FontHeight + ITEM_SPACING *2

       AppDesktop():unlockPS() <=== the PS was not opened
       RETURN self
    ENDIF

Beling
Best regards