mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Quesito su ListBox

Ciao a tutti.
Avrei una domandina:
Ho tre (o piu') ListBox nel mio Form ognuna delle quali contiene lo stesso
numero di elementi delle altre.
E possibile fare in modo che scrollando gli elemento con la ScrollBar di una
qualsiasi delle tre (o piu') ListBox, anche le altre si muovano
automaticamente nella stessa direzione e dello stesso numero di elementi?
Non so se mi sono spiegato bene. In pretica vorrei che quando trascino la
ScrollBar di una, anche le altre facciano altrettanto.
Grazie 1000
--
Saluti
Michele
mic...@iol.it
oppure
mc3...@mclink.it

...


 automaticamente nella stessa direzione e dello stesso numero di elementi?
Si, è possibile. Basta che nell' evento list_scroll leggi il primo elemento
stampato della listbox con list.topindex. Poi non ti resta che assegnarlo
alla proprietà topindex delle  altre 2 listbox.
Es:
Private Sub List1_Scroll()
List2.TopIndex = List1.TopIndex
List3.TopIndex = List1.TopIndex
End Sub
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 wrote in message
7j15sf$p6r$1...@nslave1.tin.it...


 wrote in message
7j12ng$7ur$1...@nslave1.tin.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: VB e Triggers SQL

Come si può sapere se esiste o meno un trigger su una tabella da Visual
Basic 6?
Grazie!
Davide.

 
SELECT   
so1.name
 as nome_trigger ,
so2.name
 as tabella  FROM 
[dbo].[sysobjects]  as so1 inner join sysobjects as so2 on 
so1.parent_obj=
so2.id
WHERE so1.type='TR'
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

 ha scritto nel messaggio
news:c36qi1$gf9$1...@fata.cs.interbusiness.it...

ciao,
se ti riferisci a Ms SqlServer puoi richiamare la stored procedure
sp_helptrigger
-----------------------------
Rs.open "EXEC sp_helptrigger 'NomeTabella'",Connessione
------------------------------
ti verrà reso un recordset con tante righe quanti i trigger della tabella,
la prima colonna "trigger_name" contiene il nome del trigger
ciao Giorgio
Newsgroup: it.comp.lang.visual-basic
Titolo: Unload Form in .exe

La mia applicazione è composta da un form MDI e da molti form che sono stati
resi Child tramite l'API SetAsParent.
Tutto funziona perfettamente in ambiente VB, ma quando creo l'eseguibile
succede che all' unload di certi form mi dà un errore in USER.EXE e si
chiude il programma.
Non so dove mettere le mani, nel frattempo ho risolto rendendo semplicemente
i form invisibili al posto di scaricarli, ma vorrei capire dov'è il
problema.
Ancora un'altra cosa ......
Ho due form all'interno di un form MDI, per uno ho settato la proprietà
MDIchild=true e per l'altro utilizzo la finzione SetAsParent per confinarlo
all'interno del MDIForm.
Se sul form MDIChild imposto la proprietà enabled di un Command Button a
false dal FormMDI, questo viene caricato e reso visibile automaticamente,
mentre per il secondo non succede.
I due form hanno gli stessi controlli e lo stesso codice e, anche impostando
la proprietà visible = false sul primo, questo viene caricato e reso
visibile lo stesso.
Mi hanno scritto dicendomi :
"""""""""
Alle volte mi chiedo perchè si cerchino soluzioni tanto complicate...
supposto che form1 sia il tuo form...
    With Form1
        .Command1.Enabled = False
        .Hide
    End With
ciao
"""""""""
ma non funziona cosi, infatti .....
creo un form MDI, gli inserisco un form child Form1 con un Command1 e nel
load del MDI metto quelle righe di codice .. ma quando lancio il programma
succede la stessa cosa.
Come risolvo il problema ?
Grazie a tutti.
Ciao, Claudio.

problema.
sara' meglio !
Forse il crash dipendere dalla SetParent, che confonde le idee a vb sulla gestione
del form mdi.
Prima di scaricare i form che sono stati "apparentati", prova a "sparentarli".
ciao, hal


 ha scritto nel messaggio
news:9e5itv$16k5q$1...@ID-56381.news.dfncis.de...


 ha scritto nel messaggio
news:9e5itv$16k5q$1...@ID-56381.news.dfncis.de...


 problema.
Insisto, la SetParent è tanto carina ma dovrebbe essere usata per
applicazioni particolari (come tutte le Api...). Dal momento che hai a
disposizione soluzioni -interne- al linguaggio (.MdiChild, .Hide...), usale.
Credimi, è meglio.
ciao
ugo

Cosa devo fare nell'unload per sparentarli ???
Prova a fare il contrario e poi facci sapere:
// nel modulo bas
Public Function FreeParent(ByVal hWndChild As Long) As Long
    If (hWndChild = 0) Then Exit Function
    Dim WL As Long
    WL = GetWindowLong(hWndChild, GWL_STYLE)
    SetWindowLong hWndChild, GWL_STYLE, WL And Not WS_POPUP
    FreeParent = SetParent(hWndChild, 0&)
End Function
// nel form
Private Sub Form_Unload(Cancel As Integer)
    FreeParent Me.hwnd
End Sub
hth, hal

 ha scritto nel messaggio
news:9e5r4o$14o62$1...@ID-56381.news.dfncis.de...


 ha scritto nel messaggio
news:9e5n2u$c4r$1...@pegasus.tiscalinet.it...


sull' USER.EXE. Non so piů dove mettere mano.
Metti la scrittura di un log nell' evento terminate dei form 
e delle classi, cosi' riesci a sapere qual e' l' oggetto che non si distrugge.
In particolare sorveglia: riferimenti non rilasciati ad oggetti, dichiarazioni withevents,
api, eventuali controlli non intrinseci di vb.
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] label di più colori: come?

vorrei avendo un'unica label, con + colori:
esempio:    oggi è proprio una bella giornata!
                     \__________/\______/ \______/
                      colore rosso     giallo       verde
come posso fare per settare i colori diversi??
grazie cac


Con il controllo Label non si puo'.
Alternative:
1. Usare il metodo Print del form, impostando di volta in volta la proprieta' Forecolor;
2. Usare un rtf in sola lettura, ma sarebbe uno spreco usarlo solo per questo.
ciao, hal

Non ti risolvo il problema ma ti suggerisco qualcosa di carino:
inserisci in un form un timer ed una label setta l'intervallo del timer a 1
e il BackColor della label a &H00FFFFFF& e il ForeColor a &H0& (Caption
"Quello che Vuoi") poi all'evento Timer1_Timer() inserisci questo codice:
Private Sub Timer1_Timer()
Dim BColor As Long
Dim FColor As Long
BColor = Label1.BackColor
FColor = Label1.ForeColor
If Not Label1.BackColor <= &HFFF& Then
    Label1.BackColor = BColor - &H9&
Else
    Label1.BackColor = &HFFFFFF
End If
If Not Label1.ForeColor >= &H8FFFFF Then
    Label1.ForeColor = FColor + &H12&
Else
    Label1.ForeColor = &H0&
End If
End Sub
--
Franco A. Politano -- Luvme2times
"Love me two times babe | I'm going awayyyy"
J.M.D.

Newsgroup: it.comp.lang.visual-basic
Titolo: Manuali VB 60 i Migliori??

Quali sono i migliori manuali in vendita per VB6.0 in italiano??

 wrote in message
news:379457ca...@news.interbusiness.it...



wrote:


v firma
Ciao,
Moreno
#sirri#@
morenosoft.com
(togliete "#" dall'indirizzo)
Moreno Sirri VB Site - 
http://www.morenosoft.com/MSVBSite/
Home Page - 
http://www.geocities.com/SiliconValley/Bridge/1414/
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 quale è l'indirizzo?
Ciao


Newsgroup: it.comp.lang.visual-basic
Titolo: INDICE DI UNA TABELLA

come faccio a ordinare automaticamente i valori di una colonna utilizzando
gli indici?

In SQL?
SELECT * FROM TABELLA ORDER BY COLUMN_ID
dove column_id è l'indice
comunque in generale clausola order by di SQL
Se non in SQL cerca di essere più preciso
ciao
Lorenzo

 ha scritto nel messaggio
news:Pmn4a.130396$ZE.37...@twister2.libero.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Problemi con le compilazioni !!

Il VB quando compila un eseguibile o una dll non lascia niente
aparte il file compilato e io mi chiedevo se fosse possibile avere
anche i file di intermezzo come un obj.
Così potrei compilarlo con il VC o il MASM per avere più velocità!!

 Così potrei compilarlo con il VC o il MASM per avere più velocità!!
nonononono, mi spiace ma la velocità è la stessa. Ogni programma di Visual Basic
deve fare tante di quelle chiamate alla libreria di runtime, ma tante, ma tante
che vien da chiedersi cosa faccia davvero di per sè. Piuttosto crea obj in ASM o
C++ e sostituiscili a quelli "veri" (occhio ai decorated name, sono
completamente diversi) scritti in Visual Basic

Per avere questo genere di utilità mi pare che l'unica soluzione sia quella
di utilizzare un Subclasser compiler (se lo vuoi te lo posso mandare).
Ti permette di fare molte cose che normalmente non si possono fare (per
esempio compilare una DLL vera)
Scrivimi
-----------
Ciao
Sabba

Newsgroup: it.comp.lang.visual-basic
Titolo: (BG) Visual Basic 4.0

Vendo pacchetto originale completo di manuali e licenza d'uso di Visual
Basic 4.0 Professional (versione upgrade, in italiano), unitamente al CD-ROM
SET di Visual Basic 4.0a Enterprise (versione full, in italiano). Lire
350.000.
Per informazioni: 
an...@mediacom.it







Vendo pacchetto originale completo di manuali e licenza d'uso di Visual...
...8 volte.
In questo canyon c'č una eco incredibile!
--
-
MIX (VB5SP3)
post...@yahoo.com
60 links ai siti VB
http://space.tin.it/computer/gaais
http://www.tempolibero.com/user/mix/
 (alternativo)
-

Newsgroup: it.comp.lang.visual-basic
Titolo: sempre hwnd e vb... che cazzata ho detto..

prima di tutto grazie per avermi risposto come recuperare l'hwnd di una
finestra... 'mo c'cho un little problema:
Il mio intento sarebbe questo:
Recuperare in vbscript, javascript, pipposcript o quello che si vuole,
l'hwnd dell'explorer dove gira la mia pagina (il pratica l'hwnd del client)
Ho visto su microsoft che esiste l'oggetto InternetExplorer che mi
permetterebbe di fare questo grazie alla proprietą HWND (se volete darci
un'occhiata:
http://msdn.microsoft.com/library/default.asp?url=/workshop/browser/webbrows
er/reference/objects/webbrowser.asp)
ma non mi riesce di farlo funzionare!!!
Il tutto mi servirebbe per fare in modo che un utente non apra la stessa
pagina su due browser (grazie all'ip ed al hwnd, inserisco nel db e faccio
questo controllo quando apre la pagina. OnUnLoad faccio il delete della riga
inserita.)
HELP mE!!!!
Cris

 questo controllo quando apre la pagina. OnUnLoad faccio il delete della
riga
questo con cosa lo fai?
Ciao
--
Timothy Redaelli
[MANIFESTO] Cercalo e dacci un'occhiata!!!!!!

Trovato e fatto... grassie!
Cris
Newsgroup: it.comp.lang.visual-basic
Titolo: dbf versus mdb

Salve
Domanda da profano:
quali sono i vantaggi, usando visual basic, nell'impiego di un database
relazionale come access al posto di un db dome DBIII? In access ho più
tabelle relazionate fra loro in un unico db. In DBIII potrei avere le stesse
tabelle in tanti file dbf, conoscendo le relazioni fra le tabelle avrei lo
stesso risultato. O no? Oppure ci sono altri vantaggi?
Grazie per la risposta!!

 Grazie per la risposta!!
personalmente, pur arrivando da clipper, ho velocemente convertito i dbf in
mdb.
qui mi sembra di aver visto alcuni nodi sgradevoli nell'uso vb/dbf:
- salvo lib esterne perdi gli indici clipper (vb gestisce ndx/mdx, credo)
- non gestisci o gestisci male i deleted
- non hai il pack, quindi ti devi tenere un dbase a bordo.
--
ciao, j.
www.sundaysw.com
Newsgroup: it.comp.lang.visual-basic
Titolo: Winsock e porte

Salve Ragazzi!!!
-Volevo sapere qualè il modo per sapere se una porta di comunicazione è già
utilizzata da un'altra applicazione (e quindi non è disponibile)
-esiste un modo per chiudere la porta incondizionatamente?
          Grazie
         Marco


non sono sicuro ma penso che da lato server basta provare a fare il
Listen su quella porta se si genera un errore e' molto probabile che la
porta sia gia in uso da un altro server, probabilmente esiste anche il
codice d'errore specifico, per provare basta chec lanci due istanze
dello stesso programma e vedi cosa succede al listen della seconda
istanza.
chiudere un socket attivato da un altro programma penso che sia
impossibile l'unica cosa per evitare che un altro programma si
impossessi di un socket e' prevenirlo lanciando prima di lui in
programma che faccia il listen

Newsgroup: it.comp.lang.visual-basic
Titolo: Ma da dove vengono i data provider installati sulla macchina ?

Sto cercando informazioni sui data provider installati...
mi spiego meglio. Ho creato una applicazione che usa dataenvironment.
Siccome il DB a cui č collegato deve essere specificato a runtime, ho
fornito tali informaizioni per la connessione al from load... ebbene tutto
sembra funzionare ma sulla macchina target ho un problema.
Siccome il mio programma usa .....Jet.3.51 Sulla macchina target tra i vari
data provider Jet 3.51 non c'č.
Il problema č a questo punto: ma i data provider installati chi li ha
installati ??? Come si fa ad installarne dei nuovi ? Dove si trovano queste
informazioni ? Tante domande a cui non riesco a trovare risposta neanche
nella documentazione on-line.

I provider ole db dovrebbero essere installati quando esegui l'installazione
degli Active Data Objects, almeno credo!
Comunque, anch'io ho tentato di installare un piccolo eseguibile che usava
un oggetto connection di ADO 2.1 nel quale facevo rifermento a Jet 3.51 e
non ha funzionato. Risultato: ho cambiato il nome del provider nella stringa
di connessione con Jet 4.0!
Probabilmente l'ADO 2.1 non installa piu' la versione Jet 3.51.
Purtroppo, pero', sono solo mie supposizioni.
Ciao

 Purtroppo, pero', sono solo mie supposizioni.
No... è il mondo Microsoft che è così... infatti ho creato il pacchetto di
installazione su una macchina cha ha i provider Jet3.5 e 4.0, ma quando
installo il programma sulla macchina nuova, (tra l'altro nel pacchetto di
installazioen viene incluso mdactyp.exe un file di 6 mb con ado ecc ecc) il
provider Jet 3.5 non viene installato.
Il fatto è che con i data provider e tutta la tecnologia implicata è
difficile capire come installarne dei nuovi.
Tutto questo ovviamente è causato dalla scarsa documentazione a
disposizione.
In ogni caso ,siccome il progetto che ho sviluppato è un prototipo, il
progetto definitivo lo farò utilizzando DAO che conosco piuttosto bene e di
documentazione ne ho in abbondanza. Sai quando conosci i tuoi polli :-)...
Ciao.
Newsgroup: it.comp.lang.visual-basic
Titolo: Colorare testo o righe in una true dbgrid

Ho una True dbGrid che contiene i componenti di un'impianto tra i quali
potrebbero essere presenti dei componenti in 'garanzia'.
Io vorrei poter evidenziare questi componenti in garanzia in qualche modo
(testo rosso o sfondo rosso..... poi si vedrà).
Naturalmente quando mi sposto da un cliente all'altro vedo i vari componenti
ma non so come e dove inserire la funzione che mi faccia sto lavoro.
Qualcuno mi può aiutare?
Grazie, Alberto

 wrote in message
jHzn6.33961$Yx4.1...@news6.giganews.com...


Grazie...... ci provo

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Come accedere dinamicamente alle proprieta' di un controllo

Non sono neanche certo che sia possibile quello che vorrei ottenere, pero'
boh a me pare di avere visto una volta in un sorgente qualcosa di simile
solo che non ricordo bene.
Io creo dinamicamente un controllo usando l'istruzione:
Set MioControllo = Controls.Add( _
   ClasseControllo, NomeControllo)
dove ClasseControllo puo' essere una cosa del tipo "Vb.optionbutton" e
NomeControllo e' il nome che gli assegno (esempio: "Option1")
A questo punto io posso accedere alle proprieta' standard del controllo come
.left .top .height ecc. senza problemi.
Il fatto e' che io voglio anche accedere a proprieta' che possono essere
specifiche di un controllo ma assenti in un altro come ad esempio la
"caption" o "text" che esiste o meno a seconda del controllo.
Quello che vorrei ottenere e':
avendo una stringa contenente la descreizione della proprieta', tipo
"caption" poter scrivere la proprieta' caption usando quella stringa che la
contiene.
In pratica io avrei in input due stringhe:
NomeProprieta  (che potra' essere di volta in volta: "caption" "tooltiptext"
"text" ecc.)
e
ValoreProprieta che e' quello che inseriro nella proprieta'
E' possibile?
ciao
Paolo B.

 contiene.
Non ho ben capito a cosa possa servirti una cosa del genere, comunque lo
puoi fare solo con VB6 con la funzione CallByName().
Ciao
--
using System.Gtk.Forms = "
http://www.neodatatype.net/windowsforms/sgf.aspx
"
mathParser = "
http://www.neodatatype.net
"
sitoComune = "
http://www.it-lang-vb.net
"


Per fortuna ho Vb6. :-)
Riguardo al cosa possa servirmi...
Sto facendo un programma per tradurre sorgenti vb, in pratica semplicemente
un programma che assiste nella gestione delle stringhe con funzioni
ottimizzate rispetto al semplice trova e sostituisci dell'ide.
Quando pero' devo sostituire un testo che sara' presente in una caption o
label (di un frame) mi e' utile vedere il controllo nella giusta dimensione
per evitare che inserendo una stringa troppo lunga non sia piu' visibile in
modo corretto e cosi' il programma quando modifica proprieta' stabilite in
fase di progettazione crea e visualizza il controllo con la dimensione
originale e mostra la stringa mano a mano che la edito.
grazie per l'info
ciao
Paolo B.
Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo TREEVIEW

devo per forza costruire tutti i rami via codice?Non e' possibile
assegnare alla route un oggetto che e' gia' un albero ( tipo le
cartelle di OUTLOOK) e far si che se la generi da solo?
grazie
Ciao
Pellati Fabio
Consulente in informatica
(FERRARA)

e far si che se la generi da solo?
un albero di cosa? directories, newsgroups, apples?
Le cartelle di OUTLOOK sono oggetti di tipo diverso dai nodi di una
treeview, lo stesso vale per le directories, i newsgroups e le mele.
Per cui, ti devi fai tutto a mano.
--
Roal Zanazzi
z...@iol.it

...

sEI uN gRANDE
bY rAFFA vB pROGRAMMER'S

Newsgroup: it.comp.lang.visual-basic
Titolo: lanciare

Ragazzi aiutatemi a lanciare un file da visual basic!!! il comando
shell mi dice che sbaglio la chiamata a procedura (anche se lancio il
file da una procedura guidata)
Dim stAppName As String
    stAppName = "D:\correcto.xls"
    Call Shell(stAppName, 1)
Puó essere che non sono linkate la libreria giusta  ? GARZIE ;)


