Forum > Spanish

OpenDocument problem

(1/1)

Pompilio:
Buen día; tengo inconveniente con opendocument por si alguien me puede colaborar.
Uso el código:

uses ..., LCLintf;
...
procedure TForm1.FormClick(Sender: TObject);
begin
  opendocument('documento.pdf');
end;

Y me lo abre bien, pero si le paso una variable ya no me lo abre...???

lucamar:
¿Quieres decir algo como esto?:
--- Code: Pascal  [+][-]window.onload = function(){var x1 = document.getElementById("main_content_section"); if (x1) { var x = document.getElementsByClassName("geshi");for (var i = 0; i < x.length; i++) { x[i].style.maxHeight='none'; x[i].style.height = Math.min(x[i].clientHeight+15,306)+'px'; x[i].style.resize = "vertical";}};} ---procedure TForm1.Button1Click(Sender: TObject);var  Document: String;begin  Document := 'pg53289-images.pdf';  if not OpenDocument(Document) then    ShowMessage('OpenDocument failed');end;Aquí funciona como debe. Lo único es que si el documento no está en el directorio actual (devuelto por GetCurrentDir) tienes que añadir la ruta a donde esté o  cambiar el directorio actual con SetCurrentDir().

Navigation

[0] Message Index

Go to full version