Ergebnis der Suchanfrage

• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: AddObject mit einem Interface?

    Delphi
    by shmia, 9. Apr 2008
  Schon, aber hier geht es nicht anderst.
  Da man den Interfacepointer (der ja in Delphi eine Art Smartpointer ist) in einer Variablen (Typ TObject) speichert, die kein Interfacepointer ist, muss man den RefCount selbst um Eins erhöhen.
  Dann ist man natürlich auch dafür verantwortlich, dass wenn die Variable ihren Wert verliert, den RefCount selbst um Eins runterzuzählen.
  Vergisst man das, lebt...
• Forum: GUI-Design mit VCL / FireMonkey / Common Controls

  Re: AddObject mit einem Interface?

    Delphi
    by shmia, 9. Apr 2008
  Da muss man etwas tricksen:
  procedure Eintragen(IntPtr: IMyInterface);
  begin
  IntPtr._AddRef; // Referenzzählung "austricksen"
  cmbTest.AddObject('Test', TObject(IntPtr));
  end;
  Würde man nicht mit AddRef eingreifen, kann es passieren, dass das Objekt auf den der Interfacezeiger verweist,
  automatisch freigegeben wird. (=> Access Violation)
  
  Beim löschen ist dann ebenfalls eine...