Shell funziona solo se lo usi con file eseguibili (almeno credo). Se vuoi
lanciare l'applicazione associata ad un file dati prova nelle dichiarazioni
    Declare Function ShellExecute Lib "shell32.dll" Alias _
         "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As _
         String, ByVal lpFile As String, ByVal lpParameters As String, _
         ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long
   Global Const SW_SHOWNORMAL = 1
e poi nel codice
    Dim Retval As Long
    Retval = ShellExecute(lWindow, vbNullString, nome_file_da_aprire,
vbNullString, "", SW_SHOWNORMAL)
Ciao
-- 
Fabio
http://www.codice.it

Newsgroup: it.comp.lang.visual-basic
Titolo: installare VB .NET

non riesco a installare VB .Net perchè mi compare questo messaggio:
Please insert the Visual Studio .NET Prerequisites disk for Visual
Basica .NET
Come mai?


Perche' ti manca il CD con i prerequisiti richiesti per installare Visual
Basic .NET...
-- 
Corrado Cavalli [Microsoft .NET MVP-MCP]
UGIdotNET - 
http://www.ugidotnet.org
Weblog: 
http://www.ugidotnet.org/710.blog

 Please insert the Visual Studio .NET Prerequisites disk for ...
Perfavore inserire il CD "Visual Studio .NET Prerequisiti" se non lo fai non
si installa
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Messaggio di OLE DB MS JET

