Delphi-PRAXiS

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   GUI-Design mit VCL / FireMonkey / Common Controls (https://www.delphipraxis.net/18-gui-design-mit-vcl-firemonkey-common-controls/)
-   -   Delphi GLScene Objekt ein doProgress zuordnen? (https://www.delphipraxis.net/11501-glscene-objekt-ein-doprogress-zuordnen.html)

Pyr0cracker 7. Nov 2003 21:21


GLScene Objekt ein doProgress zuordnen?
 
Hallo!
Ich möchte mit GlScene dynamisch Objekte erzeugen.
Da muss ich auch eine doProgress Prozedur hinzufügen, das wird bei jedem Frame ausgeführt.
Delphi-Quellcode:
procedure Tobjekt.initialisieren;
begin
   spieler.doProgress := Spieler.DoAktion;
...
Leider geht leider nicht, da es diese Zuweisung wohl gar nicht gibt :shock:

Habt Ihr ne Idee?

Danke schonmal,

tommie-lie 8. Nov 2003 10:28

Re: GLScene Objekt ein doProgress zuordnen?
 
1. Eine Fehlermeldung wäre sinnvoll, wenn es ein komplexeres Problem wäre!
2. wenn Spieler ein TGLBaseSceneObject oder ein Nachfahre dessen ist, kann das, was du da machst, gar nicht funktionieren. DoProgress ist eine Methode von TGLBaseSceneObject und ruft das Event OnProgress auf. Events fangen in Klassen, die sich an den StyleGuide halten, immer mit "On" an.
3. spieler.DoAktion muss als TGLProgressEvent-Prozedur deklariert sein. TGLProgress ist ein Typ der folgendermaßen deklariert ist:
Delphi-Quellcode:
TGLProgressEvent = procedure (Sender : TObject; const deltaTime, newTime : Double) of object;
DoAktion muss also drei Parameter vom passenden Typ annehmen.

Was du also brauchst ist eine DoAktion, die richtig deklariert ist und die Zuweisungszeile
Delphi-Quellcode:
spieler.OnProgress := spieler.DoAktion
.

Pyr0cracker 8. Nov 2003 15:09

Re: GLScene Objekt ein doProgress zuordnen?
 
Okay, ich habs schon.
Delphi-Quellcode:
type
  bla
    domove(Sender: TObject; const deltaTime, newTime: Double);
  ...


bla.onProgress := bla.doMove;
Danke und Gruß,


Alle Zeitangaben in WEZ +1. Es ist jetzt 05:50 Uhr.

Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz