Procedura dettagliata: chiamata delle API di Windows (Visual Basic)

Articolo
08/11/2011

Le API di Windows sono librerie a collegamento dinamico (DLL, Dynamic Link Library) che fanno parte del sistema operativo Windows. È possibile utilizzare le API di Windows per eseguire alcune attività quando è difficile scrivere routine equivalenti. In Windows è disponibile ad esempio una funzione denominata FlashWindowEx, che consente di alternare sfumature chiare e scure nella barra del titolo delle applicazioni.

Utilizzando le API di Windows è possibile velocizzare i tempi di programmazione, in quanto le API includono molte utili funzionalità già pronte per l'uso. Tuttavia, utilizzare le API di Windows può essere difficile e, in caso di errore, si verificano grossi problemi.

Le API di Windows rappresentano una categoria di interoperabilità speciale, non utilizzano codice gestito, non dispongono di librerie dei tipi incorporate e utilizzano tipi di dati diversi da quelli utilizzati in Visual Studio. Tenendo conto di tali differenze, e poiché le API di Windows non sono oggetti COM, l'interoperabilità con le API di Windows e .NET Framework viene realizzata mediante platform invoke (PInvoke). Le chiamate della piattaforma sono un servizio che consente al codice gestito di chiamare le funzioni non gestite implementate in una DLL. Per ulteriori informazioni, vedere Utilizzo di funzioni di DLL non gestite. È possibile utilizzare PInvoke in Visual Basic mediante l'istruzione Declare o attraverso l'applicazione dell'attributo DllImport a una routine vuota.

Le chiamate delle API di Windows costituivano un elemento importante della programmazione in Visual Basic, ma con Visual Basic 2005 in genere non sono necessarie. Se possibile, si consiglia di utilizzare codice gestito da .NET Framework anziché chiamate di API di Windows, per eseguire le attività. Nella procedura dettagliata descritta di seguito sono fornite tutte le informazioni necessarie per l'utilizzo delle API di Windows.

Nota

Nel computer in uso è possibile che vengano visualizzati nomi o percorsi diversi per alcuni elementi dell'interfaccia utente di Visual Studio nelle istruzioni seguenti. La versione di Visual Studio in uso e le impostazioni configurate determinano questi elementi. Per ulteriori informazioni vedere Impostazioni di Visual Studio.

Chiamate API tramite l'istruzione Declare

Il metodo più comune per chiamare le API di Windows consiste nell'utilizzare l'istruzione Declare.

Per dichiarare una routine DLL

Determinare il nome della funzione che si desidera chiamare, gli argomenti, i tipi degli argomenti e i valori restituiti, nonché il nome e il percorso della DLL che li contiene.

Nota

Per informazioni dettagliate sulle API di Windows, fare riferimento alla documentazione dell'SDK di Windows a 32 bit in API di Windows in Platform SDK. Per ulteriori informazioni sulle costanti utilizzate dalle API di Windows, vedere i file di intestazione disponibili in Platform SDK, ad esempio Windows.h.
Aprire un nuovo progetto Applicazione Windows scegliendo Nuovo dal menu File e quindi Progetto. Verrà visualizzata la finestra di dialogo Nuovo progetto
Selezionare Applicazione Windows nell'elenco di modelli di progetto di Visual Basic. Verrà visualizzato il nuovo progetto.

Aggiungere la funzione Declare seguente alla classe o al modulo in cui si desidera utilizzare la DLL:

Declare Auto Function MBox Lib "user32.dll" Alias "MessageBox" (
    ByVal hWnd As Integer,
    ByVal txt As String,
    ByVal caption As String,
    ByVal Typ As Integer) As Integer

Parti dell'istruzione Declare

L'istruzione Declare include gli elementi descritti di seguito.

Modificatore Auto

Il modificatore Auto indica al runtime di convertire la stringa sulla base del nome del metodo o, se specificato, al nome di alias secondo le regole di Common Language Runtime.

Parole chiave Lib e Alias

Il nome che segue la parola chiave Function è il nome utilizzato dal programma per accedere alla funzione importata. Il nome può corrispondere al nome reale della funzione che si sta chiamando. In alternativa, è possibile utilizzare qualsiasi nome di routine valido e quindi utilizzare la parola chiave Alias per specificare il nome reale della funzione che si sta chiamando.

Specificare la parola chiave Lib seguita dal nome e dalla posizione della DLL che contiene la funzione che si sta chiamando. Non è necessario specificare il percorso dei file che si trovano nelle directory di sistema di Windows.