Premetto che ho usato collegamenti ad Access con ADO.
Quando carico Form7 con Form7.Show, prima di lui, si apre una finestra con
 "Inserire le informazioni di inizializzazione di OLE DB MS JET"
e contiene TextBox con Origine dati, Nome utente, Password, Stringa
provider,
Modalità apertura, e la possibilità di confermare o uscire.
Ho risolto con:
SendKeys "{ENTER}"
Load Form7
Vorrei sapere da dove salta fuori quella finestra, anche perchè in quel
Form,
non ho usato collegamenti ad Access. :-(((  Vi è mai capitato?
Grazie!


Postaci la connectionstring che usi
ciao
ugo

> Postaci la connectionstring che usi
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=Magazzino.mdb;Persist Security
Info=False
Ciao

 ha scritto nel messaggio
news:0Dno7.56903$ul3.2...@news.infostrada.it...

Altra ipotesi: sul Form7 c'è qualcosa che faccia riferimento a oggetti ado
assortiti?
ciao
ugo

 assortiti?
No!  :-(
Grazie ugo


Ma daiiiii...  qualcosa ci deve essere...
Dicci qualcosa in più...
ciao
ugo

> Dicci qualcosa in più...
Quando ho copiato il Form, c'erano dentro dei controlli e li ho cancellati
tutti e
nelle routine ho controllato tutto.
Probabilmente mi sfugge qualche caz.....tina e.............quando ho più
tempo
lo rifaccio nuovo.
Grazie ugo e ciao

Newsgroup: it.comp.lang.visual-basic
Titolo: Re: numero righe in una label

>>Inserito da 
http://www.forumsforyou.com/p/it.comp.lang.visual-basic/
Ciao, il colore grigio è determinato dalla proprietà Enabled
La proprietà Locked lascia il colore, ma, cliccando, si vede il cursore che lampeggia.
Non è meglio gestire il testo in una variabile e lasciare la Label ?
----------------------------------------
Inviato da 
http://www.forumsforyou.com
Segnala gli abusi ad 
ab...@forumsforyou.com


scusa, non ho ben capito
il testo è già memorizzato in una variabile
esso può essere di lunghezza random, ed io vorrei in base al testo calcolare 
l' altezza da dare alla label (la larghezza è fissa), la più bassa possibile 
affinché possa contenere tutto il testo
mi serve chiaramente sapere il numero di righe... o no?

 ha scritto nel messaggio
news:43fdaa3d$0$28069$4faf...@reader1.news.tin.it...

Ehm... ma hai provato ad impostare AutoSize=True e WordWrap=True per la Label?
Così ci pensa lei automaticamente a ridimensionarsi in ALTEZZA, mentre la
larghezza rimane FISSA.
Bye
Raf

 mi serve chiaramente sapere il numero di righe... o no?
Mi pareva che il *vero* problema dovesse essere un altro ;)
Ciao
-- 
Free .Net Reporting Tool - 
http://www.neodatatype.net
 


si....... peccato che la label, datosi che il testo č composto da un unico 
periodo, senza vbcr,  si ridimensioni in LARGHEZZA, uscendo a piacere dal 
form
č bensě vero che potrei fare in modo che il form possa allargarsi in 
conseguenza.. ma io voglio arrivare al contrario, cioč che si adatti alla 
ALTEZZA della label 

 form
No, se metti AutoSize = True fa properio quello che cerchi tu.
Ciao 

 Ciao
porrrcccccc.......... è vero, devo aver fatto qualche cappella prima
grz
Newsgroup: it.comp.lang.visual-basic
Titolo: Napster con visual basic

Salve a tutti sto realizzando una specie di napster da utilizzare fra amici
per condividere e scambiarci files. Qualcuno di voi mi saprebbe indicare
dove posso trovare i sorgenti di napster oppure di qualcosa di
simile?!?!?!?!
Grazie e se mai riuscirň a finirlo sperň che anche voi vi uniate a noi!!!!

 Grazie e se mai riuscirò a finirlo sperò che anche voi vi uniate a noi!!!!
Io vorrei i sorgenti di windows, dove li posso trovare? :-)))))
:-)

 :-)
