Prozedur dopelt nutzen

[Hansa]

Hi,

ich hoffe, daß das hier jemand versteht.

mit folgender Prozedur drucke ich etwas aus und/oder schreibe es in eine Listbox.

Delphi-Quellcode:

procedure TfrmAusf.druckln (var lbox : TListBox;st : string);
begin
  if AufDrucker then
    println (st);
  if AufBildschirm then
    lbox.Items.Add (st);
end;

Diese Prozedur ist abgeleitet von einer Methode aus einer anderen Klasse. Diese sieht so aus :

Delphi-Quellcode:

procedure Tfrm.druckln (st : string);
begin
  if AufDrucker then
    println (st);
end;

In der Ursprungsklasse existiert nun eine weitere Prozedur, die intern druckln aufruft. Meine Frage ist nun, wie ich die Parameter behandeln soll. DIe Ursprungsklasse kann ja nicht wissen, daß später ein zweiter Parameter eingeführt wird.

Meine Überlegung ist jetz, direkt 2 Parameter zu benutzen, aber wie behandele ich dann eine nicht vorhandene Listbox ?