TRUIPhoto

[wm.chatman]

well I just tested again on Device. And I DO NOT UNDERSTAND the Behavior.
Now it does work! But testing a few days ago, this did Not work.
Threading.dll for Device is all there is needed. Also avail. on Device.

anyway, I thank you for taking the time out to help!
have a nice WE Mr. Erel

Best regards
William

[wm.chatman]

Like I said, it does work on Device now. But, I get this Error Msg: Cant load\Speicherkarte\AlbumTest\Axt.JPG.
Threading.dll and Hardware.dll and the Images are on Board.
So, Actually I do not know whats wrong. Speichercard? Could that be it?
Seems like all the Images want to Load up, into the first Image Control. The Clip itself works, and does show all the Images.
need some help Please.

Best regards
William

[klaus]

Hi William,
Are you shure that the spelling of the path and or the filename are exact ?
Are you shure that the file Axe.jpg does really exist in the selected folder ?
The message 'Can't load' means that the file has nor been found and has nothing to do with the Image controls.
I had the same kind of message when the called folder had no jpg file in it.
The message given is your message in line 167 !
You should run your program from the device IDE and add some message boxes in the ShowPicture routine to see where the error happens.

Best regards.

[wm.chatman]

I don’t get it, I just don’t get it. I been up all Night working on my Problem here.
And still am unable to come up with a Solution. The Images Names are all correct, Folder Name is OK.
All Images exist in in the Folder. But still I receive this little Error Msg, on the Device.
On Device the Imgs just do not load, except one Img. Using the Arrow up/down gives me an error cant load Image. After Error Msg unload, the next Image loads into the first Image Control.
The Images just do not populate the rest of the Controls. I really did try, to no avail.
I need a Solution to this Problem! Without the jpeg Library Controls.

Best regards
William

[Erel]

Do the zip file in the first post contain your most updated code and images?

[wm.chatman]

Yes Sir, the zip file in the first post contains the most updated code but no images. With the Images it would have been 1.48 mb even with using WinZip.
Please add JPGs to Folder (My Images). This is the File the Images need to be stored, for Future Photo taking with the Internal Cam.

I tryd to add the Images to first post, no Luck.
exceeds forums limit of 390.6 kbs. Please pop some own images into My Images Folder.

[klaus]

The problem is here:
the lines:

<font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">).Image = il1.Item(i) </font></font></font></font><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000">'Control keyword allows access to different control each time</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">).Text = </font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">FileName</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(al1.Item(i+offset))</font></font></font></font>
<font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">).Image = </font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">""</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">).Text = </font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">""</font></font></font></font></font></font></font></font></font>
<font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> <font color="black">& a+</font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">1</font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">).Image = il1.Item(a)</font> </font></font></font></font><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000">'Control keyword allows access to different control each time</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> <font color="black">& a+</font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">1</font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">).Text =</font> </font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">FileName</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(al1.Item(i))</font></font>
</font></font></font></font></font></font></font></font></font></font></font></font></font></font></font>

should become:

<font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">,<font color="red">Image</font>).Image = il1.Item(i) </font></font></font></font><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000">'Control keyword allows access to different control each time</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">,<font color="red">Label</font>).Text = </font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">FileName</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(al1.Item(i+offset))</font></font></font></font>
<font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">,<font color="red">Image</font>).Image = </font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">""</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> & i+</font></font></font></font><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080"><font face="Courier New"><font size="2"><font color="#800080">1</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">,<font color="red">Label</font>).Text = </font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">""</font></font></font></font></font></font></font></font></font>
<font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Image"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> <font color="black">& a+</font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">1</font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black"><font color="black">,</font><font color="red">Image</font>).Image = il1.Item(a)</font> </font></font></font></font><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000"><font face="Courier New"><font size="2"><font color="#008000">'Control keyword allows access to different control each time</font></font></font>
</font></font></font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">Control</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(</font></font></font></font><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000"><font face="Courier New"><font size="2"><font color="#800000">"Label"</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"> <font color="black">& a+</font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">1</font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2"><font color="black">,<font color="red">Label</font>).Text =</font> </font></font></font></font><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff"><font face="Courier New"><font size="2"><font color="#0000ff">FileName</font></font></font></font></font></font></font></font></font><font face="Courier New"><font size="2"><font face="Courier New"><font size="2">(al1.Item(i))</font></font>
</font></font></font></font></font></font></font></font></font></font></font></font></font></font></font>

In the Control Keyword you must also specify the Control type for the optimized compiler !

Best regards.

[wm.chatman]

Klaus

Compiling to Device (Auto Scale) on desktop after the changes you had recommended, Results in the following error. See Attached Error Msg.

Please Disregard the error Msg.

Edit 2111 h: sorry about that. YES, I did MISS a small Item! After checking again, I seen what had been missing in the code. (,) at one point.
Now this also runs on device. Sir!

I must thank Klaus again with his help on this. Without Support, I would have been busting another (Nut) I mean Night, without Sleep!

again, thank you for taking your time to take a look and finding the code bug.

Post 1 has new Update.

Have a Nice WE Klaus!

Best regards
William

[wm.chatman]

How do I get Panel1 to show at bottom of Form using:


If cPPC=True Then
flb.FullScreen2(True,True)
End If

the Images show fullScreen, but the panel is at same place.
Do I need to also change the frm height, and then adjust the panel to the frm to show at bottom of Full Screen?

Thank you much for your help.

Edit: 1449 h. Oh yes, how sweet it is. My Question was the answer. Setting frm height to 360 did help and I was able to adjust the panel.

William

[wm.chatman]

Hi

still working on functions that are needed, at this time I need a little Boost.
how can I turn the internal Cams Light on or off, before taking a Photo?
I am using a imgBtn to turn ON/OFF the Light of Device Cam.

all good answers and help are welcome...

Thank you and Merry Xmas / Happy New Year.

Best regards

William