dipartimento di giustizia, credo washington state.
--
jav...@libero.it
http://digilander.iol.it/javalab

napster oppure di qualcosa di simile?!?!?!?!
A che ti serve il codice
di napster...non che facesse grandi cose (tranne mettere una progress bar
in una listview...ma come cock ha fatto?!? non ho mai capito) per il
resto...procedi per la tua e fai un bel programma client/server :)
Hai un
server a cui far collegare tutti quelli che usano il tuo programma? Se ce
l' hai hai risolto gran parte del problema. Io ad esempio stò facendo una
cosa simile...e ho usato un barbatrucco; una shell!! Così riesco a far
collegare due persone tra di loro (non medianta la shell) e far si che si
vedano uno con l' altro. Sono semplicemente un genio :P
Saluti...
--------------------------------
Inviato via 
http://usenet.iol.it
 

capito)
la listview "vera" ti da' il rect di ogni singola cella

 ha scritto nel messaggio
news:151Z24Z140Z233Y...@usenet.iol.it...


>bravo, sei proprio un genio!
Dove stà la parte sarcastica?


 :-)
void WinBoot()
{
    while(!Crash()){
            TryToCrash();
            SendCopyrightMessage();
            LoseTime();
            while(User_is_waiting){
                SendBlueScreenMessage();
                RaiseCriticalError();
            }
            if (System.Kernel!=Null){
                Kill(AllProcess);
            }
    }
}
:-)

Newsgroup: it.comp.lang.visual-basic
Titolo: connessione a Internet