Utilizzare la parola chiave Alias se il nome della funzione che si sta chiamando non è un nome di routine di Visual Basic valido o se è in conflitto con il nome di altri elementi dell'applicazione. Alias indica il nome reale della funzione chiamata.

Dichiarazioni del tipo di dati e dell'argomento

Dichiarare gli argomenti e i relativi tipi di dati Questa operazione può risultare impegnativa in quanto i tipi di dati utilizzati da Windows non corrispondono a quelli di Visual Studio. In Visual Basic gran parte del lavoro viene svolta automaticamente mediante un processo denominato marshalling, che consiste nella conversione degli argomenti in tipi di dati compatibili. Per controllare in modo esplicito il marshalling degli argomenti, è possibile utilizzare l'attributo MarshalAsAttribute definito nello spazio dei nomi System.Runtime.InteropServices.

Nota

Le versioni precedenti di Visual Basic consentivano di dichiarare parametri As Any, pertanto era possibile utilizzare dati di qualsiasi tipo. In Visual Basic è necessario utilizzare un tipo di dati specifico per tutte le istruzioni Declare.

Costanti di API di Windows

Alcuni argomenti includono più costanti. L'API MessageBox descritta in questa procedura dettagliata, ad esempio, accetta un argomento Integer denominato Typ che controlla le modalità di visualizzazione della finestra di messaggio. È possibile determinare il valore numerico di queste costanti esaminando le istruzioni #define nel file WinUser.h. I valori numerici vengono in genere indicati come valori esadecimali, pertanto potrebbe essere necessario utilizzare una calcolatrice per sommarli e convertirli in decimali. Se ad esempio si desidera combinare le costanti per lo stile esclamativo MB_ICONEXCLAMATION 0x00000030 e lo stile Sì/No MB_YESNO 0x00000004, è possibile sommare i numeri e ottenere un risultato di 0x00000034 o 52 decimali. Sebbene sia possibile utilizzare direttamente il risultato decimale, si consiglia di dichiarare questi valori come costanti nell'applicazione e di combinarli utilizzando l'operatore Or.

Per dichiarare costanti per le chiamate API di Windows

Consultare la documentazione relativa alla funzione di Windows che si sta chiamando. Determinare il nome delle costanti utilizzate e il nome del file con estensione h contenente i valori numerici di tali costanti.
Per visualizzare il contenuto del file di intestazione con estensione h e individuare i valori associati alle costanti utilizzate, utilizzare un editor di testo, ad esempio Blocco note. L'API MessageBox, ad esempio, utilizza la costante MB_ICONQUESTION per visualizzare un punto interrogativo nella finestra del messaggio. La definizione di MB_ICONQUESTION, che si trova nel file WinUser.h, è la seguente:

#define MB_ICONQUESTION 0x00000020L
Aggiungere istruzioni Const equivalenti alla classe o al modulo per rendere disponibili le costanti nell'applicazione. Ad esempio:
```
Const MB_ICONQUESTION As Integer = &H20
Const MB_YESNO As Integer = &H4
Const IDYES As Integer = 6
Const IDNO As Integer = 7
```

Per chiamare la routine DLL

Aggiungere un pulsante denominato Button1 al form di avvio del progetto, quindi fare doppio clic su di esso per visualizzarne il codice. Verrà visualizzato il gestore eventi per il pulsante.

Aggiungere codice al gestore eventi Click relativo al pulsante aggiunto per chiamare la routine e specificare gli argomenti appropriati.

Private Sub Button1_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button1.Click

    ' Stores the return value.
    Dim RetVal As Integer
    RetVal = MBox(0, "Declare DLL Test", "Windows API MessageBox",
        MB_ICONQUESTION Or MB_YESNO)

    ' Check the return value.
    If RetVal = IDYES Then
        MsgBox("You chose Yes")
    Else
        MsgBox("You chose No")
    End If
End Sub

Premere F5 per eseguire il progetto. Verrà visualizzata la finestra di messaggio con i pulsanti di risposta Yes e No. Fare clic su uno dei pulsanti.

Marshalling dei dati

In Visual Basic i tipi di dati dei parametri e dei valori restituiti per le chiamate delle API di Windows vengono convertiti automaticamente, tuttavia è possibile utilizzare l'attributo MarshalAs per specificare in modo esplicito tipi di dati non gestiti previsti da un'API. Per ulteriori informazioni sul marshalling di interoperabilità, vedere Marshalling di interoperabilità.

Per utilizzare Declare e MarshalAs in una chiamata API

