_,
Delade privata fungerar tira_get_captured_data (ByRef data som IntPtr, ByRef storleksanpassar som heltal), som heltal
Avsluta fungerar
_,
Delade privata fungerar tira_delete (ByVal ptr som IntPtr) som heltal
Avsluta fungerar
Sub Tira ()
Dunkla data som IntPtr = IntPtr.Zero
Dunkelt dataSize som heltal = 0
Dunkel res som heltal = 0
res = tira_get_captured_data (data, dataSize),
'//TODO: Arbete med pekaren (för data).
Om data.ToInt32 <> 0 därefter
'fritt högminne
res = tira_delete (data)
Avsluta om
Avsluta suben
|