Einzelnen Beitrag anzeigen

TKanne

Registriert seit: 6. Aug 2007
Ort: Berlin
24 Beiträge
 
Delphi 11 Alexandria
 
#4

AW: strings und zeilenumbruch

  Alt 21. Feb 2021, 22:40
Moin,

mich nervt auch immer das #13#10 getippe, habe mir delhalb in meine Unit mit diversen Stringroutinen eine kleine Funktion geschrieben:

Delphi-Quellcode:
function NewLine(Anzahl: Integer): string;
begin
  Result := '';
  if Anzahl > 0 then
    Result := DupeString(#13#10, Anzahl);
end;
Aufruf dann z.B.:
ShowMessage('a' + NewLine(2) + 'b');
  Mit Zitat antworten Zitat