Помогите с выводом текста Delphi

Discussion in 'С/С++, C#, Rust, Swift, Go, Java, Perl, Ruby' started by #Smith, 7 Mar 2015.

  1. #Smith

    #Smith New Member

    Joined:
    20 Jun 2010
    Messages:
    97
    Likes Received:
    2
    Reputations:
    0
    Очень не хотелось создавать новую тему, но вынужден просить помощи.

    Ситуация такая:
    В Delphi мне понадобился вывод стилизованного текста.
    Стилизованного в плане цвета и стиля.
    Поиски привели меня к TRichEdit.
    Но тут есть одна загвоздка, хотя, возможно я что-то не понял.
    Стилизовать и раскрашивать нужно уже загруженный текст.
    Вариант сначала установить стиль и цвет, а уже потом добавлять фрагмент текста - мне не подходит.
    Нужно разметить именно уже загруженный текст.
    SelStart и SelLength - это не вариант, потому, что я разбираю тест построчно.
    Идеален был бы вариант по стилизации и раскрасу конкретных строк.
    Возиться каждый раз с перерисовкой - помоему нерационально и тупо.

    Какие есть варианты?
    Наверняка же кто-то сталкивался.
     
  2. #Smith

    #Smith New Member

    Joined:
    20 Jun 2010
    Messages:
    97
    Likes Received:
    2
    Reputations:
    0
    Впринципе, извернуться можно вот так:
    Code:
    procedure TForm1.ButtonClick(Sender: TObject);
    var
      line: SmallInt;
      tmp: String;
    begin
      line := StrToIntDef(Edit.Text, -1);
      if (line <> -1) and (line < RichEdit.Lines.Count) then
      With RichEdit do
        begin
          tmp := Lines[line];
          Lines[line] := '';
          SelAttributes.Style := [fsBold];
          SelAttributes.Color := clActiveCaption;
          Lines[line] := tmp;
        end;
    end;
    Но мне это решение тоже каким-то извратным кажется.
    Причём, работает только с tmp и затиранием строки, если строке присвоить её же - стиль не меняется.
     
    #2 #Smith, 7 Mar 2015
    Last edited: 7 Mar 2015
  3. DooD

    DooD Elder - Старейшина

    Joined:
    30 Sep 2010
    Messages:
    1,173
    Likes Received:
    442
    Reputations:
    288
    есть компонента.не помню название, ищи
     
  4. vkhacker

    vkhacker New Member

    Joined:
    12 Dec 2009
    Messages:
    1
    Likes Received:
    1
    Reputations:
    0
    RichView
     
  5. zakidorex

    zakidorex Banned

    Joined:
    26 Apr 2013
    Messages:
    7
    Likes Received:
    1
    Reputations:
    0
    а если использовать ШТМЛ редактор и веббраузер - нето?
     
Loading...