DGL • Thema anzeigen - const Parameter

const Parameter - Pointer

Moderator: DGL-Team

Seite 1 von 1

[ 2 Beiträge ]

Vorheriges Thema | Nächstes Thema

Autor

Nachricht

thebubble

Betreff des Beitrags: const Parameter - Pointer

Verfasst: Do Sep 03, 2009 01:17

DGL Member

Registriert: So Jan 07, 2007 21:26
Beiträge: 130
Wohnort: mal hier mal da mal irgendwo

Hi Leute,
ich bastel zZ nen kleines Grundgerüsst für ne GUI. Irgendwie habe ich aber ein Problem. Zu erst aber mal wie meine GUI aufgebaut ist:

TGLComponent <- Basisklasse
TGLLabel <- Wird von Basisklasse abgeleitet
TGLWindow <- Wird auch von Basisklasse abgeleitet

alle haben einen constructor Create wo der erste parameter ein Pointer auf eine TGLComponent ist

TGLLabel-constructor ruft als erstes den von TGLComponent auf und dann das eigene Zeugs
TGLWindow hat ne private Instanz von TGLLabel. Im TGLWindow constructor wird auch erst per "inherited Create(Parameterliste...);" der Konstruktor von TGLComponent aufgerufen. Danach kommt wieder eigenes zeug und dann wird der Konstrukter vom TGLLabel aufgerufen so dass der Methoden-Stack so aus sieht wenn ich im "tiefsten" konstrukter bei TGLWindow bin

TGLWindow.Create(const p:PGLComponent;...)
. |-->TGLComponent.Create(const p:PGLComponent;...)
. |-->TGLLabel.Create(const p:PGLComponent;...) //Hier ist p = @TGLComponent(Self)
........... |--> TGLComponent.Create(const p:PGLComponent;...) //Laut Delphi kommt hier auch die Speicheradresse p= @TGLComponent(Self) an,

in TGLComponent.Create(const p:PGLComponent) ist gleich die allererste Zeile
FParent:=p;
FParent ist auch vom Typ PGLComponent

wenn ich mir jetzt den durchlauf des Label konstruierens mit dem Debugger angucke dann hab ich folgendes Problem:
p hatte z.B. die Speicheradresse $12FDBC, hat es auch noch wenn FParent:=p; aufgerufen wird, allerdings wird FParent nicht wie erwartet auf $12FDBC gesetzt sondern (in diesem Beispiel) auf $1000315

Wisst ihr wo das Problem liegt?

hier nochmal ein paar Code-Fetzen

Code:

 
TGLComponent = class
    private
      ...
      FParent: PGLComponent;
      ...
    public
      constructor Create(const p:PGLComponent;id,x,y,w,h:integer;t:PTexture);
      ...
end;
 
TGLLabel = class(TGLComponent)
    private
      ...
    public
      constructor Create(const p:PGLComponent;id:integer;dc:longWord;x,y,w,h:integer;t:PTexture);
end;
 
TGLWindow = class(TGLComponent)
    private
      FTitlebar: TGLLabel;
      ...
    public
      constructor Create(const p:PGLComponent;id,x,y,w,h:integer;t:PTexture);
end;
 
constructor TGLWindow.Create(const p: PGLComponent; id, x, y, w, h: integer;
  t: PTexture);
begin
  inherited Create(p,id,x,y,w,h,t); //Konstruktor von TGLComponent aufrufen
  FTitlebar:=TGLLabel.Create(@TGLComponent(Self),id+1,Form1.DC,5,h-35,w-10,30,T_GUI_TITLEBAR);  // FTitlebar erstellen...
  ...
end;
 
constructor TGLLabel.Create(const p: PGLComponent; id:integer;dc:longWord; x, y, w, h: integer;
  t: PTexture);
begin
  inherited Create(p,id,x,y,w,h,t); //Konstruktor von TGLComponent aufrufen
  ...
end;
 
constructor TGLComponent.Create(const p: PGLComponent; id, x, y, w,
  h: integer; t: PTexture);
begin
  inherited Create;
  FParent:=p; //Hier tritt der Fehler auf, statt p in FParent zu schreiben, landet dort irgendeine Speicheradresse <!-- s:( --><img src=\"{SMILIES_PATH}/icon_sad.gif\" alt=\":(\" title=\"Sad\" /><!-- s:( -->
  ...
end;
 

Ich hoffe ihr könnt mir helfen, ich verzweifel langsam

Wer mehr Code-Schnipsel brauch, einfach bescheid sagen ...

cuz bubble

_________________
Wenn Worte nichts als Worte sind,
dann müssen's Steine sein!
Solange - bis sie pleite sind - schmeißt Fensterscheiben ein!
- Fidl Kunterbunt -

Nach oben

Markus

Betreff des Beitrags:

Verfasst: Do Sep 03, 2009 07:32

DGL Member

Registriert: Fr Mär 30, 2007 18:35
Beiträge: 331

Also Klassen sind selbst schon Pointer, wenn du also PGLComponent = ^TGLComponent definierst, dann ist das ein Pointer auf einen Pointer. Das ist vollkommen unnötig und bringt wie man sieht nur Probleme mit sich. Du kannst FParent einfach als TGLComponent deklarieren, ist einfacher und funktioniert. Dann kannst du dir auch böses Zeug wie @TGLComponent(Self) sparen :wink:

Nach oben

Seite 1 von 1

[ 2 Beiträge ]

Foren-Übersicht » Programmierung » Allgemein

Wer ist online?

Mitglieder in diesem Forum: 0 Mitglieder und 1 Gast

Du darfst keine neuen Themen in diesem Forum erstellen.
Du darfst keine Antworten zu Themen in diesem Forum erstellen.
Du darfst deine Beiträge in diesem Forum nicht ändern.
Du darfst deine Beiträge in diesem Forum nicht löschen.
Du darfst keine Dateianhänge in diesem Forum erstellen.