Seite 1 von 1

String uebergeben

Verfasst: 21.05.2006 04:46
von Konne
Hallo ich versuche einen Pointer auf den String an eine Procedure zu uebergeben, pb aber zu sagen dass es ein String ist. Nunja um es kurz zu machen: Ich moechte Rechenaufwand sparen in dem ich den String nicht kopieren und dann nochmjal zurueck kopieren muss.

Code: Alles auswählen

Procedure test(*Var.s)
  Debug *Var
  *Var="Test"  
  Debug *Var
EndProcedure

Var.s="Testen"

Test(@Var.s)

Debug Var.s
Aber warum zur Hoelle geht dass nicht?

Verfasst: 21.05.2006 12:26
von jear

Code: Alles auswählen

Procedure test(*Var) 
  Debug PeekS(*Var) 
  PokeS(*Var,"Test")  
  Debug PeekS(*Var) 
EndProcedure 

Var.s = "Testen" 

Test(@Var) 

Debug Var

Verfasst: 21.05.2006 12:46
von ts-soft
Oder so?

Code: Alles auswählen

Procedure test(*Var.String)
  Debug *Var\s
  *Var\s="Test" 
  Debug *Var\s
EndProcedure

Var.String
Var\s = "Testen"
Test(@Var)

Debug Var\s

Verfasst: 23.05.2006 07:18
von Konne
Auf das erste waere ich gekommen, dass zweite wusste ich nicht. Vielen dank Wunderbar!!!