Pointer auf einen String

[igel457]

Ich hab mal noch eine Frage...

Wie kann ich einen Pointer auf einen String herstellen.

So...

Delphi-Quellcode:

var roomid:string;
    ptr:Pointer;
ptr := @roomid;
showmessage(pchar(base.settings.Items[i].ptr)^);

...bekomme ich nur einen "|" als Antwort, wenn ich @roomid[i] schreibe bekomme ich nur den ersten Buchstaben.

Danke für eure Hilfe, Igel457

[Bernhard Geyer]

Delphi-Quellcode:

var
  roomid:string;
  ptr: PChar;
begin
  ptr := PChar(roomid);
  showmessage(ptr);
end;

[igel457]

Mein Compiler meckert mir "Ungültige Typumwandlung"... Trotzdem Danke

[igel457]

:wall:

Ich nehme (fast) alles zurück... Bei mir sieht es im Groben so aus (ptr2 muss leider sein)

Delphi-Quellcode:

var
  roomid:string;
  ptr: PChar;
  ptr2:pointer;
begin
  ptr := PChar(@roomid);
  ptr2 := ptr;  
  showmessage(pchar(ptr));
end;

:bounce1:

Danke!

[Bernhard Geyer]

Zitat:

Zitat von igel457

Mein Compiler meckert mir "Ungültige Typumwandlung"... Trotzdem Danke

Wenn showmessage die Standard-Delphi-Methode ist, ist es klar. Die brauch natürlich eine String.

Delphi-Quellcode:

var
  roomid:string;
  ptr: PChar;
  tmp: string;
begin
  ptr := PChar(roomid);
  tmp :=  ptr;
  showmessage(tmp);
end;

[igel457]

:gruebel: Nein... Das war ein Mistverständnis... Hier: -> ptr := PChar(@roomid); <- kam der Fehler!
Das mit "ShowMessage" war nur ein Beispiel von mir um klar zu machen was ich wollte... :-D

[himitsu]

@S zeigt auf den internen Pointer des Stgings (jener, welcher speichert wo die Stringdaten abgelegt sind), wenn du einen Pointer auf den String selber haben möchtest, dann verwende Pointer(S), hol dir den Pointer auf das erste Zeichen @S[1], oder caste diesen nach PChar/PAnsiChar PChar(S).

wobei ich dir wohl empfehlen würde die Varianten mit @S[1] und PChar(S) zu verwenden, daß direkte umwandeln per Pointer(S) geht zwas schneller und erzeugt weniger Code, aber wenn man nicht weiß was man macht, dann kann man sich einige Probleme damit einhandeln, wobei bei den anderen beiden Varianten die CompilerMagic einem etwas Arbeit abnimmt.

[jim_raynor]

Funktioniert denn nicht, bzw. was funktioniert nicht dadran?:

Delphi-Quellcode:

var roomid:string;
    ptr: PString;
ptr := @roomid;
showmessage(ptr^);

Wo du aufpassen musst, ist dass der Ausgangsstrings noch nicht wieder gelöscht ist (zum Beispiel Funktion in dem der String deklariert ist, wurde verlassen).

[igel457]

Nein, das funktioniert nicht...
Die Lösung von Oben ist schon Okay.

[jim_raynor]

Zitat:

Zitat von igel457

Nein, das funktioniert nicht...

Mich würde mal interessieren was nicht klappt!

Zitat:

Zitat von igel457

Die Lösung von Oben ist schon Okay.

Aber erreichst du damit auch dein Ziel, dass du dann einfach die Variable ändern kannst, auf die dein Pointer zeigt? Denn Hin- und Herkopieren ist ja einfach.

Kannst du denn jetzt in Ptr was schreiben, so dass es dann auch direkt in RoomId ohne irgendwelche Umwandlungen drin steht?

Sorry, hab im Moment kein Delphi hier, sonst hätte ich es schon längst ausprobiert ;)

[igel457]

Zitat:

Zitat von jim_raynor

Kannst du denn jetzt in Ptr was schreiben, so dass es dann auch direkt in RoomId ohne irgendwelche Umwandlungen drin steht?

Nicht ganz... Das ist mir dann auch aufgefallen. Ich hab mir dann eine andere, nicht ganz so "schöne" Lösung für mein das ganze ausgedacht.

[jim_raynor]

Ich schau heute Abend nochmal. Auf jeden Fall gehts auch so wie mit Integers und anderen Datentypen ;) Der JvInspector machst ja auch.

[igel457]

Mein Inspektor geht jezt auch. Ich schau mir aber trotzdem noch mal die JEDI-Variante etwas genauer an.

[Neotracer64]

Kann mir einer verraten warum das keiner so gemacht hat? :gruebel:

Delphi-Quellcode:

[...]
var
  Str: String;
  PStr: ^String;
begin

  Str := '123';
  PStr := @Str;
  ShowMessage(PStr^);
end;

[jim_raynor]

Zitat:

Zitat von Neotracer64

Kann mir einer verraten warum das keiner so gemacht hat? :gruebel:

Delphi-Quellcode:

[...]
var
  Str: String;
  PStr: ^String;
begin

  Str := '123';
  PStr := @Str;
  ShowMessage(PStr^);
end;

Entspricht doch meinem Vorschlag ;) PString = ^String