String MemoryLeak

[SirThornberry]

Und was passiert bei folgendem Konstrukt?

Delphi-Quellcode:

function TTwixapi.GetMainEntry(ID_MainEntry: Integer): AnsiString;
begin
  SetLength(Result, 1024);
  if not TwixGetMainentry(ID_MainEntry, @Result[1], 1024) then
    Result := '';
end;

[ele]

Schau dir mal an in welcher Variable du den Rückgabewert der Funktion speicherst. Ich vermute das ist eine Klassen-Variable und du gibst das entsprechende Objekt nicht frei.

[dinosaur]

vielen Dank, SirThornberry mit SetLength klappts, ich musste einfach noch zusätzlich den string bis vor #0 zusammenschneiden, sonst klappe es nachher nicht mehr mit der string concatenation..

Delphi-Quellcode:

if TwixGetMainentry(ID_MainEntry, @Result[1], 1024) then
   Result := Copy(Result, 1, Pos(#0, Result)-1)
else
   Result := '';

[himitsu]

Das Pos+Copy kannst du weglassen und die Automatik dafür nutzen:

Delphi-Quellcode:

function TTwixapi.GetMainEntry(ID_MainEntry: Integer): AnsiString;
begin
   SetLength(Result, 1023);
   //if TwixGetMainentry(ID_MainEntry, @pTmpStr[0], 1023+1) then
   if TwixGetMainentry(ID_MainEntry, @pTmpStr[0], Length(Result)+1) then
      Result := PAnsiChar(Result)
   else
      Result := '';
end;

(ein String hat noch eine #0 hinten dran, für die PChar-Kompatibilität)

Delphi-Quellcode:

function TTwixapi.GetMainEntry(ID_MainEntry: Integer): AnsiString;
var
   TmpStr: Array[0..1023] of AnsiChar;
begin
   //if TwixGetMainentry(ID_MainEntry, @TmpStr[0], 1024) then
   if TwixGetMainentry(ID_MainEntry, @TmpStr[0], Length(TmpStr)) then
      Result := @TmpStr;  // oder Result := PAnsiChar(@TmpStr)
   else
      Result := '';
end;

Nur kann ich mir nicht vorstellen, wie bei deiner 1. Variante (in Post #1) dieses Speicherleck entstehen soll.

[DeddyH]

Zitat:

Length(1023)+1

[himitsu]

Zitat von DeddyH:

Zitat:

Length(1023)+1

Ein Byte eingespart?
(falls man das Copy&Paste richtig betreibt )

[dinosaur]

Zitat von himitsu:

Nur kann ich mir nicht vorstellen, wie bei deiner 1. Variante (in Post #1) dieses Speicherleck entstehen soll.

Es ist mir bei beiden Varianten schleierhaft, warum ein memoryleak entsteht.. wohl irgendein problem beim referenzzähler. Aber mit setLength klappts ja