c'è qualcuno che mi sa dire come faccio a controllare lo stato della
connessione a internet
vorrei fare un programma che mi dice quando sono connesso e mi fa una
tabella con l'elenco delle connessioni
grazie

...

Sul Sito Comune, in Piccole Perle c'e' un articolo che tratta del RAS. Prova
a dare un'occhiata.
http://www.murialdo.it/it_lang_vb
Ciao
By -MES-   Maronese Ettore
http://www.maronese.com/mes
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb
Newsgroup: it.comp.lang.visual-basic
Titolo: aiuto mancante

Salve a tutti. Il mio VB5 da oggi ha deciso che non deve piu' darmi gli
aiuti contestuali !! Se mi posiziono, in fase di debug,  su una variabile e
resto fermo per qualche secondo, prima mi compariva l'etichetta che mi dava
il valore della variabile stessa ora invece niente !!! Per vederne il valore
devo inserirla nel controllo immediato.
Sapete dirmi cosa e' successo e come rimediare ?
Grazie

 devo inserirla nel controllo immediato.
Mi riferisco a VB6: Prova a vedere Strumenti, Opzioni, Scheda Editor (varie
opzioni, in particolare Descrizione dati automatica)

Newsgroup: it.comp.lang.visual-basic
Titolo: Utilizzo file .res

Esite qualche funzione che mi permette a run-time di inserire delle bmp in
un file .res, in modo che possa poi recuperarle con la LoadResPicture ?
Thanks.

 un file .res, in modo che possa poi recuperarle con la LoadResPicture ?
non credo proprio
si tratta infatti di andare a modificare il codice stesso dell'eseguibile;
roba da lamer ;)
--
Fibia "Sakamoto" FBI
E-mail: 
fibi...@hotmail.com
ICQ UIN 63586057
Sito Personale: 
http://www.geocities.com/fibiafbi
VB Simple: 
http://vbsimple.virtualave.net
Membro #26 delle Mitiche Brigate Takahashi sezione Sud

 writes:
FF> roba da lamer ;)
No. Per nulla. Un lamer per definizione non ha le capacità tecniche.
Sono d'accordo comunque che il codice automodificante è una tecnica da
evitare perché rende il codice illeggibile (cercati "History Of Mel").
Ricordo che nei VxD di Windows 9x c'è codice automodificante...
--
Gian Uberto| main(){printf(&unix["\021%six\012\0"],(unix)["have"]+"fun"-0x60);}
Lauri      |                        David Korn, 1987 ioccc best one liner 
(aka saint)|-------------------------------------------------------------------
em@ail: 
sa...@eng.it
 ( vedere X-nospam nello header - see X-nospam in header )
Newsgroup: it.comp.lang.visual-basic
Titolo: Subclassing

* List: 
vb-...@ulisse.penteres.it
Salve a tutti.
    Ho realizzato un controllo che posizionato su una form permette di
ridimensionare i controlli
    all'interno della stessa in modo da rendere le applicazioni indipendenti
dalla risoluzione.
    Il problema che mi trovo a dover affrontare è che attualmente vi è una
proprietà del controllo
    da valorizzare a cura del programmatore che indica la form da
subclassare.
    La domanda è quindi: è possibile, durante l'inizializzazione del
controllo sapere l'handle della
    form su cui si trova. Un qualcosa del tipo Me.Parent. Faccio presente
che la mia necessità e di
    sapere la form su cui si trova altrimenti il controllo, se posizionato
ad esempio su una Picture,
    effettua il ridimensionamento degli oggetti all'interno della picture.
    Come sempre vi ringrazio.
    V.DeCristofaro
    Solene SW
 
en...@fastcom.it
                 Visual Basic Tips & Tricks ML
 
http://www.beginend.com

    effettua il ridimensionamento degli oggetti all'interno della picture.
Mi sembra giusto. Se lo si mette nella form, corregge la form, se lo si
mette nella picturebox, corregge la picture box.
Per il resto, non so aiutarti.
Ciao
By -MES-   Maronese Ettore
http://ilmes.freeweb.org
(con OCX per stampare i recordset)
Sito Comune di programmatori Visual Basic
http://www.murialdo.it/it_lang_vb

    effettua il ridimensionamento degli oggetti all'interno della picture.
Scrivi nell'evento UserControl_ReadProperties:
Set objP = Parent 'Per conoscere il Parent: senza Me.!!!
Set objC = Extender.Container 'Per conoscere il contenitore
Saluti da Mauro - Personal e-mail: 
mau...@geocities.com
VB-TIPS sito e ML: 
www.beginend.com
My Home: 
www.geocities.com/SiliconValley/Network/1636/

Newsgroup: it.comp.lang.visual-basic
Titolo: eseguibile

Esiste una compilazione in VB 6 tale che l'eseguibile sia trasportabile su
un' altro pc privo di pattaforma VB?
In ogni caso chi mi dice in modo preciso quali file, DLL, OCX ... devo
portare (e sotto quali cartelle) affinche possa far girare un pgm in VB su
un altro pc?
Grazie
Daniele

un altro pc?
Usa l'autocomposizione installazione (Setup Wizard): te lo dice lei.
Ciao,
Moreno
#sirri#@
tin.it
(togliete "#" dall'indirizzo)
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------

 No.
 Si! (anche se viene un po' lunghino) ..
www.spippolatori.com/download/si2.zip
  .. ;-)

OK, OK, ma lui intendeva dal compilatore VB, non da programmi esterni.....
Comunque, visto che ultimamente se ne parla parecchio, com'è che funziona questo programmino?
(e non dire, vai a scaricartelo, dai..... ^__^)



E se io non volessi creare un exe autoinstallante? Che dll e/o ocx
devo includere?


O_O Quando l'ho consigliato io nessuno mi ha dato retta.....
Cmq scaricatelo, c'è il manuale che il caro Master ha scritto con tanto
amore ^_^
Ciao


1 a 100.000 che ora che l'hai consigliato tu vanno a scaricarlo tutti :)

amore ^_^
Ecco, te pareva, bisogna sempre fare le cose da soli, uffa..... :-)))



Una volta un tale disse: aiutati che Dio ti aiuta ^_^

Newsgroup: it.comp.lang.visual-basic
Titolo: domanda facile facile sulle textbox

ciao a tutti
allora, ho un problema che per me č insormontabile, ma immagino che
per voi sia piů semplice...
vorrei utilizzare delle textbox nelle quali l'utente possa immettere
solo una stringa di numeri e non di caratteri alfabetici o simboli...
come faccio?
 
ciao
e grazie
=====
ant Don't eat the yellow snow
icq 78052237
__________________________________________________
Do You Yahoo!?
Yahoo! Messenger - Talk while you surf!  It's FREE.
http://im.yahoo.com/
-- 
Posted from 
web2105.mail.yahoo.com
 [128.11.68.249] 
