ComboBox mit unterschiedlichen Objekten - sauber abraeumen?

[marabu]

Hi Ingo,

besser so:

Delphi-Quellcode:

procedure TDemoForm.FormCreate(Sender: TObject);
begin
  with ComboBox.Items do
    AddObject('demo', TObject(TStringList));
end;

procedure TDemoForm.ButtonClick(Sender: TObject);
var
  s: TStrings;
begin
  with ComboBox.Items do
    s := TClass(Objects[0]).Create as TStrings;
  s.Add('Ingo');
  s.Free;
end;

Bei deinem Create würde, wenn denn ein "echtes" Objekt gespeichert wäre, dieses mit Create() lediglich auf den Ausgangszustand zurück gesetzt. Du musst den richtigen TypeCast einsetzen.

Freundliche Grüße

[IngoD7]

Zitat:

Zitat von marabu

Bei deinem Create würde, wenn denn ein "echtes" Objekt gespeichert wäre, dieses mit Create() lediglich auf den Ausgangszustand zurück gesetzt. Du musst den richtigen TypeCast einsetzen.

Mein Create (und nicht nur in der Variation, wie ich es angegeben hatte) funktionierte gar nicht!
Ich hatte TClass(..) as .. völlig unterschlagen, wohl weil ich solche Konstrukte noch nie verwenden musste. So geht's jedenfalls. Danke.

Back to Topic:
Damit ist aber auch noch nicht geklärt, wieso (angeblich) das AddObject (im "Problemcode" hier im Thread) Speicher verbrät.

[marabu]

Hallo OldGrumpy,

Zitat:

Zitat von OldGrumpy

... Ich habe aber auf jeden Fall Memoryleaks die aus dem AddObject resultieren, und die sind zu gross als dass es einfach nur Pointer sein könnten. ...

ich kenne nur die eine Stelle aus deinem Code, zu der ich meinen Kommentar abgegeben habe, und dort sollte kein Speicher verloren gehen. Du kannst das leicht überprüfen, indem du eine Testanwendung aufmachst und in der nur mein Code-Beispiel verwendest. Wenn dort keine Speicherverluste auftreten, dann müssen wir den Fehler woanders suchen. Tritt er dort auch auf, dann finden wir sicher auch eine Erklärung. Teste mal, während ich meinen Stellungswechsel vollziehe.

Zitat:

Zitat von OldGrumpy

... Der Editor ist zum Beispiel keine "echte" grafische Komponente mit eigenen Controls, sondern der wird vom Mainform aus mit den Controls die auf dem Mainform liegen "verdrahtet". Macht sowas Sinn? ...

Das ist zu ungenau, als dass ich es kommentieren könnte.

Freundliche Grüße