Einzelnen Beitrag anzeigen

Benutzerbild von himitsu
himitsu

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.033 Beiträge
 
Delphi 12 Athens
 
#5

Re: Procedure mit vielen Parametern ...

  Alt 20. Sep 2006, 12:04
Zitat von moelski:
Weglassen geht dann nicht, denn dann sagt er das die Typen nicht stimmen ...
Und einfach ein , , geht auch nicht ...

Gibts da auch noch nen Trick ?
Ja, du kannst die funktion sschießlich auch noch überladen ^^

Code:
procedure WriteText(RTFMemo : TWPCustomRtfEdit;
                    [color=#ff0000][b]Mode   : TWPCreateDemoText = wpAppendText;[/b][/color]
                    Text   : String           = '';
                    Color  : TColor           = clBlack;
                    Font   : String           = 'Arial'); [color=#ff0000][b]Overload;[/b][/color]
procedure WriteText(RTFMemo : TWPCustomRtfEdit;
                    Text   : String           = '';
                    Color  : TColor           = clBlack;
                    Font   : String           = 'Arial'); [color=#ff0000][b]Overload;[/b][/color]


...

procedure WriteText(RTFMemo : TWPCustomRtfEdit;
                    Text   : String           = '';
                    Color  : TColor           = clBlack;
                    Font   : String           = 'Arial');
begin
  WriteText(RTFMemo, [color=#ff0000][b]wpAppendText[/b][/color], Text, Color, Font);
end;
[edit]
ich haße diese nichtaktualisierende Cache beim Editieren -.-''
Garbage Collector ... Delphianer erzeugen keinen Müll, also brauchen sie auch keinen Müllsucher.
my Delphi wish list : BugReports/FeatureRequests
  Mit Zitat antworten Zitat