Hi Graham,
> I've not come across Activex controls for doing this so yes please.
OK, here it is. The code runs on a normal PC (Windows XP/Vista/7), but you
won't be able to draw with your mouse. There is also no error checking. For
instance, if you try to save the image before anything is drawn on the
signature area, you get an error message.
PUBLIC oform1
oform1=NEWOBJECT("form1")
oform1.Show
DEFINE CLASS form1 AS form
ADD OBJECT signature AS olecontrol WITH ;
Top = 12, Left = 12, Height = 97, Width = 349, ;
OleClass = "MSInkAut.InkPicture.1"
ADD OBJECT cmdimage AS commandbutton WITH ;
Top = 120, Left = 12, Height = 27, Width = 84, ;
Caption = "Get Picture"
ADD OBJECT img AS image WITH ;
Height = 85, Left = 12, Top = 156, Width = 349
PROCEDURE cmdimage.Click
Thisform.img.PictureVal = Thisform.Signature.Ink.Save(2)
ENDPROC
ENDDEFINE
To see this in action, run this code on a table PC, sign in the white area
at the top, and click on the button. You see the signature in the image
control at the bottom. You could save this image in a memo field if you want
to display the signature later.
--
Christof
_______________________________________________
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
Searchable Archive: http://leafe.com/archives/search/profox
This message:
http://leafe.com/archives/byMID/profox/d52de033f4cb4803847f05d06f108...@fpl5
** 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.
