TDataSheet: fixed a SIGSEGV in PenStyle()