problem mit nullterminierung (StrLCopy)

[supermuckl]

hi leute.. hab malwieder n kleines problemchen

ich schreibe mit folgender zeile daten in ein MMF file

Delphi-Quellcode:

StrLCopy(PansiChar(Ptr(integer(PFview)+pos)),pansichar(input),len);

problem ist das ich blockweise damit schreibe und an jedem blockende ein #0 zeichen bekomme ( im hexeditor ists 00 )

hab schon len-1 benutzt.. und auch mal ansireplacestr #0 zu '' aber nix funktioniert.. krieg dieses ding einfach nich weg

[Muetze1]

Moin!

StrLCopy() kopiert PChars und daher ist dort immer ein NullByte dranne, sonst weiss man ja nicht wo der String aufhört. Die Length die du angeben kannst begrenzt ja nur wieviel Zeichen er kopiert, aber das Ziel (Input) ist ja eh immer ein PChar und daher ist auch immer ein 0 Zeichen dranne. Du müsstest das len-1 beim schreiben in die Datei angeben...

Oder schreibe einen AnsiString und gebe als Quelle das 1. Zeichen des Strings an (input[1]) und die normale Länge...

MfG
Muetze1

[tommie-lie]

Zitat:

Zitat von Delphi OH

Description
StrLCopy copies at most MaxLen characters (plus a null terminator) from Source to Dest and returns Dest. The SizeOf standard function can be used to determine the MaxLen parameter.

Probier's mal mit der Proedur Move().

[supermuckl]

Zitat:

Du müsstest das len-1 beim schreiben in die Datei angeben...

hab ich doch probiert.. ging ja nich ;)

ich probier mal die beiden lösungswege :)

[tommie-lie]

Muetzes Lösungswege werden nur nicht vom Erfolg gekrönt sein, weil es nicht mit dem String, AnsiString oder sonstwas zu tun hat, sondern einfach damit, daß StrLCopy() dafür geschaffen wurde, C-kompatible Strings zu erzeugen, und die haben nunmal allesamt einen Nullterminator, ergo ist StrLCopy für diesen Einsatzzweck unbrauchbar. Move() kopiert blind eine Reihe von Zeichen von einer Quelle zum Ziel und hängt nicht irgendwelche Terminatoren dran.

[supermuckl]

jo das hab ich auch rausgefunden.. dachte halt das ich irgendwie trotzdem die 0 abschneiden könnte mit len-1 ;) naja

habs mit move probiert und komme nun nicht mit dem ergebnis klar:

Move(input, pointer(integer(PFview)+pos)^, len);

ich krieg da in meiner txt datei dann keine ascii zeichen ( lesbares ) zur sicht

input str: |040716184240'0|040716184241'24|040716184241'

sondern sowas: }E?À? ..... mit haufen #0 dazwischen

wie kann ich dieses binäre zeug nun umwandeln ? pchar(pointer(integer(PFview)+pos)) hat auch nich gefunzt

[fiasko]

Hallo,

vielleicht vertauschst du Ziel und Quellzeiger? Hab grad selber kein OH zur Hand :-(

[supermuckl]

ne das passt :)

hab es gerade zufällig rausgefunden *freu*

Move(pointer(input)^, pointer(integer(PFview)+pos)^, len);

das tut :) nun steht klartext ( input: string) in der datei

[tommie-lie]

Zitat:

Zitat von supermuckl

Delphi-Quellcode:

Move(input, pointer(integer(PFview)+pos)^, len);

ich krieg da in meiner txt datei dann keine ascii zeichen ( lesbares ) zur sicht

input str: |040716184240'0|040716184241'24|040716184241'

sondern sowas: }E?À? ..... mit haufen #0 dazwischen

Ähhh, lass mich raten, input ist vom Typ String?
Ich hatte da eigentlich mehr von dir erwartet ;-)
Pascal-Strings sind so eine Sache, denn sie sind nur Pointer, enthalten zusätzlich einige Byte (4, um genau zu sein) für die Länge des Strings und einen Referenzzähler (nochmal 4 Bytes).
Wenn du direkt an die Zeichen ran willst, kannst du beispielsweise input[1] verwenden (das erste Zeichen).
Demnach müsste der Aufruf so aussehen:

Delphi-Quellcode:

Move(input[1], Pointer(Integer(PFview) + pos)^, len);

(wenn len die Länge des Strings exklusive dem Nullterminator ist (wie von StrLen() zurückgegeben).

[supermuckl]

das strings pointer sind weis ich :) blos halt die tiefere thematik fehlt mir da n bisschen.. aber so tuts ja :>

and input[1] hab ich auch schon gedacht..