Ergebnis der Suchanfrage

• Forum: Win32/Win64 API (native code)

  Re: Speicherfresser...

    Delphi
    by FriFra, 5. Feb 2004
  Hm, das war auch nichts. Jetzt crasht das System noch schneller...
  So langsam hab ich den Verdacht, dass es mit dem auslesen der Ressource zu tun hat :gruebel:
• Forum: Win32/Win64 API (native code)

  Re: Speicherfresser...

    Delphi
    by FriFra, 5. Feb 2004
  In der CoolTray-Compo werden die Icons überhaupt nicht freigegeben :roll: ... Ich hab jetzt mal alle Freigaben (.ReleaseIcon, DestroyIcon) rausgenommen und mache mal einen Testlauf mit einigen 10-Tausend durchläufen... mal sehen ob's was bring :gruebel: ...
• Forum: Win32/Win64 API (native code)

  Re: Speicherfresser...

    Delphi
    by FriFra, 5. Feb 2004
  Hat noch nie jemand eine Anwendung geschrieben, die in sehr kurzen Abständen ihr TNA-Icon ersetzt? Wenn ja muss dabei doch irgendetwas anders sein (?), denn meinen Systemen gehen dabei immer früher oder später die Resourcen aus...
  Hat wirklich niemand eine Idee die auch wirklich funktioniert?
• Forum: Win32/Win64 API (native code)

  Re: Speicherfresser...

    Delphi
    by FriFra, 3. Feb 2004
  Hab ich schon... Wenn ich die Zuweisung der Icons auskommentiere bleibt der Speicher frei...
  
  Deswegen frag ich ja, ich weiss, das es an Zuweisung der Icons, bzw. der nicht korrekten Freigabe liegt, aber ich weiss ncht genau warum.
• Forum: Win32/Win64 API (native code)

  Re: Speicherfresser...

    Delphi
    by FriFra, 3. Feb 2004
  Das hilft mir nicht wirklich weiter, da es nur div. "Fehler" in der Graphics.pas findet ;)
  
  Der Fehler muss irgendwo in der Freigabe und Neuzuweisung der Icons liegen, also bei TNA_Icon bzw. Image1.Picture.Icon :gruebel:
  Wenn ich die gepostete procedure nicht ausführe bleibt der Speicherverbrauch stabil.
• Forum: Win32/Win64 API (native code)

  Speicherfresser...

    Delphi
    by FriFra, 2. Feb 2004
  Langsam aber sicher schaufelt mein Programm den Speicher zu :?
  Vielleicht sieht ja jemand von euch den Fehler:
  
  var
  TNA_Icon: TIcon; //Icon für den TNA
  G_IP: string; //globale Variable für die IP
  
  ...
  
  procedure TForm1.SetIcon(Loading, Ignoring, Stopped, Plugin: