VB Tips - Trucchi Visual Basic 4

Problema

Soluzione

Vorrei sapere se è possibile rilevare la posizione del mouse anche quando questo è al di fuori dei miei forms.

Type POINTAPI

        x As Long

        y As Long

End Type

Declare Function GetCursorPos Lib "user32" Alias "GetCursorPos" (lpPoint As POINTAPI) As Long

Sub Timer1_Timer ()

Dim Punto as POINTAPI

Dim puntoHwnd as long

Call GetCursorPos(Punto)

' in Punto.Y e Punto.X c'e' la coordinata del mouse in coordinate schermo

End Sub

E' un metodo stupido ma ti assicuro che funziona molto bene.

Ma come si fa a creare un array di oggetti definiti dall'utente?

- Posizioni un campo testo dove ti pare e assegni alla proprietà Index

il valore 0 (nome campo: TESTO

    for i = 1 to 10

        load TESTO(i)

    next

Come si formatta una textbox inserendo un separatore delle migliaia nella cifra? (es. 10.000 oppure 25.000)

   txtPrezzi(Index) = Format(txtPrezzi(Index), "###,###,###")

Nell'evento Change della text inserisci il seguente codice:

 Text1.Text = Format(Text1.Text, "#,##0")

Text1.SelStart = Len(Text1.Text)

sapete dirmi come si fa da un programma in visual basic 5 a chiamare il browser (netscape o explorer) passandogli un indirizzo internet a cui posizionarsi ????

Devi creare un'oggetto Internet Explorer Application, una cosa simile a questa:

Dim IE as Object

Set IE=CreateObject("InternetExplorer.Application")

E poi ne imposti le proprietà

IE.Navigate="http://www.microsoft.com"

IE.Visible=True

Se poi vuoi anche poter ricevere gli eventi prodotti dal browser devi collegarti all'oggetto in early-binding con una dichiarazione WithEvents, del tipo:

Dim WithEvents IE as InternetExplorer

set IE=New InternetExplorer

Qualcuno sa x caso come posso fare in modo che nel menu popup di ogni file ci sia la voce di menu che fa partire il mio programma?

Se ti serve solo la voce di menù non è indispensabile una shell extension, basta inserire nel registro questa chiave:

[HKEY_CLASSES_ROOT\<estensione> \shell\<nome menu>\command]

@="<programma> %1"

dove:

<estensione> è quella che ti interessa, (.txt, .bmp ....) oppure * (SENZA il punto) per aggiungere il menù a tutte le estensioni; quelle non ancora associate assumeranno questa voce come default.

<nome menu> è quello che vuoi visualizzare nel popup.

<programma> è il percorso completo del tuo programma. (%1 serve a passare il file come parametro).

Attenzione che se usi un file '.reg' per registrare questa chiave devi raddoppiare il carattere "\" nel percorso del programma (ovvero "c:\\pippo\\pippoprog.exe %1")

<< Pagina Precedente