Ergebnis der Suchanfrage

• Forum: Object-Pascal / Delphi-Language

  Re: Zugriff einer eigenen Klasse auf ein MemoFeld ??

    Delphi
    by shmia, 5. Jan 2007
  Erweitere deine Klasse TBinaererBaum um folgendes Property:
  property OutputLines:TStrings read FOutputLines write FOutputLines;
  Und dann zusätzlich diese Hilfsfunktion:
  procedure TBinaererBaum.OutputString(const s:string);
  begin
  if Assigned(FOutputLines) then FOutputLines.Add(s);
  end;
  Im Hauptprogramm:
  ...
  binaerbaum := TBinaererBaum.Create;