via Mailgate.ORG Server - 
http://www.Mailgate.ORG

 ciao
Soluzione 1:
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If KeyAscii < &H30 Then
    KeyAscii = 0
  ElseIf KeyAscii > &H39 Then
    KeyAscii = 0
  End If
End Sub
Soluzione 2:
Private Sub Text1_KeyPress(KeyAscii As Integer)
    If Not IsNumeric(Chr$(KeyAscii)) Then KeyAscii = 0
End Sub
E mi fermo qui ...
Ciao
Aldo

Newsgroup: it.comp.lang.visual-basic
Titolo: software grafico

Qualcuno ha mai inserito in un suo programma VB un controllo che integri le
funzionalità di qualche software grafico tipo photopaint, coreldraw, etc.?

 wrote in message
DzRN5.7484$BF.2...@news.infostrada.it...
: Qualcuno ha mai inserito in un suo programma VB un controllo che integri

:
:
Newsgroup: it.comp.lang.visual-basic
Titolo: salvare una listview in una variabile

ciao volevo sapere se era possibile salvare la listview (come oggetto) e 
tutti gli elementi che stanno dentro, in una variabile, magari del tipo 
listview e poi caricarla in un seguente momento...grazie mille
ciao a tutti 

MrMaster wrote:

Da dove provengono i dati che mostri nella listview?
Se provenissero da un ADODB::Recordset potresti sfruttare la persistenza
di quest'ultimo con il relativo metodo Save (comodissimo).
-- 
ciao, hal

 listview e poi caricarla in un seguente momento...grazie mille
Cosa intendi per "secondo momento"?
Ciao

 ha scritto nel messaggio 
news:hiOId.750728$35.29...@news4.tin.it...


 
ha scritto nel messaggio news:TiOId.5532$2h5....@tornado.fastwebnet.it...


 grazie mille
traducila in italiano corretto, non ho capito un accidente,
grazie diecimila ;-)
-- 
ciao, hal

 
ha scritto nel messaggio news:XsOId.5546$2h5....@tornado.fastwebnet.it...


 elementi)
Quindi salvi gia' gli elementi nella listview, senza utilizzare una
struttura dati disaccoppiata: IMHO il problema e' qui.
Ti serve una classe che gestisca i dati ed una che li renderizzi a 
video, nel tuo caso caricandoli nella listview.
I passi percio' sono:
1. aggiungi il nuovo indirizzo all'oggetto che gestisce i dati;
2. chiedi a tale oggetto i dati ultimi inseriti e li aggiungi alla listview.
Internamente alla classe di gestione dei dati, ne gestisci la 
persistenza, svincolata dalla modalita' di rappresentazione a
video: oggi e' una listview, domani sara' un'altra cosa, magari
una pagina html.
Per la persistenza ti serve una struttura dati che puo' essere
un array di type o una collection e scrivere una funzione di
salvataggio/caricamento verso disco. Se puoi usare ADO, creati
un Recordset disconnesso in RAM e sfruttane i metodi Save e Open.
-- 
hth, hal


Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Esiste un API per trovare il path di un file..??

Salve vorrei sapere se esiste una funzione API che data una stringa
es:
c:\window\system\pippo.ocx
mi restituisca il path del file:
c:\windows\system...
è un aquestione di pigrizia....=) nonho voglia di fare la funzioncina...

Ecco la funzioncina: sia perc$ la stringa contenete il percorso+file
lu = Len(perc$)
For t = lu To 1 Step -1
   a$ = Mid$(perc$, t, 1)
   If a$ = "\" Then
                  posizione = t
                  GoTo Prosegui
   End If
Next t
Prosegui:
If posizione = 3 Then
                     perc2$ = "c:\"
                 Else
                     perc2$ = Mid$(perc$, 1, posizione - 1)
End If
allora perc2$ è la stringa del percorso.
Questa era una famosa DeiAPI.

Newsgroup: it.comp.lang.visual-basic
Titolo: Cambiare il cursore di una richtextbox

In 
vb.net
, come faccio per cambiare il cursore ad una richtextbox?
CURSORE, non puntatore!
Mi serviva quello che ha anche il prompt dei comandi
grazie
Daniele

 Mi serviva quello che ha anche il prompt dei comandi
Non ne ho idea :)
Non so se in .Net si possa fare direttamente, eventualmente prova con le 
funzioni relative:
http://msdn.microsoft.com/library/default.asp?url=/library/en-us/wceshellui5/html/wce50grfcaretfunctions.asp
La CreateCaret() credo sia quella che faccia al caso tuo.
Ciao 

 Ciao
Ok grazie ora provo

Newsgroup: it.comp.lang.visual-basic
Titolo: File di testo mascherati

Ho bisogno di creare dei file di testo in visual basic che aperti con
notepad non mostrino il loro vero contenuto,...
Sapreste indicarmi dovre trovare una routine per la crittazione dei suddetti
??
Grazie
RISPOSTE IN E-MAIL
--
+---------------------------------------------------+
  Msg sent by:
    Marco Cattaneo (Marko)
    E-Mail(1): 
ma...@marko.org
    E-Mail(2): 
ma...@rosenet.it
    ICQ UIN: 27130980
MarkoSoft Site's Webmaster
 Visit it at: 
www.marko.org
+---------------------------------------------------+


beh io ti rispondo sul NG....=)

Sapreste indicarmi dovre trovare una routine per la crittazione dei


Newsgroup: it.comp.lang.visual-basic
Titolo: Cercare un file su intero HD come usare "DIR"

Ciao a tutti,
dovrei cercare un determinato file su un'intero HD o meglio su una
determinata cartella ma la ricerca si deve estendere anche a tutte le
sottocartelle.
La funzione DIR invece controlla solo che il percorso specificato sia
esistente.
Come devo fare per cercare la presenza di un file di cui conosco il nome ma
non l'intero percorso?
Sperando che voi possiate aiutarmi vi saluto tutti.
Ciao da Emiliano - Webmaster di EMILANDIA - Tutto per AutoCAD
N° ICQ = 112631114
ligh...@tin.it
http://digilander.iol.it/emilandia

 ha scritto nel messaggio
news:9nq8dq$hhb$1...@nreadb.inwind.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: tipi di applicazioni

Cos'è un'applicazione vb5?


E' un programma (file .EXE) per Windows, creato con Visual Basic 5.
Ma che cavolo di domanda e'?
--
Roal Zanazzi
z...@iol.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Decompilatore VB 4.0

Qualcuno di voi mi sa indicare un decompilatore funzionante per Visual Basic 
4.0? Ne ho provati diversi (vb tools, vbreformer, vb4 decompiler) ma non 
funzionano.
Saluti!
Patrick 

 4.0? ...
