Paradox Community

Items in pnews.paradox-intl-de

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


Copyright © 2004 thedbcommunity.com