[EXEL]

Сообщение от Aristarh Dark

Что за объект Memo20?

переписал чтобы было более понятно

Код:

var
       i:Integer;
       s:String;
begin
       i := 0;
       s :='';
       if(<uv_check_1>=1) then begin
               i := i + 1;
                     
               s := IntToStr(i) + '. Бла-бла-блва' + #13;
       end;                 
       Memo20.Memo := s;               

            
    
end;

просто надо вывести в объект тестовой который имеет свойство (TWideStrings)

вот что пишет Несовместимые типы: 'TWideStrings', 'String'