Moin Sven,
das CMS FrameWork ZOPE verwendet in seinem Structured Text die Konvention, dass Absätze durch mindestens eine Leerzeile geschaltet werden:
Delphi-Quellcode:
function CreateUnorderedList(lines: TStrings): TStrings;
var
i: Integer;
isItem: Boolean;
begin
Result := TStringList.Create;
Result.Add('<ul>');
isItem := False;
for i := 0 to lines.Count do
if (i = lines.Count) or (lines[i] = '') then
begin
if isItem
then Result.Add('')
else Continue;
isItem := False;
end else
begin
if isItem
then Result.Add('
')
else Result.Add('[*]');
Result.Add(lines[i]);
isItem := True;
end;
Result.Add('[/list]');
end;
Der Code soll nur das Prinzip verdeutlichen.
Grüße vom marabu