VB.NET
Un piccolo tip per emulare la VarPtr di VB6 in .net in modo di facilitare la conversione delle applicazioni VB6.
Public Function VarPtr(ByVal o As Object) As Integer
Dim GC As System.Runtime.InteropServices.GCHandle = System.Runtime.InteropServices.GCHandle.Alloc(o, System.Runtime.InteropServices.GCHandleType.Pinned)
Dim ret As Integer = GC.AddrOfPinnedObject.ToInt32
GC.Free()
Return ret
End Function
'......
Dim b As Bitmap = ...
Dim hIcon As IntPtr = b.GetHicon()
Dim i As Icon = Icon.FromHandle(hIcon)
Oggi navigando su internet ho trovato due interessantissimi link di come creare un file excel senza excel. Sinceramente non li ho provati perfettamente ma a prima vista funzionano correttamente.
http://www.devspy.com/Art/Lang/Art.aspx?lang=17&id=00149 si può vedere come tramite del semplice codice xml si possa realizzare una cartella di lavoro perfettamente formattata(solo office XP/2003 e successive)
http://sourceforge.net/projects/koogra/ è presente una libreria scritta in C# che permette di scrivere o leggere file excel in formato binario BIFF compatibile da Excel 97 in su.
Qui di seguito vi posto un piccolo esempio di come utilizzare i cursori animati in VB.NET,unico problema che non sono riuscito a risolvere è come carica il cursore da una risorsa.Ogni suggerimento e ben accetto.
Private Const IMAGE_CURSOR As Int32 = 2
Private Const LR_LOADFROMFILE As Int32 = &H10
Private Declare Function LoadImage Lib "user32.dll" Alias "LoadImageA" (ByVal hInst As Int32, ByVal lpsz As String, ByVal un1 As Int32, ByVal n1 As Int32, ByVal n2 As Int32, ByVal un2 As Int32) As IntPtr
Private Declare Function CloseHandle Lib "kernel32.dll" (ByVal hObject As IntPtr) As Int32
Public Function LoadAniCursor(ByVal file As String) As Cursor
Dim ptrCursor As IntPtr
ptrCursor =...
leggete qui.
Cosa ne pensate??
Quando provavo al leggere sul emulatore dal file di configurazione con ConfigurationSettings.AppSettings("ConnectionString") mi ritornava sempre nothing. Ho perso mezza giornata e alla fine ho capito cosa fosse. Quando ho creato il progetto non ho utilizzato il template di OpenNETCF ma o solo referenziato gli assembly. Così facendo quando si effettua il deploy con VS.NET, non installa i CAB di OpenNETCF ma copia solo gli assembly referenziati nel progetto nella cartella dell'applicazione e non creando nella cartella \WINDOWS\Config il machine.config di OpenNETCF.
La soluzione: ho creato una cartella condivisa in cui ho copiato il file machine.config...