XProfan

Deutsch

Michael
Wodrich

Ich grübel gerade über folgenden Code:
Kompilieren Markieren Separieren

!Proc SetTabText
--------------
Parameters hCtrl&, n%, text$
Declare TH#
Dim TH#,TC_Item
TH#.Mask& = $0001
TH#.pszText& = Addr(text$)
TH#.cchTextMax& = 80
Return SendMessage(HCTRL&,$1306,n%,TH#)

EndProc

Da wird ein lokaler Bereich erstellt und dann nicht wieder freigegeben.
Da wird von einem lokalen Parameter die Adresse abgegriffen und eingetütet.

Ich sehe ja, daß es funktioniert - aber WARUM???

Schöne Grüße
Michael Wodrich

Programmieren, das spannendste Detektivspiel der Welt.

23.09.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Jac
de
Lad

Ich denke, dass die Variable text$ intern in der Prozedur declariert ist und dann einen Wert aus dem Parameterstack bekommt. Deshalb kann man auch ihre Adresse abgreifen. Das mit der Bereichsvariable ist sicher nur vergessen worden.

Profan² 2.6 bis XProfan 11.1+XPSE+XPIA+XPRR (und irgendwann XIDE)
Core2Duo E8500/T2250, 8192/1024 MB, Radeon HD4850/Radeon XPress 1250, Vista64/XP

23.09.2006 ▲

Vollständiges Zitat

Absatzweise zitieren Zeilenweise zitieren

Ich hatte bei diesem Thema schon angesprochen gehabt das mich wunderte das nix disposed wird.

Roland meinte - es gehört natürlich disposed!

Das die eintütung der Adresse des lokalen Params funktioniert wundert mich hingegen nicht wenn ich bedenke das ja erst der Sendmessage ausgeführt, und dann dessen Result per Return die Prozedur verlassen lässt.

Nur halt das fehlende Dispose ist ein Übl.