OK I got a 'proof of concept' form working without gdi+ - I used a bit of
sleight of hand shown below:
(apologies to those for whom it's old hat)
* substitute your names for <vars>
* Type the following three lines in command window with <Ctl+Enter> at end
of each line
PUBLIC oForm as form
CREATE FORM <yourformname> nowait
oForm=_SCREEN.ActiveForm
*select all three lines and hit enter
* continue in Command win
oForm.ADDOBJECT("image1","image")
oI=oForm.image1
oI.picture= GETPICT("","Choose Image file")
oI.stretch=1
oI.width = oForm.width
oI.height = oForm.height
oForm.scrollbars=3
oForm.saveasclass("<YourImgFormClass>","<YourImgForm>")
oForm.release && may not
oForm=null && be necessary
* close the form
CREATE FORM test1 as <YourImgForm> FROM <YourImgformclass>
* continue editing in the designer
If you know a better way of subclassing .scx's please share it.
Andrew Davies MBCS CITP
- AndyD 8-)#
**********************************************************************
This email and any files transmitted with it are confidential and intended
solely for the use of the individual or entity to whom they are addressed. If
you have received this email in error please notify the system manager.
This footnote also confirms that this email message has been swept by
MIMEsweeper for the presence of computer viruses.
Please contact [EMAIL PROTECTED] with any queries.
**********************************************************************
_______________________________________________
Post Messages to: [email protected]
Subscription Maintenance: http://leafe.com/mailman/listinfo/profox
OT-free version of this list: http://leafe.com/mailman/listinfo/profoxtech
** 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.
