Ergebnis der Suchanfrage

• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 4. Nov 2014
  FastMM ist seit ??? in Delphi integriert, wird also schon direkt mitgeliefert.
  
  Wenn du den Bericht über Speicherlecks am Ende haben möchtest, dann musst du das lediglich einschalten mit ReportMemoryLeaksOnShutdown := true; (am besten gleich am Anfang in der Projekt-Datei)
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 15. Okt 2014
  Richtiger wäre es den ganzen Kram zu trennen.
  
  Es gibt eine Liste mit Datenobjekten
  
  // ein Datenobjekt
  TImageData = class
  property Filename : string;
  end;
  
  Für das DatenObjekt gibt es eine Form, die dieses DatenObjekt anzeigen kann
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 15. Okt 2014
  Das werde ich definitiv nicht machen, denn ich schreibe keine Kommentare, die sich auf Basis-Funktionalitäten (TObject.Free prüft selber auf assigned) beziehen, noch füge ich unnützen Code hinzu if (Assigned( LFoo ) then LFoo.Free;). Ich schreibe keine Tutorials sondern Anwendungen und wer das verstehen möchte, der soll die Sprache beherrschen.
  
  Wie man Instanzen aufräumt sollte eigentlich...
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 14. Okt 2014
  Ich habe das doch so geschrieben, wie das was er machen soll. Und try finally ist ein Ressourcen-Schutzblock - wenn ich mich da richtig erinnere - und genau den will ich haben und darum schreibe ich ihn so.
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 14. Okt 2014
  Die Form-Instanz wird eben nicht freigegeben, ausser es kommt innerhalb der Methode zu einer Exception, dann wird abgebrochen, demzufolge nichts zurückgegeben und darum durch das finally die Instanz freigegeben.
  
  Das ist eigentlich eine sehr übliche und sinnvolle Vorgehensweise wenn man nicht auf Speicherlecks steht.
  
  function FooFactory : TFoo;
  var
  LFoo : TFoo;
  begin
  LFoo :=...
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 11. Okt 2014
  Wieso ein Ereignis? Das ist eine Methode, die ich geschrieben habe ... die allerdings besser die Form-Instanz zurückliefert
  procedure TMyForm.DockNewForm( APageControl : TPageControl; ADockFormClass : TDockFormClass ) : TDockForm;
  var
  LForm : TDockForm;
  begin
  LForm := TDockFormClass.Create( APageControl );
  try
  LForm.ManualDock( APgeControl, nil, alClient );
  LForm.Visible :=...
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 11. Okt 2014
  Die Anwendung wird nicht aufgehalten, wenn die Aktionen in einem Thread erfolgen (speichern, laden, umrechnen) ;)
  
  Zum Schließen des Tabs musst du eigentlich rein gar nichts machen ... ok bis auf eins:
  
  type
  TDockForm = clas( TForm )
  protected
  // Ich könnte auch den Event OnClose nehmen, da ich aber von dieser Form
  // weitere ableiten möchte, ist dieser Weg etwas robuster :o) ...
• Forum: Multimedia

  AW: TImages verwalten

   
    by Sir Rufo, 10. Okt 2014
  Zunächst würde ich die Bilder nicht komplett im Speicher behalten sondern jeden Scan direkt auf die Platte schreiben und merken (in einer Liste).
  
  Für eine Komponenten-Komposition (TImage, TRadioButtons) eignen sich Frames sehr schön. Einfach ein Frame bauen und dann für jeden Scan eine Instanz erzeugen und in die Scrollbox packen.
  
  Die Bilder werden für die Ansicht ja nicht in der vollen...