Newsgroup: it.comp.lang.visual-basic
Titolo: moduli di classe e oggetti

Salve NG!!
Ho scritto un modulo di classe nel mio progetto.
In questo modulo vorrei poter usare i metodi dell'oggetto winsock... e'
possibile? come faccio?
per i form basta fare un drag&drop dell'iconcina sul form, ma per un modulo
di classe cosa devo fare?
Grazie e scusate per la banalita' della domanda ma sto imparando...!
ciao!
--
____________________________
   G 1 0 X®
Web: 
www.giox.net
Alt. Mail: 
info...@libero.it
Icq Uin: 47698601
Irc Chan. @azzurranet:
   #mhackerone; #ahccc; #linux;
_____________________________

Lo dichiari con la parola WithEvents.
Vai sul sito di Fibia FBI, c'è proprio quello che cerchi...
http://vbsimple.virtualave.net/index.htm
Ciao
Oz

possibile? come faccio?
Bhè ma scusa eh...usa direttamente il winsock, perchè devi complicarti la
vita a portarlo in un modulo di classe?
Comunque puoi crearlo da codice
istanziando una tua variabile as Winsock; una cosa del genere:
dim xx as
winsock
set xx = new winsock
Così puoi vedere tutti i metodi/proprietà
del tuo oggetto winsock che, logicamente, non le esporta fuori dalla
classe. Non ho ben capito che vuoi fare, cmq, così puoi 'ricrearti' un
oggetto winsock, e con le property get e let, importi/esporti valori che
potrebbero servire al tuo oggettom o al suo chiamante.
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
 

>Lo dichiari con la parola WithEvents.
Bhè io non ho capito benissimo
che vuole fare il nostro amico ma, con WithEvents, gestisci gli eventi che
generi con RaiseEvent...era quello che chiedeva lui?


 Cosģ puoi vedere tutti i metodi/proprietą
Eh no, non vedi gli eventi che ti genera...
Premesso che non l'ho mai usato, ma se vorresti intercettare l'evento
DownloadComplete (l'ho creato io adesso...) nel tuo caso non puoi (non lo
vedi...).
Mentre se lo dichiari WithEvents vedi
Private sub Winsock1_DownloadComplete()
    Msgbox "Download Completato"
end sub
Ciao
Oz

Puoi farlo anche senza generare un evento, certo non è il massimo della
perfezione nello scrivere codice, anzi :) Cmq leggi il mio penultimo post
di risposta al tuo.


Sinceramente non ho capito se stiamo parlando della stessa cosa...
Un conto è intercettare gli eventi di altri oggetti: o li inserisci in una
form, oppure
in modulo/classe (o nella stessa form se non si vuole vederli) scrivi
Dim WithEvents Oggetto as ....
Un'altra cosa è generare i TUOI eventi in questo modo
Event TuoEvento ()
---
---
---
RaiseEvents TuoEvento
---
---
Ecco un esempio migliore fornito da Omar Venturi
Classe cCell
---------------
Option Explicit
Public Event Ring(ByVal sName As String)
Public Sub CallMySelf()
      RaiseEvent Ring("Chiamata da Walter")
End Sub
---------------
Form con un bottone "cmdCall"
---------------
Option Explicit
Private WithEvents Cell As CCell
Private Sub Cell_Ring(ByVal sName As String)
      MsgBox sName
End Sub
Private Sub cmdCall_Click()
Cell.CallMySelf
End Sub
Private Sub Form_Load()
Set Cell = New CCell
End Sub
Private Sub Form_Unload(Cancel As Integer)
Set Cell = Nothing
End Sub
---------------
Quando richiami il metodo CallMySelf,
Viene Generato l'evento        RaiseEvent Ring("Chiamata da Walter")
che tu puoi intercettare con la dichiarazione   Private WithEvents Cell As
CCell
Ciao Oz