Voorbeeld van inktverzameling

Deze toepassing is gebaseerd op het object InkCollector en demonstreert de verzameling inkt. De toepassing maakt een venster, voegt een InkCollector-object eraan toe en biedt de gebruiker menuopties die kunnen worden gebruikt om de inktkleur, de inktbreedte te wijzigen en inktverzameling in en uit te schakelen.

De InktVerzamelaar declareren

De toepassing importeert eerst de naamruimte Microsoft.Ink. Vervolgens declareert de toepassing myInkCollector, die het InkCollector--object voor het formulier bevat.

' The Ink namespace, which contains the Tablet PC Platform APIImports Microsoft.Ink
...
Public Class InkCollection
   Inherits Form
    ' Declare the Ink Collector object
    Private myInkCollector

Voorbereidingen treffen

De InkCollection_Load methode van het formulier verwerkt de gebeurtenis Laden van het formulier. Er wordt een InkCollector--object gemaakt dat is toegewezen aan het formulier, wijzigt de eigenschap DefaultDrawingAttributes van het InkCollector-object en schakelt het InkCollector-object in.

Private Sub InkCollection_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

    ' Create an ink collector and assign it to this form's window
    myInkCollector = New InkCollector(Me.Handle)

    ' Set the pen width to be a medium width
    myInkCollector.DefaultDrawingAttributes.Width = MediumInkWidth

    ' If you do not modify the default drawing attributes, the default 
    ' drawing attributes will use the following properties and values:
    ' ...

    ' Turn the ink collector on
    myInkCollector.Enabled = True
End Sub

De InkCollector- wordt toegewezen aan het venster van het formulier door de venstergreep van het formulier toe te wijzen aan de eigenschap Handle van het object InkCollector. Inktverzameling wordt ingeschakeld door de eigenschap Enabled van het InkCollector-object in te stellen op TRUE.

Met de eigenschap InkCollector object DefaultDrawingAttributes worden de standaardkenmerken ingesteld die zijn toegewezen aan een nieuwe cursor. Als u verschillende kenmerken voor een nieuwe cursor wilt instellen, gebruikt u de eigenschap DrawingAttributes van het Cursor-object. Als u de tekenkenmerken van één pennenstreek wilt wijzigen, gebruikt u de eigenschap DrawingAttributes van het Stroke-object.

De eigenschappen wijzigen

De rest van deze eenvoudige toepassing bestaat uit handlers voor de verschillende menuselecties die de gebruiker kan maken. Als de gebruiker er bijvoorbeeld voor kiest om de inktkleur naar rood te veranderen door 'Rood' te selecteren in het Inkt-menu, wordt de kleur veranderd door de eigenschap Color van het InkCollector-object en de DefaultDrawingAttributes-eigenschap in de event handler voor het menu te gebruiken.

Private Sub miRed_Click(ByVal sender As System.Object, 
                        ByVal e As System.EventArgs) Handles miRed.Click
    myInkCollector.DefaultDrawingAttributes.Color = Color.Red
End Sub

Het formulier sluiten

De methode Dispose van het formulier verwijdert het InkCollector-object myInkCollector.