[...CUT...]
.... Toh, chi si rivede, il faqqone....
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Documentazione sul WINSOCK

Come introduce l'oggetto, sto cercando della documentazione in italiano sul
winsock.
Qualcuno di voi sa per caso dovere reperire delle imformazioni?Possibilmente
in
italiano.
Grazie a tutti
ICQ:      75033011
E-Mail:  
song...@libero.it

 ha scritto nel messaggio
news:Vr5%4.113442$VM3.8...@news.infostrada.it...


 Se interessa, lo mando in email.
Anche a me grazie ... 
strac...@dpinfo.it
(sia in ita che in eng!!!)
--
Ciaps
Stracca
---------------------------------------------
    Le risposte alle tue domande le trovi
    sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
       ... e nell'help in linea !
---------------------------------------------

oh please! anche a me!


Se interessa, lo mando in email.
Potresti mandarlo anche a me per favore?
Grazie in anticipo,
Marco "TopGun"
marc...@lycosmail.com


2ME2 please :)
Ciaotutti,
Alessandro

 ha scritto nel messaggio
news:8idd0g$3rd8$1...@stargate1.inet.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Intelligenza Artificiale

Ciao a tutti!!!
Mi presento: sono il coordinatore del progetto di Intelligenza Artificiale
Sam gestito dalla A.I-Factory2.
Il progetto consiste nel creare un entità informatica in Visual Basic.
Sto riscontrando alcuni problemi sulla gestione di ricerce ricursive...
gestione degli oggetti... ecc
La pagina principale è 
http://utenti.lycos.it/aifactory2/Home.html
Se siete interessati al progetto lasciate un messaggio FORUM oppure, se vi
stà bene,
potremmo discurere dei miei problemi... su questo NG!
Grazie della collaborazione,
xBlack
P.S: Il programma attualmente scaricabile è una versione beta, mi serviva
solo per riordinarmi le idee nella mente. Vi invierò
       al piu' presto una copia dei sorgenti in fase di sviluppo... :)
P.P.S: Non mandatemi mail, ho problemi con la posta!!! :(

xBlack
L'ho scaricato e ho dato una occhiata.
Molto carino.
Mi studierò il concetto, molto interessante.
Ciao
Aran

 Aran
Ciao,
xBlack

mail?
mmm, se hai spazio FTP dove si può accedere in modo anonimo... oppure
metti un link veloce sul sito
Aran

ciao, ti sarei grato se mettessi l'ultimo aggiornamento del SAM sul 
sito...sono molto interessato e vorrei studiare un po il programma ;)
complimenti!
ciao


 ha scritto nel messaggio
news:LvEi9.245$xE4...@tornado.fastwebnet.it...


 Ciao a tutti!!!
Grandissimo! ho scaricato il tuo software e lo sto un pň studiando! Grande
se hai bisogno di qualunque cosa chiedimi (anche se non č che sono un
campione in questo campo) ti aiuterň di sicuro.
Se posso permettermi un suggerimento: ti consiglio di usare moduli di classe
in modo che poi puoi creare piů istanze della stessa e potrebbe esserti
utile....
Complimenti ancora e tienici aggiornati sugli sviluppi del tuo software ;-)
Ciao.

 ha scritto nel messaggio
news:LvEi9.245$xE4...@tornado.fastwebnet.it...


 gestione degli oggetti... ecc
Chiedi pure, io e altri più preparati di me saranno felici di aiutarti :-)

 ha scritto nel messaggio
news:LvEi9.245$xE4...@tornado.fastwebnet.it...


 ha scritto nel messaggio
news:%oZi9.1314$xE4....@tornado.fastwebnet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: SALVATAGGIO DI UN RECORDSET IN UN FILE TEXT DELIMITATO

 Un saluto a tutto il news.
E' possibile usare il metodo 'save'  del recordset per salvarne il contenuto
in un file delimitato?? e se si come ????
Grazie a tutti!!!!

 in un file delimitato?? e se si come ????
salve,
che mi ricordi, un recordset ADO puo' solo essere salvato in formato XML
ovvero ADTG, che e' un formato binario proprietario... mi sembra ci fosse
anche un limite inferiore di versione per il formato XML... forse la 2.1..
saluti
Andrea Montanari
montanar...@virgilio.it
http://www.asql.biz/DbaMgr.shtm
DbaMgr2k ver 0.2.0  -  DbaMgr ver 0.48.0
(my vb6+sql-dmo little try to provide MS MSDE 1.0 and MSDE 2000 a visual
interface)
--------- remove DMO to reply

Newsgroup: it.comp.lang.visual-basic
Titolo: Effettuare una chiamata ed attendere risposta

Ciao a tutti,
Ho provato a cercare nei post ma non ho trovato delle risposte.
Volevo chiedervi se vi è già capitato di implementare un applicazione
che sfrutti un modem per effettuare una chiamata ad un numero ed
attenda risposta o meglio ne comprenda lo stato dalla frequenza...
Lo scopo è chiamare un numero e sapere se squilla, se è occupato, se
è isolato
grazie a tutti

[CUT]
Non hai cercato molto bene!!!!
Prova a vedere sul sito di Moreno Sirri 
http://www.morenosoft.com/MSVBSite/
 
e anche sul sito comune c'č qualche esempio.
Ciao, Vincenzo

 Ciao, Vincenzo
Grande, grazie Vincenzo non avevo provato a fare una ricerca per
accesso remoto, ero preso solo dal controllo del flusso della
telefonata... che di fatto è un accesso remoto.
Perdonate la mia leggerezza e grazie ancora, la documentazione di Sirri
è eccezzionale
Ciao
Marco

Newsgroup: it.comp.lang.visual-basic
Titolo: "ISAM NON INSTALLABILE" ?

Devo fare il dbengine.compactdatabase di un mdb con pwd. perchè mi da quel
messaggio di errore?
Grazie in anticipo a chi mi aiuterà.

 wrote in message
8emo1t$jac$1...@pegasus.tiscalinet.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Passaggio parametri da VB a DLL scritta in C

Caro NG,
  devo invocare da Visual Basic due funzioni contenute in una DLL scritta in
Borland C++ Builder 4.0.
Nel sorgente della DLL le funzioni sono cosi' dichiarate:
"
...omissis...
extern "C" __declspec(dllexport) int play(char* file);
extern "C" __declspec(dllexport) int Stop();
...omissis...
"
La DLL è stata compilata, testata e risulta funzionare correttamente.
In Visual Basic le stesse funzioni sono state dichiarate nel seguente modo:
Declare Function play Lib "x:\Midi4vb\Sviluppo\TestDLL\plymidi.dll" Alias
"_play" (ByRef file As String) As Integer
Declare Function StopX Lib "x:\Midi4vb\Sviluppo\TestDLL\plymidi.dll" Alias
"_Stop" () As Integer
Le dichiarazioni vengono accettate.
Il seguente codice dà problemi:
"
'*** Codice di test ***
Dim strNomeFile As String: 'Nome del file
Dim intRitorno As Integer: 'Valore di ritorno
strNomeFile = "c:\pippo.dat": 'Stringa parametro
intRitorno = StopX(): 'Chiamata funzionante (*)
intRitorno = play(strNomeFile): ' Chiamata malfunzionante (**)
"
La prima chiamata (StopX (*)) viene eseguita correttamente.
La seconda chiamata, "Chiamata malfunzionante (*)", genera il seguente
errore:
Errore di run-time '49':
Convenzione di chiamata DLL non valida
Sembra che la definizione dei parametri passati non funzioni.
Ho provato in mille modi: ho usato VarPtr, ByRef, ByVal, in tutte le salse
possibili e non funziona nulla.
Qualcuno mi può aiutare ?
Grazie per eventuali risposte.
  Enrico Tafuro.

 Convenzione di chiamata DLL non valida
credo tu debba utilizzare _stdcall al posto di __declspec, cmq la
dichiarazione dovrebbe essere:
Declare Function play Lib "x:\Midi4vb\Sviluppo\TestDLL\plymidi.dll" _
    Alias "_play" (ByVal File As String) As Integer
(non c'entra, cmq sei sicuro che restituisca un Integer [2 byte] e non un
Long [4 byte]?)
non sono sicuro, fai delle prove
Ciao
Faber

 intRitorno = play(strNomeFile): ' Chiamata malfunzionante (**)
Non c'entra niente con il problema, ma credo che tu debba aggiungere ANCHE
un byte a zero alla stringa perche' in C le stringhe terminano cosi'.
   strNomeFile = "c:\pippo.dat" & chr$(0)
Saluti.
Fab

 Nel sorgente della DLL le funzioni sono cosi' dichiarate:
1)Le funzioni vengono esportate con il nome giusto o con le decorazioni?(Usa
il depends per vedere).
2)Le funzioni vengono chiamate con il nome con cui vengono esportate?
3)Usi _stdcall al posto di _declspec?
4)Usi il file .def?
ciao.

Newsgroup: it.comp.lang.visual-basic
Titolo: Wrapper class

Domanda 1: E' possibile scrivere due wrapper class che 'insistono' sullo
stesso controllo?
Domanda 1a: Devono per forza gestire eventi diversi?
Domanda 2: Se le due WC (8-)) intercettano uno stesso evento (e'
possibile?) quale delle due viene 'eseguita'?
Bye by Massimo 8-]

possibile?) quale delle due viene 'eseguita'?
Tutte e due, ma la successione degli eventi non e' determinabile a priori,
puo' cambiare da s.o. a s.o. e da pc a pc
ciao, hal

hal1961 wrote:

Grazie Hal, ora so fino a quanto posso incasinare le cose...
Bye by Massimo 8-]
Newsgroup: it.comp.lang.visual-basic
Titolo: Generazione calendario partite

Mi trovo nella situazione di avere un vettore di dimensione n (dove n è
uguale a 6, 8, 10 o 12). Ogni posizione rappresenta una squadra...
Come faccio a generare velocemente un calendario di sola andata (quindi di
n-1 giornate) tra queste squadre?
Scusate ma mi sto perdendo tra formule combinatorie e magari la soluzione è
a portata di mano... ;-)
Ciao,
    Filippo

Filippo:
  tempo fa', in risposta ad un quesito simile al tuo, ho scritto un
programmino per la generazione delle partite di un torneo di calcio.
Il problema e' che, per arrivare ad una soluzione, ho usato un metodo
"brute force" e che quindi il tempo di ricerca aumenta enormemente con
il numero delle squadre: mentre per n <= 8 la risposta e' praticamente
immediata, con n = 10 diventa di 5 [s], con n = 12 e' di 376 [s] e non
oso pensare a quante ore di "giramento di ....." corrisponderebbero gli
n >= 14.  (Pentium III a 500 [MHz])
Mi sono sempre ripromesso di trovare una soluzione algoritmica ma non
ne ho mai avuto il tempo.
Se pero', nonostante quello che ti ho appena detto, il programma dovesse
interessarti, fammelo sapere che provvedero' ad inviartelo.
Ciao, per ora e fammi sapere.
Franco


 ha scritto nel messaggio
news:UQJhisx...@news-02.uni.net...

Un semplicissimo algoritmo è il seguente: Si tiene fissa la squadra che
gioca la partita 1 in casa, e si fanno ruotare tutte le altre squadre
ciclicamente.
A - b    A - c     A - e
c - d    e - b  /\ g - c ||  ...
e - f    g - d  || i - b \/  ...
g - h    i - f     j - d
 ...      ...
Ecco come l'ho implementato, C() e T() sono le matrici che verranno riempite
con gli indici delle squadre di casa e in trasferta.
__________________________
Sub calendario(nPartite As Integer, ByRef C() As Integer, ByRef T() As
Integer)
Dim nSquadre As Integer
Dim nGiornate  As Integer
    nSquadre = nPartite * 2
    nGiornate = nSquadre - 1
    ReDim C(1 To nGiornate, 1 To nPartite)
    ReDim T(1 To nGiornate, 1 To nPartite)
    'Prima giornata
    For i = 1 To nPartite
      C(1, i) = 2 * i - 1
      T(1, i) = 2 * i
    Next i
    For g = 2 To nGiornate
      C(g, 1) = C(g - 1, 1)
      T(g, 1) = C(g - 1, 2)
      For i = 2 To nPartite - 1
        C(g, i) = C(g - 1, i + 1)
        T(g, i) = T(g - 1, i - 1)
      Next i
      C(g, nPartite) = T(g - 1, nPartite)
      T(g, nPartite) = T(g - 1, nPartite - 1)
    Next g
End Sub
Esempio di chiamata:
 Dim C() As Integer
 Dim T() As Integer
 Dim n As Integer, i as Integer, j as Integer
  n = 8
  calendario n, C, T
  For i = 1 To 2 * n - 1
    Debug.Print "giornata "; i
    For j = 1 To n
      Debug.Print C(i, j); "-"; T(i, j)
    Next j
    Debug.Print "-----"
  Next i
__________________________
Ciao, Silv:o)

Silvio:
  complimenti: una soluzione veramente brillante!
L' idea di far ruotare, dopo la prima, la posizione
delle rimanenti squadre e', a mio parere, eccezionale.
Aggiungero' il tuo algoritmo, se me lo permetti, alla
mia libreria di routines per il calcolo combinatorio.
Ciao e a risentirci.
Franco

Veramente: grazie di tutto cuore! :-)))
Ciao,
    Filippo