mORMot Open Source

Yes, I know, I have try to comment them but I get always a big page: about 87 cm x 123 cm...

Because in my example I have used an A4 pages but general I don't know the page size until extract the image from my original PDF (no PDF/A-1), so I need use 2 variables to set Width and Height.
Something like:

      dpi := 300;
      lPdf.DefaultPaperSize := psUserDefined;
      lPdf.PDFA1 := True;
      lPdf.ScreenLogPixels:=dpi;
      lPage := lPDF.AddPage;
      lPage.PageWidth := Round(dpi * pWidth / 25.4);
      lPage.PageHeight := Round(dpi * pHeight / 25.4);

Any idea?

But if I use the DLL library from wxsqlite instead of OBJ, how can use my encrypted database. Must I change my code? How?
What version of sqlite is based this "AES" library? I cannot find details.

I don't change the db right, and the first application that I run can access without problem, so I don't think it is a access right problem.

I use it on XE3 without problem.

OK.

1. Is there a way to use SQL (for example call "VACUUM") with TSQLRest? Or si it right use TSQLRestServerDB.
2. "use a transaction (and a batch process)" but for this I need of TSQLRestClientDB and then of TSQLRestServerDB, right?

Can someone test my demo on XE3?

With Delphi XE3?

Please see the small demo: http://dl.dropbox.com/u/19900180/pngproblem.zip

The code is very simple:

unit Unit1;

interface

uses
  Winapi.Windows, Winapi.Messages, System.SysUtils, System.Variants, System.Classes, Vcl.Graphics,
  Vcl.Controls, Vcl.Forms, Vcl.Dialogs, SynGdiPlus, Vcl.Imaging.pngimage,
  Vcl.ExtCtrls;

type
  TForm1 = class(TForm)
    Image1: TImage;
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form1: TForm1;

implementation

{$R *.dfm}

initialization
  Gdip.RegisterPictures;

end.

There is only a form with a PNG, on design time I can see the PNG but on run time I cannot see it (see the exe demo).

I don't understand...

Do you have some ideas?

PS with Delphi 2006 I don't have this problem.

I have a small problem.
Today I have convert my application from Delphi 2006 to Delphi XE3.
All the code works without problem but I have a small bug, I need to use

initialization
  Gdip.RegisterPictures;

to use the code above (save/load image from/to database) but with this code at runtime all my TImage with PNG image are black, if I comment this code I can see all PNG on my TImage but I cannot save/load image from/to database.

How can I solve it?
Thanks

OK, it's possible add a IMPORT feature into SynDBExplorer to import from csv file. So I can avoid to use external SQLite editor.

My searches have not led to anything.
I have download Windows Imaging Component but when I try to install it I get an error because the last version is just installed on my Windows XP.
I have also copy gdipluss.dll library on my application path, but also this not work.

I don't have an error, only a TIFF file empty...

Other ideas about it?

I have solved using ord(evCompressionCCITT4) on SynGDIPlus.SaveAs.
Thanks

I have check the code. I think in this moment is not possible set DPI.
Is it possible add this feature?

I have try it but I get an error on IntToStr(PortNumber); "Parameter is not correct.".

I don't understand why...

Yes, I just see it and AddExceptionToFirewall (of stackoverflow) works well, but with it I can only add application not port. I need open a port.

Any ideas?

This is OK, but AddPortToXPFirewall  doesn't work on Windows 7 (as administrator), I need fix it to run as administrator not as user.

I don't understand if I have found a bug.
TSQLDBStatement.TotalRowsRetrieved return always 0 until I call TSQLDBStatement.Step, how can I know the row number?

And where I set the password? I have try to set on password field but it doesn't work.

Thank you. I will wait for it.

I think on "at connection opening" because I get the error after click on "OK" button of "OLEDB connection box". I hope I have understand your question.
I get error on OleDBCheck procedure.