memo1.Text:='[ code]'+edit1.Text+'[ /code]'+'[ color=Red]PR: '+inttostr(pr.Value)+'[ /color]'+'[ color=Magenta]Тиц: '+inttostr(tic.Value)+'[ /color]'; Поможет кто нить в эту строчку вставить знак интера. Ну чтобы было так. Када выполняешь после '[code ]'+edit1.Text+'[ /code]' был интер, как в сообщении и переводил остальные данные на следующую строчку...
В нужном месте поставь Code: + #13#10 т.е., как я понял memo1.Text:='[ code]'+edit1.Text+'[ /code]'+ #13#10 +'[ color=Red]PR: '+inttostr(pr.Value)+'[ /color]'+'[ color=Magenta]Тиц: '+inttostr(tic.Value)+'[ /color]';
О пасиба =)), но я уже другим макаром =) в разные строчки memo втыкаю, хотя =) Вобщем репу добавлю через 24 часа больше не могу. =)