InkPicture Control

  • Thread starter Thread starter Guest
  • Start date Start date
G

Guest

Can anyone provide example code of using the InkPicture control Access on a
tabletpc?
 
Private Sub Command283_Click()
'CODE to SAVE InkPicture to FILE
Dim objInk As MSINKAUTLib.InkPicture
Dim bytArr() As Byte
Dim File1 As String

File1 = "C:\test.isf"

Set objInk = Me.InkPicture2.Object

If objInk.Ink.Strokes.Count > 0 Then
bytArr = objInk.Ink.Save(2)
Open File1 For Binary As #1
Put #1, , bytArr
Close #1
End If
End Sub
 
You must log in or register to reply here.

Ask a Question

Want to reply to this thread or ask your own question?

You'll need to choose a username for the site, which only take a couple of moments. After that, you can post your question and our members will help you out.

Ask a Question

Similar Threads

Tablet PC / Access 2003 and Capturing Signatures 1
Tablet PC / Access 2003 and Capturing Signatures 1
Clearing selection in InkPicture 1
How to print Graphics & text 1
How to Print Text & graphics combined? (repost) 1
problem with inkPicture.refresh() in graphics context 2
Suddenly cannot see other computers in my Workgroup and they can't see me 11
OLE, INK and Reports 0

Back
Top