String nach array[0..1024] of Char

[faux]

Hallo!

Ich habe folgendes Problem:
Ich will einen String in einen Array[0..1024] of Char bekommen.
Ich habe folgendes Probiert:

Delphi-Quellcode:

var
  MyArray: array[0..1024] of Char;
  Temp: string;
begin
  CopyMemory(@MyArray, @Temp[1], Length(Temp));
end;

Jedoch bekomme ich dann anstatt von C:\ftp immer C:\ftpæx€
????. Also den String mit etwas Datenmüll hintendran.
Woran liegt das? Ist meine Kopiermöglichkeit so überhaupt richtig?

Grüße
Faux

[Ratte]

Da fehlt warscheinlich das nullzeichen am ende des Strings. Du liest einfach noch den ganzen Müll der noch im Speicher stand mit aus (bis zum Ende oder zum nächsten nullzeichen).

Ratte

[SirThornberry]

mach einfach
CopyMemory(@MyArray, @Temp[1], Length(Temp) + 1); bzw.

Delphi-Quellcode:

CopyMemory(@MyArray, @Temp[1], Length(Temp));
MyArray[Length(Temp)] := #0;

bzw.

Delphi-Quellcode:

ZerorMemory(@MyArray, SizeOf(MyArray));
CopyMemory(@MyArray, @Temp[1], Length(Temp) + 1);

Es fehlt also nur die Abschließende #0
Aber darüber brauchst du dir eigentliche keine Gedanken machen wenn das Array bereits mit #0 gefüllt ist (also mit #0 initialisiert wurde).

[faux]

Zitat von Ratte:

Da fehlt warscheinlich das nullzeichen am ende des Strings. Du liest einfach noch den ganzen Müll der noch im Speicher stand mit aus (bis zum Ende oder zum nächsten nullzeichen).

Ja aber ich gebe CopyMemory doch die Länge des Strings. Ich schätze mal, dass diese Funktion einfach von 0 bis zur Längenangabe beide Pointer einfach erhöt und Byteweise die Daten kopiert.

Grüße
Faux

[faux]

Zitat von SirThornberry:

mach einfach
[delphi]
CopyMemory(@MyArray, @Temp[1], Length(Temp) + 1);

Kay! Klar! Ich habe immer -1 geschrieben, weil ich dachte, dass da zu viel kopiert wird.

Danke!

Grüße
Faux

[SirThornberry]

eigentlich kannst du das auch weglassen weil der Record der dir dort mit den Array übergeben wird bereits mit #0 initialisiert ist. (in deinem TestProgramm musst du es natürlich selbst machen)

[Hawkeye219]

Noch 'ne Möglichkeit:

StrPCopy(MyArray, Temp); Gruß Hawkeye

[faux]

Zitat von Hawkeye219:

Noch 'ne Möglichkeit:

StrPCopy(MyArray, Temp);

Wieso nicht gleich so?
Hat das irgendwelche Nachteile gegenüber meinem Versuch?

Grüße
Faux

[Hawkeye219]

Ich sehe einen Vorteil: es funktioniert zuverlässig mit Leerstrings. Ich habe nicht ausprobiert, wie sich deine Routine in diesem Fall verhält.

Die Funktion gibt es übrigens auch mit Längenbeschränkung: StrPLCopy.

Gruß Hawkeye

[turboPASCAL]

Es gibt ja auch die Windowsfunktionen:

Delphi-Quellcode:

var
  MyArray: array[0..1024] of Char;
  Temp: string;
begin
  Temp := 'Hallo';

  {Windows.}lstrcpy(MyArray, @Temp[1]);

  Showmessage(MyArray);
end;