Newsgroup: it.comp.lang.visual-basic
Titolo: affitto barca

affittasi barca da porto di Catania o da isole Eolie settimanalmente
contattare 
dgl...@tin.it

 wrote in message
8e7mr2$32h$1...@serv1.iunet.it...


 hanno bisongo di una barca ?
:):)
oppure lanciano un memo sui waves ?

 wrote in message 8e8113$pur$1...@nslave1.tin.it...

AHAHAHAHHA :-)))))

 Scusate, non sono riuscito a resistere... :))))
Ma no forse voleva dire :
Dim MyBarca as New Barca
MyBarca.affitto = true

 MyBarca.affitto = true
cioe' con 25 istanze (clienti)
riesce a dimmare 25 nuovi oggetti ?
e chi e', l'armatore costa ?
e se gli scappa un set mybarca=nothing
mentre le istanze sono al largo ?

 mentre le istanze sono al largo ?
Un tuffo dove lo schermo è più blu...

oppure lanciano un memo sui waves ?
No, affitta il titanic che poi andrà in GPF (crash) su un'eccezzione (hem,
iceberg) :)
Ciao

Questo ng mi sembra veramente poco serio.
P.es., non ho ancora capito neppure in che linguaggio sia scritta questa
barca e se si tratta di una barca a remi, a vela, o che altro. Insomma, un
po' di professionalità.
----------------------------------------------------------------
Stefano Minardi
zet...@mclink.it
----------------------------------------------------------------

 po' di professionalità.
mi basterebbe gia' sapere se galleggia :)
poi, se e' oop o no, polimorfica o no, chisse' frega, sol che funzi... :):)
un titanic... lascia pure che sia veramente oop... ma insomma, ci faresti
una crociera ? :)
cacchio, siluri roaldini in avvicinamento rapido !!
fuori i falsi bersagli: c++, delphi, jdbc, ecc*= !!
immersione (*) !!
(*) evidentemente *e'* polimorfica.

 mentre le istanze sono al largo ?
Nessun problema. Appena ne richiami qualunque metodo, l'oggetto MyBarca
ricompare. Certo, la proprietà Occupanti va a zero, ma prova tu a restare in
mezzo al mare senza una barca sotto, e poi vedi se non finisci a zero. 8-)
Potrebbe essere un buon sistema per evitare le richieste di rimborso:
Dim MyBarca as New Barca
MyBarca.affitto = true
MyTasche.Valore=MyTasche.Valore + MyBarca.ValoreAffitto
MyBarca.VaiAlLargo
If MyBarca.OccupantiSoddisfatti<>MyBarca.Occupanti then
    Set MyBarca=Nothing
    Sleep 12 ' ore
    MyBarca.Approda AltroPorto
Else
    MyBarca.Approda StessoPorto
Endif
Vuoi vedere che abbiamo risolto il mistero del Triangolo delle Bermude?
Ciao
*Roby*
P.S.
Se invece facevi:
   Dim MyBarca as Barca
   Set MyBarca=NewBarca
Non c'era proprio più niente da fare.

 ricompare. Certo, la proprietà Occupanti va a zero, ma prova tu a restare
in
Scusa, ma secondo me così non funziona. Se l'oggetto dev'essere
esplicitamente creato As New, vuol dire che non è "GlobalMultiuse" e quindi
la distruzione dell'istanza con set mybarca=nothing ci lascia nell'acqua (o
nella cacca, dipende da cosa si naviga).
Se invece fai Dim MyBarca as New Barca e dopo set mybarca=nothing, quando
fai MyBarca.Approda AltroPorto ottieni per forza un errore di automazione,
perché l'oggetto non esiste più.
Per questo proporrei che la classe Barca abbia una proprietà Instancing=6 e
che la relativa DLL sia 'referenziata' nel progetto (early binding). In
questo modo si potrebbero usare i metodi senza dover dichiarare un'istanza
della classe e si resterebbe sempre relativamente all'asciutto, dato che
l'istanza implicita viene mantenuta in vita da VB (sempreché non si faccia
comunque Set Barca = Nothing, una cosa che non ho mai provato).
A questo proposito c'è da dire che le DLL con classi GlobalMultiuse, dopo
lunga esperienza, mi sembrano veramente problematiche in fase di debug.
Spesso VB si rifiuta di tenermi su un progetto e la DLL sia nella stessa
sessione che in due sessioni separate, adducendo questioni tipo che non si
possono passare alle funzioni puntatori a classi dichiarate nella DLL.
Risulta poi del tutto proibito usare un puntatore ad una classe
GlobalMultiuse - cosa normalissima se si lavora con la DLL compilata. (Fra
l'altro, non mi pare che in MSDN si parli di come si fa ad ottenere il
puntatore ad una classe GlobalMultiuse di una DLL: è il nome stesso della
classe, come se ci fosse un implicito Public MyClass as New MyClass
all'avvio del programma.)
Insomma, è triste destino dei programmatori barca-menarsi in ogni
circostanza.
(Detto questo, mi sono bruciato il bonus dei prossimi 5 anni di cazzate.)



mmmmm.... ho provato a far girare il tuo codice ed e' venuto fuori :
"QUESTO PROGRAMMA HA ESEGUITO UN'OPERAZIONE NON VALIDA E SARA' AFFONDATO"
con tanto di msgbox   <Ignora> <Rema> <Nuota>
che fo' ?? clicco ??? :o)
 Ciao
Ven.

 nella cacca, dipende da cosa si naviga).
