Zeilenumbruch innerhalb von einer Stringgrid-Zelle

[Martoeng]

Hi Leute,

hab mal eine Frage (<-- unerwartet, ne? :


Also, ich habe mir zur Datensicherung ein kleines Dump-Programm geschrieben.

Die Sicherung ist auch kein Problem.
Vielleicht etwas merkwürdig, aber es funktioniert:

die Felder werden mit der Zeichenfolge "~;" getrennt.

Da jede Zeile in der Sicherungs-Datei (*.dat) einen eigenen Datensatz darstellt, müssen Zeilenumbrüche, die in Memo-Felder der DB gespeichert sind, ersetzt werden. Dazu habe ich die Zeichenfolge "~#" gewählt.


Jetzt möchte ich, dass man sich diese Sicherungen angucken und ggf. einzelne DS wieder herstellen kann.

Also muss die Zeichenfolge "~#" wieder durch #13#10 ersetzt werden.

Das habe ich so gemacht:

Delphi-Quellcode:

//Zeichenfolge "~#" wieder durch #13#10 ersetzen (RETURN)
for xy := 0 to length(s)-1 do
begin
  if (s[xy] = '~') AND (s[xy+1] = '#') THEN
  begin
    s[xy] := #13;
    s[xy+1] := #10;
  end;
end;
delete(s,1,1);  //erstes Zeichen löschen
target.Cells[x,y] := s //target = stringgrid

Doch bei mir erscheinen an den Stellen der Zeilenumbrüche nur genau 4 senkrechte schwarze Balken.

Ich dachte auch schon, dass ein normaler String (s) keine zeilenumbrüche verträgt und bin deshalb einen Umweg über ein Memo gegangen, hat aber auch nicht geklappt .

Weiss vielleicht jemand, wo der Fehler liegt?

MfG Martoeng