Name von Instanzvariablen zur Laufzeit abfragen ?

[brandelh]

Ich habe ein eigenes Hilfesystem (ähnlich wie eine Statusbar feldbezogen direkt im Programm) und verzweige bisher etwas umständlich:

Code: Alles auswählen

method MyClass:ZeigHilfe(oXbp)
   local cSuchBeg
   do case 
        case oXbp = ::Name
                cSuchBeg = "FensterName"
        case oXbp = ::Telefon
                cSuchBeg = "FensterTelefon"
...

wenn ich nun direkt den Namen meiner aktuellen Instanzvariable auslesen könnte ...

Code: Alles auswählen

cSuchBeg := "Fenster"+oXbp:IVarName

könne ich mir jede Menge Arbeit sparen, leider finde ich aber keine Möglichkeit, Var2Char() gibt auch nur den Klassennamen zurück.

Hat jemand eine Idee ?

[rassekst]

Hallo Hubert,

Du könntest den Namen in der cargo Variablen mitführen.

Code: Alles auswählen

cSuchBeg := "Fenster"+oXbp:cargo

Hast Du für ein Hilfesystem schon mal die Klasse

Code: Alles auswählen

oXbpHelp := XbpHelp():New( , PRG_NAME+'.chm' )
oXbpHelp:Create()

oXbp := XbpPushButton():new( oGrp,, {oGrp:currentSize()[1]-60,190}, {50,24} )
oXbp:caption      := "Neu"
oXbp:helpLink     := MagicHelpLabel():New('neuen Aktioneintrag anlegen')
oXbp:create()

von XBase++ angesehen.

Gruss Steffen

[brandelh]

Hallo,

richtige Hilfedateien habe ich nur einmal erstellt, aber genauso wie die unter Clipper erstellten Hilfebildschirme liest die kein Anwender (ich entwickle nur Inhouse). Deshalb habe ich am unteren Bildrand ein MLE (2 bis 3 zeilig), welches von jedem Control beim oControl:SetInputFocus() über eine Funktion mit dem jeweiligen Hilfetext geladen wird. Das kann man dann kaum übersehen zumindest nicht mehr behaupten, das gar nicht gewußt zu haben - das mit dem Cargo könnte ich versuchen, den habe ich noch frei.

[Greenhorn]

Hallo Hubert,
bin zwar extrem spät dran mit einer Antwort, hatte aber zufällig heute das gleiche Problem.

Gelöst habe ich das mit Hilfe der Methode :classDescribe().
Die liefert u.a. eine Liste aller Variablen eines Objekts.

Viele Grüße
Peter

[brandelh]

Hi,

in meiner Funktion kommt nur das Control selbst an und :ClassDescribe() gibt in seinem Array die Klasse,
den Klassenbaum und alle möglichen Werte aus, nur nicht den Namen im Quellcode (woher soll es den auch wissen ... )

Ich hatte oben aber "den Namen meiner Instanzvariablen ..." geschrieben, was falsch ist.
Ich meinte eigentlich den Namen des Objekts im Quellcode, also der Instanzvariablen des Fensters,
das dieses Objekt verwaltet ...