Subject: | Re: Paradox 9 SP 3 unter Windows 10
| Date: | Sun, 2 Jan 2022 16:14:46 +0100
| From: | Thies Grimm <thies.grimm@t-online.de>
| Newsgroups: | pnews.paradox-intl-de
|
Hallo Wolfgang,
hier ist ein kleines Beispiel:
method run(var eventInfo Event)
var
tbl Table
tc TCursor
dynNewStruct dynarray[] anyType
endVar
; // Tabellen mit Daten erstellen
enumRTLClassNames(":priv:tblRTLClassNames.db")
enumRTLMethods(":priv:tblRTLMethods.db")
; // Fieldstructure
tbl.attach(":priv:tblRTLMethods.db")
tbl.enumFieldStruct(":priv:__tblFieldStruct.db" )
; // TableLookUp für das Feld Classname
tc.open(":priv:__tblFieldStruct.db")
tc.edit()
tc.locate("Field Name", "ClassName")
tc."_Table Lookup" = "tblRTLClassNames.db"
tc."_Table Lookup Type" = "3"
tc.unlockRecord()
tc.close()
; // und das eigentliche Restruct
dynNewStruct["FIELDSTRUCT"] = ":priv:__tblFieldStruct.db"
tbl.restructure(dynNewStruct)
endMethod
Am 02.01.2022 um 13:50 schrieb Wolfgang Fieg:
> Hallo Thies,
>
> vielen Dank für Deine Antwort; es scheint ja nicht mehr so viele deutschsprachige
> Paradox-Nutzer zu geben. Aber ich habe auf meine "alten Tage" keine Lust
> mehr, noch einmal eine neue Programmiersprache zu lernen.
>
> Das mit "restruct" werde ich probieren. Meine letzte gedruckte Dokumentation
> ist für ver. 5.0, da gab es die Methode noch nicht. Danach habe ich nur noch
> das Hilfesystem aus ver. 9.0 - und das lässt sich ja seit WIN 10 nicht mehr
> öffnen. Allerdings habe ich einen Ausdruck der Online-Hilfe zu restruct und
> ich meine, es auch schon einmal benutzt zu haben.
>
> Falls es Probleme gibt, werde ich mich noch einmal melden.
>
> Bis dahin
>
> Wolfgang
|