Advertisement
ArcaniSGK507

Untitled

Feb 5th, 2025
148
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
PHP 1.94 KB | None | 0 0
  1. <?php
  2. require('fpdf.php');
  3.  
  4. // Crear instancia del PDF
  5. $pdf = new FPDF();
  6. $pdf->AddPage();
  7. $pdf->SetMargins(20, 10, 20); // Márgenes
  8. $pdf->SetFont('Arial', '', 12);
  9.  
  10. // Definir variables
  11. $fechacreacion = date("d/m/Y"); // Fecha actual
  12. $nombre = "Juan Pérez"; // Nombre dinámico
  13. $numeroN = "123456789"; // Número de cédula
  14. $identificacionnpuntos = "."; // Caracter adicional
  15. $lugarexpCC = "Panamá"; // Lugar de expedición
  16.  
  17. // Función para escribir texto justificado usando `Cell`
  18. function WriteJustified($pdf, $text, $fontFamily, $fontStyle, $fontSize) {
  19.     $pdf->SetFont($fontFamily, $fontStyle, $fontSize);
  20.     $pdf->SetTextColor(0, 0, 0); // Color del texto
  21.     $pdf->MultiCell(0, 10, utf8_decode($text), 0, 'J');
  22. }
  23.  
  24. // Agregar contenido al PDF
  25. $pdf->Ln(10);
  26. WriteJustified($pdf, 'Corozal, ' . $fechacreacion . '.', 'Arial', '', 12);
  27. $pdf->Ln(5);
  28. WriteJustified($pdf, 'Señores', 'Arial', '', 12);
  29.  
  30. $pdf->SetFont('Arial', 'B', 12); // Negrita
  31. WriteJustified($pdf, 'OFICINA 1', 'Arial', 'B', 12);
  32. $pdf->SetFont('Arial', '', 12); // Normal
  33. WriteJustified($pdf, 'Ciudad', 'Arial', '', 12);
  34. $pdf->Ln(10);
  35.  
  36. $pdf->SetFont('Arial', '', 12);
  37. WriteJustified($pdf, "Cordial saludo,\n\n", 'Arial', '', 12);
  38.  
  39. $pdf->Write(5, utf8_decode("Por medio de la presente solicito al señor "));
  40.  
  41. // Cambiar a negrita SOLO el nombre
  42. $pdf->SetFont('Arial', 'B', 12);
  43. $pdf->Write(5, utf8_decode(strtoupper($nombre)));
  44.  
  45. // Volver a texto normal
  46. $pdf->SetFont('Arial', '', 12);
  47. $pdf->Write(5, utf8_decode(", identificado con la Cédula de Ciudadanía No. " . $numeroN . $identificacionnpuntos . " de " . strtoupper($lugarexpCC) . ". "));
  48.  
  49. // Continuar con más texto
  50. WriteJustified($pdf, "Texto adicional sobre la solicitud, detalles, etc.\n\n", 'Arial', '', 12);
  51.  
  52. WriteJustified($pdf, "Atentamente,\n\n", 'Arial', '', 12);
  53. $pdf->SetFont('Arial', 'B', 12);
  54. WriteJustified($pdf, "Firma del solicitante", 'Arial', 'B', 12);
  55.  
  56. $pdf->Output();
  57. ?>
  58.  
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement