Xbase++ DLL mit :classDescribe()
Verfasst: Fr, 09. Sep 2011 3:37
hi,
ich stöbere gerne mal in den Xbase++ DLL ob ich da was interessantes finde.
nun hab ich mich mal mit o:classDescribe() ran-gemacht und eine Liste von den "Inhalt" Xbase++ DLLs erstellt.
ich beziehe mich dabei nur auf "XBP" ... andere "mögliche" Class(en) werden nicht berücksichtigt.
wenn nun alles mit einer Class geklappt werden wie im o:classDescribe() Help Sample die Property und Methoden aufgelistet.
das o:classDescribe() Help Sample bezieht sich ja nur auf das XbpDialog Object und da habe ich auch den folgenden Code her
... der "wirkt" nicht ... er geht da nie "rein" ... hm ?
für Member Varsowie dann für die Methodenich kann jedenfalls kein HIDDEN oder PROTECTED im Logfile sehen.
das EXE "könnte" auch mit einer "eigenen" DLL bearbeiten ( Fullpath+*.DLL ) aber da es nur nach "XBP" sucht wird es kaum was bringen.
wer Lust hat kann ja mal in die Liste schauen was es für Propertys und Methoden gibt die "undokumentiert" sind.
ich stöbere gerne mal in den Xbase++ DLL ob ich da was interessantes finde.
nun hab ich mich mal mit o:classDescribe() ran-gemacht und eine Liste von den "Inhalt" Xbase++ DLLs erstellt.
ich beziehe mich dabei nur auf "XBP" ... andere "mögliche" Class(en) werden nicht berücksichtigt.
wenn nun alles mit einer Class geklappt werden wie im o:classDescribe() Help Sample die Property und Methoden aufgelistet.
das o:classDescribe() Help Sample bezieht sich ja nur auf das XbpDialog Object und da habe ich auch den folgenden Code her
... der "wirkt" nicht ... er geht da nie "rein" ... hm ?
für Member Var
Code: Alles auswählen
cClassName := aClass[i, CLASS_MEMBER_NAME]
IF aClass[i, CLASS_MEMBER_ATTR] == VAR_ASSIGN_HIDDEN
// Debug -> Logfile
onDummy(SUBSTR(cClassName+SPACE(nLen),1,nLen)+ " = HIDDEN "+cDummy )
ELSEIF aClass[i, CLASS_MEMBER_ATTR] == VAR_ASSIGN_PROTECTED
// Debug -> Logfile
onDummy(SUBSTR(cClassName+SPACE(nLen),1,nLen)+ " = PROTECTED "+cDummy )
ELSE
Code: Alles auswählen
cClassMethod := aClass[i, CLASS_METHOD_NAME]
IF aClass[i, CLASS_METHOD_ATTR] == CLASS_HIDDEN
// Debug -> Logfile
onDummy(SUBSTR(cClassMethod+"()"+SPACE(nLen),1,nLen)+ " = HIDDEN ")
ELSEIF aClass[i, CLASS_METHOD_ATTR] == CLASS_PROTECTED
// Debug -> Logfile
onDummy(SUBSTR(cClassMethod+"()"+SPACE(nLen),1,nLen)+ " = PROTECTED ")
ELSE
das EXE "könnte" auch mit einer "eigenen" DLL bearbeiten ( Fullpath+*.DLL ) aber da es nur nach "XBP" sucht wird es kaum was bringen.
wer Lust hat kann ja mal in die Liste schauen was es für Propertys und Methoden gibt die "undokumentiert" sind.