Palavra em Negrito no FPDF

[RibaSoft]

Olá a todos, dei uma boa pesquisada e não achei nada a respeito, nem no site do FPDF em PHP, pelo contrário, oq vi foi comentárioos de que não dava pra fazer, ou gente que tentou e não conseguiu.

Para negrito existe a procedure SetFont, porém como proceder dentro de uma frase (String), onde somente uma palavra deve ser negrita?

Eu costumo utilizar a procedure MultiCell, para paragrafos com multiplas linhas, e o SetFont antes de cada multicell, mas como fazer no meio sem perder a identação?

Perdoem minha leiguisse 

Editado 23 Junho, 2023 por RibaSoft
Apertei o Ctrl + enter sem querer por costume no whatsapp

[Daniel Simoes]

@RibaSoft,

Veja o Demo tuto6.pas

Nele tem um "parser" rudimentar de HTML, para PDF...  vou tentar incorporar esses WriteHTML, na TFPDFExt

[Daniel Simoes]

Feito.. envie para o SVN do ACBr e para o GitHub do FPDF-Pascal, alterações para implementar

    procedure WriteHTML(const AHtml: String);

em TFPDFExt

Exemplo de Uso:

var
  pdf: TMyFPDF;
  AHtml: String;
begin
   AHtml := 'You can now easily print text mixing different styles: <b>bold</b>, <i>italic</i>, '+
            '<u>underlined</u>, or <b><i><u>all at once</u></i></b>!<br><br>You can also insert links on '+
            'text, such as <a href="http://www.fpdf.org">www.fpdf.org</a>, or on an image: click on the logo.';

  pdf := TMyFPDF.Create;
  try
    // First page
    pdf.AddPage();
    pdf.SetFontSize(14);
    pdf.WriteHTML(AHtml);
    pdf.SaveToFile('c:\temp\tuto6-pas.pdf');
  finally
    pdf.Free;
  end;
end.

 

[RibaSoft]

Nossa Daniel, muiiito obrigado, agora o limite é a imaginação, muito obrigado mesmo, DEUS abençoe