StrCopy Problem (string und pchar)

[Hybrid666]

ich hab folgendes problem:

Delphi-Quellcode:

strcopy(data,'blablabla');

funktioniert...aber ich will statt nem vordefiniertem string ne variable des typs string einfügen...aber

Delphi-Quellcode:

strcopy(data,text);

funktioniert nicht...wie kann ich das machen? (data ist ein PChar)

MfG Hybrid666

[Balu der Bär]

Ich nehme an text ist ein String?

Einfach so:

Delphi-Quellcode:

strcopy(data,PChar(text));

[Klaus01]

oder mit StrPas PChar nach String wandeln

aus der Hilfe:

Zitat:

Converts null-terminated string to a Pascal string.

Unit

SysUtils

Category

backward compatibility routines

function StrPas(const Str: PChar): string;

Description

This function is provided for backwards compatibility only. To convert a null terminated string to a Pascal-type string, use a typecast or an assignment.

Grüße
Klaus

[Balu der Bär]

strcopy erwartet aber zwei AnsiChars als Übergabewerte, er braucht also nichts in einen String umwandeln. ;)

[3_of_8]

Ich weiß nicht, welche Version du benutzt, aber bei mir (Delphi 7) ist StrPas deprecated.

Delphi unterstützt bei meiner Version einen impliziten Cast von PChar auf String. Umgekehrt gehts mit @str[1] oder PChar(str).

[Hybrid666]

Zitat:

Zitat von 3_of_8

Ich weiß nicht, welche Version du benutzt, aber bei mir (Delphi 7) ist StrPas deprecated.

Delphi unterstützt bei meiner Version einen impliziten Cast von PChar auf String. Umgekehrt gehts mit @str[1] oder PChar(str).

also: text ist ein string
data ist ein PChar, den ich auch als PChar brauche, weil er fest in einer function ist

Delphi-Quellcode:

function antilock( mWnd: hWnd; aWnd: hWnd; Data: PChar; Parms: PChar; Show: Boolean; NoPause: Boolean ): Integer; export; stdcall;

so...und wenn ich strcopy mit einem FESTEN string (also 'blablabla') nehme gehts, also müsste es auch gehen wenn ich da text reintu....oder ich muss eben irgendwie text zuerst in einen PChar umwandeln falls das geht...

MfG Hybrid666

P.S.: Ich nutze Delphi 6 Personal

[Balu der Bär]

Zitat:

also müsste es auch gehen wenn ich da text reintu....oder ich muss eben irgendwie text zuerst in einen PChar umwandeln falls das geht...

Hast du meinen Post gelesen? :roll:

Delphi-Quellcode:

strcopy(data,PChar(text));

[3_of_8]

Oooder strcopy(data, @text[1]);

(Ich mag diese Möglichkeit lieber, denn ich liiiebe kryptischen Code)

[Hybrid666]

ich hab das prob gelöst:

Delphi-Quellcode:

strcopy(data,PChar(text));

Danke an alle.

MfG Hybrid666

[Hawkeye219]

Hallo Manuel,

Zitat:

Zitat von 3_of_8

Oooder strcopy(data, @text[1]);

(Ich mag diese Möglichkeit lieber, denn ich liiiebe kryptischen Code)

Magst du auch den Delphi-Debugger? Den wirst du sehen, falls die Variable text einen Leerstring enthält.

Gruß Hawkeye