Delphi-PRAXiS
Seite 2 von 2     12   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Object-Pascal / Delphi-Language (https://www.delphipraxis.net/32-object-pascal-delphi-language/)
-   -   Delphi Proceduren Pointer übergeben (https://www.delphipraxis.net/116174-proceduren-pointer-uebergeben.html)

Cyf 24. Jun 2008 18:08

Re: Proceduren Pointer übergeben
 
Zitat:

Zitat von SirThornberry
TThreadInfo ist doch kein Pointer sondern eine Struktur :gruebel:

Ähhm ja, völlig richtig. Denkfehler. :wall:
Hab irgendwie grad an eine Objektinstanz gedacht, intressanterweise hab ich dabei was geschrieben, bei dem ich eine Struktur extra noch mit var übergebe...
So ich glaub ich mach jetzt erstmal eine Pause. :zwinker:

Win32.API 24. Jun 2008 19:33

Re: Proceduren Pointer übergeben
 
Sollte

Delphi-Quellcode:
procedure ThreadProcedure([b]var[/b] Info : TThreadInfo); stdcall;
nicht gehen?

oki 24. Jun 2008 20:31

Re: Proceduren Pointer übergeben
 
imho sollte mit var ein Zeiger auf den Record übergeben werden und man kann sich das Speicer reservieren sparen.

Gruß oki

Apollonius 24. Jun 2008 20:36

Re: Proceduren Pointer übergeben
 
Zitat:

Ja, davon bin ich auch ausgegangen, allerdings scheint es das nicht gemacht zuhaben, da es nun mit einem kleinen ^ geht.
Ich wäre daher niemals auf die Idee gekommen, dass es nicht derefenziert ist.
Das war ganz sicher nicht der Fehler! Delphi dereferenziert automatisch - es gäbe ja auch keinen Sinn, Felder eines Zeigers anzusprechen.
Ich kann im Ursprungscode absolut nichts falsches oder seltsames erkennen.

gammatester 24. Jun 2008 21:07

Re: Proceduren Pointer übergeben
 
Dumme Frage: müßte es nicht heißen
Delphi-Quellcode:
 ThreadInfo.Address := @ThreadStartAddress;
d.h. mit @!

Dieses ganze automatische Dereferenzieren zusammen mit den Compilermagics macht mich bei Delphi oft fertig, und ich bleibe meist bei der eindeutigen klaren Pascalsyxtax mit ^ und @.

Gruß Gammatester


Alle Zeitangaben in WEZ +1. Es ist jetzt 12:55 Uhr.
Seite 2 von 2     12   

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