Debenu Quick PDF Library - PDF SDK Community Forum : RenderDocumentToFile not working??

RenderDocumentToFile not working?? : Well Ingo.i test it. and it...

Fri, 22 Jun 2012 16:02:16 +0000

Author: mazluta
Subject: 2311
Posted: 22 Jun 12 at 4:02PM

Well Ingo.

i test it. and it work fine.

i steel think it's QuickPdf responsbilty to work with any (good) DIRECTORY i send it.

but, it work, so let go on

thanks again for your help.

RenderDocumentToFile not working?? : Hi!Here's a link to relevant...

Fri, 22 Jun 2012 12:18:42 +0000

Author: Ingo
Subject: 2311
Posted: 22 Jun 12 at 12:18PM

Hi!

Here's a link to relevant convertion functions:
http://www.delphidabbler.com/tips/6
Taking this samples this could work for you:
ToFileName := GetLongName(ToFileName);

Cheers, Ingo

RenderDocumentToFile not working?? : thanks for the replay.i will...

Thu, 21 Jun 2012 23:30:56 +0000

Author: mazluta
Subject: 2311
Posted: 21 Jun 12 at 11:30PM

thanks for the replay.

i will test your idia.

will back to you with or

RenderDocumentToFile not working?? : Hi!The To-filename is yours ;-)There...

Thu, 21 Jun 2012 22:53:26 +0000

Author: Ingo
Subject: 2311
Posted: 21 Jun 12 at 10:53PM

Hi!

The To-filename is yours ;-)
There are many functions making long paths from short ones.
Please ask Google for it and then do something like
ToFileName := MakeLongPath(ToFileName)
before using it ;-)

Cheers and welcome here,
Ingo

RenderDocumentToFile not working?? : i figer out that if the ToFileName...

Thu, 21 Jun 2012 10:20:29 +0000

Author: mazluta
Subject: 2311
Posted: 21 Jun 12 at 10:20AM

i figer out that if the ToFileName is in Document And Setting it fail.

C:\DOCUME~1\ADMINI~1\LOCALS~1\Temp\MzSc\20120621181251\TmpPng%p.png

if i change it to

c:\aa\TmpPng%p.png

it work.

is it bug in quickpdf??

RenderDocumentToFile not working?? : ToFileName := RemoveBackSlashChar(DstDirName)...

Thu, 21 Jun 2012 06:28:45 +0000

Author: mazluta
Subject: 2311
Posted: 21 Jun 12 at 6:28AM

ToFileName := RemoveBackSlashChar(DstDirName) + '\TmpPng%p.bmp';

PDFLibrary := TQuickPDF0719.Create;

Try

UnlockResult := PDFLibrary.UnlockKey(edtLicenseKey);

IF UnlockResult <> 1 then

Exit;

IF Not FileExists(Pdf_FileName) Then

Exit;

CurCursor := Screen.Cursor;

Try

Screen.Cursor := crHourGlass;

PDFLibrary.LoadFromFile(Pdf_FileName);

// PDFLibrary.SetOrigin(1);

// PDFLibrary.SetMeasurementUnits(1);

// PDFLibrary.SetPageSize('A4');

PDFLibrary.RenderDocumentToFile(72,1,1,0{BMP},ToFileName);

Finally

Screen.Cursor := CurCursor;

End;

Finally

FreeAndNil(PDFLibrary);

End;