you could do this:
&& At design time
_cliptext = JustFname(yourImageFile) + '|' +
Strconv(FileToStr(yourImageFile),13) && encodes image contents into base64
IF Len(_cliptext) <= 8.192
&& paste into yourProperty in property window
PROCEDURE yourProperty_access && in your class.vcx
LOCAL lcFile
lcFile = Addbs(Sys(2023) + GetWordNum(this.yourProperty, 1, '|'))
RETURN Iif(StrToFile(Strconv(GetWordNum(this.yourProperty, 2, '|'),
14), m.lcFile) > 0; && decodes image contents from base64
, m.lcFile; && image file address
, .NULL.;
)
ELSE
&& in IDE
USE your.vcx
LOCATE FOR objname = 'yourClass'
REPLACE user WITH _cliptext
&& At runtime, when application starts:
USE your.vcx NOUPDATE
LOCATE FOR objname = 'yourClass'
lcFile = Addbs(Sys(2023) + GetWordNum(User, 1, '|'))
StrToFile(Strconv(GetWordNum(User, 2, '|'), 14), m.lcFile)
USE
ENDIF
Thierry Nivelet
FoxInCloud
Give your VFP app a second life in the cloud
http://foxincloud.com/
Le 29/05/13 17:56, Jack Skelley a écrit :
Good Morning All:
I have a class library and was wondering if it is possible to embed a JPG so a
separate file does not need to be sent with the VCX.
Currently I am entering the JPG's file spec from a directory in the 'picture'
construct.
Thanks for any help.
Regards,
Jack
Jack Skelley
Senior Director, Programming/Computer Operations
New Jersey Devils
(973)757-6164
[email protected]
[excessive quoting removed by server]
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://mail.leafe.com/mailman/listinfo/profox
OT-free version of this list: http://mail.leafe.com/mailman/listinfo/profoxtech
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/[email protected]
** All postings, unless explicitly stated otherwise, are the opinions of the
author, and do not constitute legal or medical advice. This statement is added
to the messages for those lawyers who are too stupid to see the obvious.
