temporäre Interfaces sofort freigeben?

[Alaitoc]

Ah gut, ja das ist dann wirklich Pech...hm naja ich würds so machen denk ich:

Delphi-Quellcode:

procedure Test;
  var XML: IXMLDocument;
    Node: IXMLNode;

  begin
    XML := coDOMDocument60.Create;
    try 
      XML.Version    := '1.0';
      XML.StandAlone := 'yes';
      XML.Encoding   := 'UTF-8';
      Node2 := XML.AddChild('xml');
      Node := XML.DocumentElement;
      for i := 0 to 9999 do
      begin
        Node2 := Node.AddChild(IntToStr(i));
      end;
    finally
      Node2 := nil;
      Node := nil;
      XML := nil;
    end;
  end;

Fänd ich zumindest übersichtlicher und da ich eh immer fast alles selbst freigebe ( auch Interfaces ) ^^ ....
Sollte doch effektiv auf das gleiche hinauslaufen oder ?
Ich muss mich umbedingt mehr mit sowas beschäftigen...

Edit: Ach und ganz wichtig von wegen msXML.DocumentElement.AddChild ! Law of Demeter Da gehe ich zumindest immer nach *g*, außer es geht halt wirklich nicht anders...

[himitsu]

Zitat von Alaitoc:

Ah gut, ja das ist dann wirklich Pech...hm naja ich würds so machen denk ich:

nur wenn es drauf ankommt, dann denkt keiner an Node2 und es kommt nur noch das bei raus

Delphi-Quellcode:

procedure Test;
  var XML: IXMLDocument;
    Node: IXMLNode;

  begin
    XML := coDOMDocument60.Create;
    try 
      XML.Version    := '1.0';
      XML.StandAlone := 'yes';
      XML.Encoding   := 'UTF-8';
      XML.AddChild('xml');
      Node := XML.DocumentElement;
      for i := 0 to 9999 do
        Node.AddChild(IntToStr(i));
    finally
      Node := nil;
      XML := nil;
    end;
  end;

theoretisch würde es auch so laufen

Delphi-Quellcode:

procedure Test;
  var XML: IXMLDocument;
    Node: IXMLNode;

  begin
    XML := coDOMDocument60.Create;
    XML.Version    := '1.0';
    XML.StandAlone := 'yes';
    XML.Encoding   := 'UTF-8';
    XML.AddChild('xml');
    Node := XML.DocumentElement;
    for i := 0 to 9999 do
      Node.AddChild(IntToStr(i));
  end;

Hier steckt ja nun alles in einer kleinen Prozedur, aber wenn die Variablen mal länger leben, dann könnte es schon auffallen.

Insgesamt sind diese Prozeduren (samt deiner) etwa gleich schnell und brauchen auch gleich viel Arbeitsspeicher,
aber wo ich dann messen wollte, welcher Schritt wie lange braucht und Dergleichen, da kam halt nur Mist raus.

Zitat von Alaitoc:

Edit: Ach und ganz wichtig von wegen msXML.DocumentElement.AddChild ! Law of Demeter Da gehe ich zumindest immer nach *g*, außer es geht halt wirklich nicht anders...

Werd ich mir mal anschauen, auch wenn ich selber MSXML aktuell nur noch für Versuchszwecke nutze.
[edit]
ach, das gilt allgemein ... na mal sehn, ob ich mir das auch noch Merke

[Alaitoc]

Naja Interfaces benutze ich eh meistens nur in Verbindung mit einer Factory.
Da der Benutzer einer Methode z.b.

  function ErstelleTest: TTest; ja nicht umbedingt wüßte ob das Objekt freigegeben werden muss. ( Wenn er keine Ahnung von dem Inhalt der Methode hätte )

Bei

  function ErstelleTest: ITEST; kann man sich sicher sein, dass man sich um Speicherlecks keine Sorgen machen muss.

Und naja das LoD besagt kurz gesagt das man im besten Fall nur einen Punkt benutzen soll.
Also Bsp:

Nicht so:

      XML.DocumentElement.AddChild(IntToStr(i)); Sondern eher so:

Delphi-Quellcode:

  procedure AddChild(Knoten, Inhalt);
  begin
    Knoten.AddChild(InttoStr(i));
  end;

  AddChild(XML.DocumentElement,InttoStr(i));

Auch wenn es auf den ersten Blick mehr Arbeit ist, sind meine Projekte dadurch um einiges übersichtlicher geworden und man bemerkt auch manchmal das der Weg den man gerade einschlägt eher unsauber ist.
So koppelt man die Module nicht so eng miteinander ( zumindest wenn man es richtig macht ).
Dabei helfen einem auch Programmierkonzepte, wie das Factory-Pattern, Command-Pattern, MVC-Pattern, etc...

Btw falls man irgendwo sonst noch bei helfen kann Himitsu sag Bescheid, da ich eh nicht zuhause programmiere... da mir nie etwas sinnvolles einfällt, hätte ich theorethisch oft Zeit zum Helfen...bzw es zu versuchen *gg*