 |
Das deutsche QBasic- und FreeBASIC-Forum
Für euch erreichbar unter qb-forum.de, fb-forum.de und freebasic-forum.de!
|
| Vorheriges Thema anzeigen :: Nächstes Thema anzeigen |
| Autor |
Nachricht |
Eternal_pain
Anmeldungsdatum: 08.08.2006
Beiträge: 1783
Wohnort: BW/KA
|
 Verfasst am: 25.05.2012, 14:01 Titel: Pointer auf eigene Structur?! |
 |
|
Wollte mir eine neue Baumstructur bauen und der einfachheit halber wollte ich mir
einige Daten von den einzelnen rekursivfunktionen in der Wurzel des Baums ausgeben
lassen, zu dem zweck hab ich eine Root ptr variable die ich per constructor an
sich selbst übergeben will/wollte welche dann eben nur an die unteren Blätter des Baums
weitergegeben werden hätte müssen um dann bestimmte Werte an die Wurzel zu übergeben...
Leider funktioniert es nur teilweise, je nachdem wie ich meine Structur 'initiiere'
Hab zum testen mal ein ganz einfaches Type
| Code: |
Type struct
X as Integer
Y as Integer
Root as struct ptr
Declare Constructor()
Declare Constructor(newX as integer, newY as integer)
End Type
Constructor struct()
this.Root = @this
End Constructor
Constructor struct(newX as integer, newY as integer)
this.Root = @this
with this
.X = newX
.Y = newY
end with
End Constructor
|
Das Funktioniert
| Code: |
Dim mystruct as struct
?@mystruct
?mystruct.root
|
auch das Funktioniert
| Code: |
Dim mystruct as struct=struct(100,100)
?@mystruct
?mystruct.Root
|
Aber..
| Code: |
Dim mystruct as struct
mystruct=struct(100,100)
?@mystruct
?mystruct.Root
|
funktioniert irgendwie nicht... bekomme zwei verschiedene pointer adressen...
Gibts eine 'sicherere' Methode etwas derart zu machen ausser darauf zu achten wie
man nun seinen Baum/Variable/Structur deklariert/initiiert?!
_________________
 |
|
| Nach oben |
|
 |
XOR
Anmeldungsdatum: 23.07.2010
Beiträge: 161
|
| Verfasst am: 25.05.2012, 14:50 Titel: |
|
|
| Zitat: | Aber..
| Code: | Dim mystruct as struct
mystruct=struct(100,100)
?@mystruct
?mystruct.Root |
funktioniert irgendwie nicht... bekomme zwei verschiedene pointer adressen... |
das ist richtig, denn bei
| Code: | | Dim mystruct as struct |
wird ein neues objekt erstellt.
bei
| Code: | | mystruct=struct(100,100) |
wird wieder neues objekt erstellt und mystruct wird dieses zugewiesen.
gibt nun also den zeiger auf mystruct.
gibt jedoch den zeiger auf das kurz erzeugte objekt bei =struct(100,100) zurück, das jedoch schon wieder verworfen sein sollte.
mache es am besten so:
| Code: | Type Tree
X As Integer
Y As Integer
Root As Tree Ptr
Declare Constructor(root As Tree Ptr, newX As Integer, newY As Integer)
End Type
Constructor Tree(root As Tree Ptr, newX As Integer, newY As Integer)
This.Root = IIf(root,root,@This)
This.X = newX
This.Y = newY
End Constructor
Dim As Tree Ptr stamm, ast
stamm = New Tree(0, 0, 0)
ast = New Tree(stamm, 0, 0)
''<-->
Delete ast
Delete stamm |
|
|
| Nach oben |
|
|
Eternal_pain
Anmeldungsdatum: 08.08.2006
Beiträge: 1783
Wohnort: BW/KA
|
| Verfasst am: 25.05.2012, 21:15 Titel: |
|
|
Ok Danke
Das er da ein neues Objekt erstellt war mir nicht bewusst,
ich hab die Constructoren jetzt erstmal raus und sie durch eine Init Fuktion ersetzt... so funktioniert es dann auch
_________________
|
|
| Nach oben |
|
|
|
|
Du kannst keine Beiträge in dieses Forum schreiben.
Du kannst auf Beiträge in diesem Forum nicht antworten.
Du kannst deine Beiträge in diesem Forum nicht bearbeiten.
Du kannst deine Beiträge in diesem Forum nicht löschen.
Du kannst an Umfragen in diesem Forum nicht mitmachen.
|
|
FAQ
Suchen
Mitgliederliste
Benutzergruppen
Registrieren
Profil
Einloggen, um private Nachrichten zu lesen
Login
