Registriert seit: 27. Nov 2017
2.490 Beiträge
Delphi 7 Professional
|
AW: Zeilenumbruch verbessern
10. Jun 2019, 15:48
Wie wäre es denn mit sowas?
Delphi-Quellcode:
const
csVersion = 'Version 1.00%1:s%1:sAuthor Not Yet%1:scopyright (c) %0:s%1:swwww.yourweb.com'
+ '%1:s%1:s%1:s%1:s%1:s%1:s%1:sSK_AERO Library%1:sBrewIdeas©Emil Weiss';
...
var
MessageStr : String;
sYear : String;
begin
...
sYear := FormatDateTime('yyyy', Date);
MessageStr := Format(csVersion,[sYear,sLinebreak]);
ShowMessage(MessageStr);
...
end;
|