Ti faccio un esempio così chiarifico. Crea un progetto nuovo con una form di
nome Form1 e 2 CommandButton di nome Command1 e Command2 e poi incollaci
questo codice:
Private Sub Command1_Click()
   Dim MyBarca As New Form1
   MyBarca.Show
   MyBarca.Caption = "La mia barca"
   Unload MyBarca
   Set MyBarca = Nothing
   MyBarca.Caption = "Cucù!"
   MyBarca.Show
End Sub
Private Sub Command2_Click()
   Dim MyBarca As Form1
   Set MyBarca = New Form1
   MyBarca.Show
   MyBarca.Caption = "La mia barca2"
   Unload MyBarca
   Set MyBarca = Nothing
   MyBarca.Caption = "Cucù2!"
   MyBarca.Show
End Sub
Se clicchi su Command1, vedrai che non ottieni nessun errore, malgrado tu
abbia assegnato una proprietà dell'oggetto MyBarca dopo averlo settato a
nothing. Con Command2 invece ti becchi un bell'errore 91 (variabile oggetto
non impostata).
La differenza è che se crei un oggetto con la sintassi "Dim as New", ogni
volta che ci accedi VB controlla se esiste già e se non esiste lo crea. Se
invece usi "Dim As", non fa controlli e se non esiste ti sputa in un occhio.
In effetti quindi la MyBarca sparisce col Set = Nothing , ma ricompare
appena ne viene richiesta una proprietà o un metodo, però con tutte le
proprietà  settate a default. Quindi, niente più occupanti.
Ecco quello che intendevo.
Ciao
*Roby*
P.S.
I bello è che se nel primo caso non fai l'unload prima di settare l'oggetto
a Nothing, ti ritrovi con una barca che veleggia per il mare del desktop
senza controllo. 8-)

 che fo' ?? clicco ??? :o)
non c'e' una func
on mouse hover(craft) ?

 End Sub
[...]

 wrote in message 8ecn9p$3ic$1...@nslave2.tin.it...


 Ma se la barca ha un buco?
be', se e' stata colpita e affondata...
se poi aggiungi i buchi di vb dopo i vari dim as (new) ecc. ...
ormai solo floating points, temo...

Ma se la barca ha un buco?
si dice "baco" ;-)
Ciao,
Moreno
#sirri#@#morenosoft#.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 si dice "baco" ;-)
Ma lo fara' il tipo l'aggiornamento in caso di baco?
Uscira' un service pack?
PS:
ma rilascera' i sorgenti?
- --
- --
Don't let your Fears stand in the way of your Dreams
- --
Elena *DElyMyth* Franco
Revanche IRC Network
irc.revanche.net
 - Nick: DElyMyth
ICQ# 8761263 - 
dely...@lamah.net
 - 
dely...@revanche.net
http://www.delymyth.it/
 - 
http://www.lamah.net/
 -
http://www.revanche.net/
- --
-----BEGIN PGP SIGNATURE-----
Version: PGP 6.5.3
iQA/AwUBOQrLQzrVvGrSrespEQJYGACgpy65TTIHfBt+UYYclBTWm735+BUAni3S
5h5qen6+8rvHxedroB/U8cqJ
=WwX9
-----END PGP SIGNATURE-----

 tipo di oggetto istanziato.
A me non sembra.
Che fai adesso, abbandoni la nave che affonda o continui il combattimento?
8-)
Ciao
*Roby*

 ma rilascera' i sorgenti?
basterebbe rilasciasse i galleggianti
(le istanze della classe clienti)
sempre che lo rilascino i secondini...

 mezzo al mare senza una barca sotto, e poi vedi se non finisci a zero. 8-)
Ho fatto delle prove. La proprietà Occupanti non va a zero, va a 1000, ma da As
Occupanti diventa As MetriSottoSuperficie :-)

 ha scritto


dipende dall'environment
puo' anche assumere la proprieta'
occupante.leonardo-di-ghiaccio
con valori da -60 a -1

 sempre che lo rilascino i secondini...
se il progetto e' in open source, i secondini sarebbero anche quasi
obbligati a rilascarlo ;-P
- --
- --
Don't let your Fears stand in the way of your Dreams
- --
Elena *DElyMyth* Franco
Revanche IRC Network
irc.revanche.net
 - Nick: DElyMyth
ICQ# 8761263 - 
dely...@lamah.net
 - 
dely...@revanche.net
http://www.delymyth.it/
 - 
http://www.lamah.net/
 -
http://www.revanche.net/
- --
-----BEGIN PGP SIGNATURE-----
Version: PGP 6.5.3
iQA/AwUBOQtN6zrVvGrSrespEQJdYwCfT0D6+9eh7yycjrk+psm/K8A7dh4An3Uw
E5r4re+9yVEPoZAh3LEjwBue
=mYJO
-----END PGP SIGNATURE-----

 8-)
Dammi un po' di tempo: ho ordinato un OCX panamense (residuato bellico della
Corea) che dovrebbe ancora essere attrezzato con siluri. La sfida continua!


 A me non sembra.


 per buttarmi a mare, perché con tutte queste barche...
Non ti preoccupare. Il mio motto č: VB e lascia vibere.
Ciao
*Roby*
P.S.
Questa la si capisce solo rileggendo il messaggio almeno 3 volte. 8-)