Thema: Delphi Prozedur dopelt nutzen

Einzelnen Beitrag anzeigen

Hansa

Registriert seit: 9. Jun 2002
Ort: Saarland
7.554 Beiträge
 
Delphi 8 Professional
 
#1

Prozedur dopelt nutzen

  Alt 5. Okt 2004, 11:00
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 ?
Gruß
Hansa
  Mit Zitat antworten Zitat