To KIIV : Dík za radu! Fakt si mi pomohl! Jinak už to mám: var I: Integer; begin for i := 0 to form4.memo1.lines.count - 1 do form1.memo1.lines.add('<ul>' + form4.memo1.lines[i] + '</ul>');