Seltsames Verhalten von Delphi (String wird "freigegeben")

[mirage228]

Hi,

ich habe heute ein mehr oder weniger großes Problem.

Ich habe eine Funktion, die einen Parameter "const FileName: String" hat. Der String ist nun eigentlich unveränderlich. (Die Funktion öffnet die Datei "FileName" in einem SynEdit)

Nach einer Zuweisung an einen Setter einer Klasse ist der String scheinbar "freigegeben", da das Ende abgeschnitten ist und danach Wirre Zeichen folgen.

Ich habe mit meiner Trial von Techsmith Camtasia mal ein Video dazu angefertigt.
www.mirage228.net/private/string_fehler.avi

Wie man sieht, verändert sich der String eindeutig nach der Zuweisung an "FDocuments[CreatePos].FileName".
Das Problem ist erst aufgetaucht, als ich diesen Code Abschnitt hinzugefügt habe:

Delphi-Quellcode:

    TmpItem := ProjectGroup.FindFile(FileName);
    if (Assigned(TmpItem)) then
    begin
      FreeAndNil(FDocuments[CreatePos].FProjectItem);
      FDocuments[CreatePos].FProjectItem := TmpItem;
    end;

Eigentlich passiert da nichts "schlimmes".

Die Verwendung von "const FileName: WideString" hilft zwar dagegen, da WideStrings keiner Referenzzählung unterliegen, aber es muss doch auch mit "normalen" Strings funktionieren ?!

mfG
mirage228

[roderich]

ich würde mal vermuten, Du schreibst im Speicher rum mit Deiner Zuweisung und erwischst dabei den Stack.

Nur so ein Gefühl...... :-)

Roderich

[mirage228]

Zitat:

Zitat von roderich

ich würde mal vermuten, Du schreibst im Speicher rum mit Deiner Zuweisung und erwischst dabei den Stack.

Nur so ein Gefühl...... :-)

Roderich

Hm... das könnte auch sein, aber ich frage mich, wie das passieren könnte? Soweit ich weiss ist in meinen Routinen kein "gefährlicher" Code drin... aber weiss, vielleicht steckt der Wurm auch wo anders :?

mfG
mirage228