show image or svg

[felipemdc]

Instead of making a finger X axis scrolling you could just put 2 buttons, for left and right scrolling.

Show the buttons only if Screen.Width < Bitmap.Width

[huberte]

OMG, it's hard for me and I short in time to publish the app.

I tried

begin
  Bitmap := TBitmap.Create;
  try
    // Initializes the Bitmap Size
    Bitmap.Height := Height;
    Bitmap.Width := Width;

    DrawToCanvas(Bitmap.Canvas);

    Canvas.Draw(0, 0, Bitmap);
  finally
    Bitmap.Free;
  end;               

 

Then I tried for several hours to draw an image in canvas with TCanvas.Draw and stretch it with TCanvas.CopyRect with no luck

Show the buttons only if Screen.Width < Bitmap.Width

How do I get the screen size of the android device ?

OpenDocument API from LCLProc for Android. Then it would open the image in whatever default image viewer, or open a list of choices for the user. I will try doing that this week.

what about this solution ?

[felipemdc]

OMG, it's hard for me and I short in time to publish the app.

I tried ....

You need to show more code. Show your routine DrawToCanvas(Bitmap.Canvas); and also show the declaration of this procedure too. Also, is it really connected to OnPaint in the LFM?

You will probably want to use LoadFromFile instead of DrawToCanvas, for TBitmap it needs to be a .bmp image file. You can use other graphic classes for other formats. See the full list here: http://wiki.lazarus.freepascal.org/Developing%20with%20Graphics#Image_formats

Just change TBitmap for the appropriate class for the format, the rest remains without change.

How do I get the screen size of the android device ?

Use Screen.Width and Screen.Height

Screen is a global objects of the type TScreen

See: http://lazarus-ccr.sourceforge.net/docs/lcl/forms/tscreen.html

[felipemdc]

OpenDocument API from LCLProc for Android. Then it would open the image in whatever default image viewer, or open a list of choices for the user. I will try doing that this week.

what about this solution ?

I started implementing it today, but it crashes right now. It doesn't work yet.

[felipemdc]

I started implementing it today, but it crashes right now. It doesn't work yet.

Ok, now in revision: 37229 both OpenURL and OpenDocument have initial implementations working.

[huberte]

How should I use open document ?

Thks

[BigChimp]

IIRC, I suppose include unit LazUtils and call OpenDocument. At least that's how it works on Windows, Linux...

[felipemdc]

IIRC, I suppose include unit LazUtils and call OpenDocument. At least that's how it works on Windows, Linux...

OpenDocument is in LCLIntf, so:

uses LCLIntf;

OpenDocument('/mnt/sdcard/myfile.png');

Every extension needs to be registered, because it needs to be converted to a mime-type. So far I did it for .txt, .png and .jpg