Alaska Software Inc. - oRTF:Show()
Username: Password:
AuthorTopic: oRTF:Show()
AUGE_OHRoRTF:Show()
on Thu, 10 Dec 2009 18:00:06 +0100
hi,

*** Code ***
    oRTF := XbpRTF():new()
    oRTF:create( ,, {10,10},{300,300},{{XBP_PP_COMPOUNDNAME,"12.Arial"}} )
...
    oRTF:hide()
...
    oRTF:Show()
*** eof ***

does raise a Error

*** Zitat: ***
Xbase++ Version : Xbase++ (R) Version 1.90.355
Betriebssystem : Windows XP 05.01 Build 02600 Service Pack 3
-----------------------------------------------------------------
oError:args :
-> VALTYPE: C VALUE: Appearance
-> VALTYPE: N VALUE: 1
oError:canDefault : J
oError:canRetry : N
oError:canSubstitute: J
oError:cargo : NIL
oError:description : Property is read-only
oError:filename : NIL
oError:genCode : NIL
oError:operation : setProperty
oError:osCode : -2146827905
oError:severity : 2
oError:subCode : 6500
oError:subSystem : Automation
oError:thread : 1
oError:tries : NIL
-----------------------------------------------------------------
CALLSTACK:
-----------------------------------------------------------------

Called from XBPRTF:SETAPPEARANCE(5402)
Called from XBPRTF:SHOW(5371)
Called from HX_CMDBAR:TABRESIZE(1442)
Called from (B)HX_CMDBAR:ADDRIBTAB(1129)
Called from MAIN(163)
*** eof ***

this is the original RTF Soure

*** Code ***
METHOD XbpRtf:Show()
LOCAL bReturn := ::XbpActiveXControl:Show()
   IF bReturn == .T.
      ::SetAppearance( ::Appearance )
      ::SetScrollbars( ::Scrollbars )
      ::SetMultiLine(  ::MultiLine )
   ENDIF
RETURN bReturn
*** eof ***

looking into RTF Help File say

*** Zitat ***
Appearance property (RichTextBox)
Returns/sets the paint style of a control at run time.

Property type

A AppearanceConstants value.

Syntax

object.Appearance [= value]

object An expression evaluating to an object of type RichTextBox.
value A AppearanceConstants value.
*** eof ***

so there is NO "read-Only" ???

BUT, all seems me wrong while RichTX32 does NOT have any :show() Methode.
It have a :refresh Methode !

greetings by OHR
Jimmy