Determinare il nome della funzione che si desidera chiamare, gli argomenti, i tipi di dati e i valori restituiti.
Per semplificare l'accesso all'attributo MarshalAs, aggiungere un'istruzione Imports all'inizio del codice della classe o del modulo, come nell'esempio seguente:
```
Imports System.Runtime.InteropServices
```
Aggiungere un prototipo di funzione per la funzione importata nella classe o nel modulo utilizzato e applicare l'attributo MarshalAs ai parametri o al valore restituito. Nell'esempio che segue viene eseguito il marshalling come AsAny di una chiamata API che prevede il tipo void*:
```
Declare Sub SetData Lib "..\LIB\UnmgdLib.dll" (
    ByVal x As Short,
    <MarshalAsAttribute(UnmanagedType.AsAny)>
        ByVal o As Object)
```

Chiamate API tramite l'attributo DllImport

L'attributo DllImport fornisce un metodo alternativo di chiamata delle funzioni nelle DLL senza librerie dei tipi. DllImport corrisponde per certi aspetti all'utilizzo di un'istruzione Declare ma consente di esercitare un maggiore controllo sulle modalità di chiamata delle funzioni.

È possibile utilizzare l'attributo DllImport con la maggior parte delle chiamate API di Windows purché la chiamata faccia riferimento a un metodo condiviso, o statico. Non è possibile utilizzare metodi che richiedono un'istanza di una classe. A differenza delle istruzioni Declare, le chiamate DllImport non possono utilizzare l'attributo MarshalAs.

Per chiamare un'API di Windows tramite l'attributo DllImport

Aprire un nuovo progetto Applicazione Windows scegliendo Nuovo dal menu File e quindi Progetto. Verrà visualizzata la finestra di dialogo Nuovo progetto
Selezionare Applicazione Windows nell'elenco di modelli di progetto di Visual Basic. Verrà visualizzato il nuovo progetto.
Aggiungere al form di avvio un pulsante denominato Button2.
Fare doppio clic su Button2 per visualizzare il codice del form.
Per semplificare l'accesso all'attributo DllImport, aggiungere un'istruzione Imports all'inizio del codice della classe del form di avvio.
```
Imports System.Runtime.InteropServices
```
Dichiarare una funzione vuota prima dell'istruzione End Class del form e nominare la funzione MoveFile.
Applicare i modificatori Public e Shared alla dichiarazione di funzione e impostare i parametri per MoveFile sulla base degli argomenti utilizzati dalla funzione API di Windows.
```
Public Shared Function MoveFile(
    ByVal src As String,
    ByVal dst As String) As Boolean
    ' Leave the body of the function empty.
End Function
```
È possibile assegnare alla funzione qualsiasi nome di routine valido; nella DLL il nome è specificato dall'attributo DllImport. Poiché inoltre questo attributo gestisce il marshalling di interoperabilità per i parametri e i valori restituiti, è possibile scegliere tipi di dati di Visual Studio simili a quelli utilizzati dall'API.
Applicare l'attributo DllImport alla funzione vuota. Il primo parametro indica il nome e il percorso della DLL che contiene la funzione che si sta chiamando. Non è necessario specificare il percorso dei file che si trovano nelle directory di sistema di Windows. Il secondo parametro è un argomento denominato che specifica il nome della funzione nell'API di Windows. In questo esempio l'attributo DllImport impone che le chiamate a MoveFile vengano inoltrate a MoveFileW in KERNEL32.DLL. Il metodo MoveFileW copia un file dal percorso src al percorso dst.
```
<DllImport("KERNEL32.DLL", EntryPoint:="MoveFileW", SetLastError:=True,
    CharSet:=CharSet.Unicode, ExactSpelling:=True,
    CallingConvention:=CallingConvention.StdCall)>
Public Shared Function MoveFile(
    ByVal src As String,
    ByVal dst As String) As Boolean
    ' Leave the body of the function empty.
End Function
```

Aggiungere codice al gestore eventi Button2_Click per chiamare la funzione:

Private Sub Button2_Click(ByVal sender As System.Object,
    ByVal e As System.EventArgs) Handles Button2.Click

    Dim RetVal As Boolean = MoveFile("c:\tmp\Test.txt", "c:\Test.txt")
    If RetVal = True Then
        MsgBox("The file was moved successfully.")
    Else
        MsgBox("The file could not be moved.")
    End If
End Sub

Creare un file denominato Test.txt e inserirlo nella directory C:\Tmp del disco rigido. Se necessario, creare la directory Tmp.
Premere F5 per avviare l’applicazione. Verrà visualizzato il form principale.
Fare clic su Button2. Se è possibile spostare il file, verrà visualizzato un messaggio che informa che il file è stato spostato.

Vedere anche

Condividi tramite