String in PAnsiString

**wo0zy**

hi gibts eine möglichkeit einen string in einen PAnsiString umzuwandeln ohne jedoch informationen zu verlieren??

**APP**

Hallo,

bitte definiere

Zitat:

informationen zu verlieren

genauer

**jbg**

In den aktuellen Delphi Versionen ist string als AnsiString deklariert. Somit geht kann man einen string mit folgendem Code in einen PAnsiString (=PString) umwandeln.

markieren

Delphi-Quellcode:

			var

  p: PAnsiString;

  s: string; // = AnsiString

begin

  p := @s;

end;

**wo0zy**

sorry, aber ich hab mich verschrieben, ich meinte PAnsiChar.

**APP**

Hallo,
meinst Du so etwas?

markieren

Delphi-Quellcode:

			procedure TForm1.Button1Click(Sender: TObject);

var

  p: PAnsiChar;

  s: string; 

begin

  s := 'test';

  p := pchar(s);

  showmessage(string(p));

end;

**wo0zy**

ja, genau das hat mir gefehlt dankesehr!!

String in PAnsiString

String in PAnsiString

Sorry....

Forumregeln

wo0zy Registriert seit: 14. Apr 2003 Ort: 127.0.0.1 80 Beiträge Delphi 7 Enterprise	#1 String in PAnsiString 15. Apr 2003, 12:54 hi gibts eine möglichkeit einen string in einen PAnsiString umzuwandeln ohne jedoch informationen zu verlieren?? It's not a bug it's a feature!
	Zitat

APP Registriert seit: 24. Feb 2003 Ort: Graz (A) 705 Beiträge Delphi 7 Enterprise	#2 15. Apr 2003, 15:35 Hallo, bitte definiere Zitat: informationen zu verlieren genauer Armin P. Pressler BEGIN ...real programmers are using C/C++ - smart developers Delphi; END;
	Zitat

jbg Registriert seit: 12. Jun 2002 3.481 Beiträge Delphi 10.1 Berlin Professional	#3 15. Apr 2003, 15:43 In den aktuellen Delphi Versionen ist string als AnsiString deklariert. Somit geht kann man einen string mit folgendem Code in einen PAnsiString (=PString) umwandeln. markieren Delphi-Quellcode: var p: PAnsiString; s: string; // = AnsiString begin p := @s; end; Andreas aka AHUser aka jbg Mein Blog - kombiniert mit all meinen Delphi Tools
	Zitat

wo0zy Registriert seit: 14. Apr 2003 Ort: 127.0.0.1 80 Beiträge Delphi 7 Enterprise	#4 Sorry.... 15. Apr 2003, 15:56 sorry, aber ich hab mich verschrieben, ich meinte PAnsiChar. It's not a bug it's a feature!
	Zitat

APP Registriert seit: 24. Feb 2003 Ort: Graz (A) 705 Beiträge Delphi 7 Enterprise	#5 15. Apr 2003, 16:29 Hallo, meinst Du so etwas? markieren Delphi-Quellcode: procedure TForm1.Button1Click(Sender: TObject); var p: PAnsiChar; s: string; begin s := 'test'; p := pchar(s); showmessage(string(p)); end; Armin P. Pressler BEGIN ...real programmers are using C/C++ - smart developers Delphi; END;
	Zitat

wo0zy Registriert seit: 14. Apr 2003 Ort: 127.0.0.1 80 Beiträge Delphi 7 Enterprise	#6 16. Apr 2003, 15:42 ja, genau das hat mir gefehlt dankesehr!! It's not a bug it's a feature!
	Zitat