mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: picture iin una form

è possibile "estendere" una picture a tutta la form,anche se è piccola,come
puo' succedere per lo sfondo di una pagina html?
grazie a tutti in anticipo
Beba

nei post precedenti lo trrovi comunque puoi provare questo:
For the best effect, use a seamless bitmap image (ex: Windows wallpaper
bitmap).  Create a form1.frm and a module1.bas.  Add a picture box to the
form.  Rename the picture box to "p".  Load a bitmap into the picture box.
The loaded bitmap will be tiled onto the form background.  Copy the code
listed below into the appropriate places (see intruction comments below).
Let me know if you find an optimization that performs significantly faster!
'module declaration
  Declare Function BitBlt Lib "GDI" (ByVal hDestDC As Integer, ByVal X As
Integer, ByVal Y As Integer, ByVal nWidth As Integer, ByVal nHeight As Integer,
ByVal hSrcDC As Integer, ByVal XSrc As Integer, ByVal YSrc As Integer, ByVal
dwRop As Long) As Integer
  '**form with a bitmap named "p" containing the bitmap to be tiled:**
  'form level general declarations  Dim maxhgt As Long, maxwid As Long
  Dim pwid As Integer, phgt As Integer  Sub Form_Load ()   p.ScaleMode = 3
   p.Visible = False   p.AutoSize = True   p.AutoRedraw = True
   pwid = p.ScaleWidth   phgt = p.ScaleHeight   End Sub  Sub Form_Paint ()
   phDC& = p.hDC   frmhdc& = hdc   For j% = 0 To maxhgt Step phgt
    For i% = 0 To maxwid Step pwid
     X% = BitBlt(frmhdc&, i%, j%, pwid, phgt, phDC&, 0, 0, &HCC0020)    Next
   Next  End Sub  Sub Form_Resize ()   maxhgt = Height \ screen.TwipsPerPixelY
   maxwid = Width \ screen.TwipsPerPixelX  End Sub

 ha scritto nel messaggio
news:3C5E7267...@hotmail.com...


 ha scritto nel messaggio
news:3C5E7267...@hotmail.com...

Newsgroup: it.comp.lang.visual-basic
Titolo: Client/Server?

Salve a tutti, in una azienda dove sono stato ho visto un'applicazione che 
dovrebbe essere client server, infatti gli fanno pagare l'installazione per 
ogni postazione, in realtà essa è installata solo sul server ed i vari 
client accedono ad tramite terminal server, ognuno usando una propria 
istanza del programma sul server.
Io non ho detto niente però non mi sembra bello che gli facciano pagare 
l'installazione su igni postazione quando in realtà vanno li solo a 
configurare terminal server.
oltre al lato economico, da un punto di vista tecnico si puo definre 
client/server una simile architettura?
grazie. 

Fabrizio ha usato la sua tastiera per scrivere :

Il concetto di Client-Server presuppone che ci sia una parte di 
elaborazione in un processo Server, ed una parte di elaborazione in un 
processo Client.
Dal mio punto di vista, non sono Client-Server applicazioni Asp 
(l'elaborazione è solo sul Server), nè applicazioni basate su un file 
di database su un server (l'elaborazione è tutta sul client).
Diventa più o meno client-server l'applicazione che utilizzi dbms 
server (tipo Sql-Server), anche se è un po' una forzatura, in quanto 
del server si utilizza un 'servizio', più che una vera e propria parte 
elaborativa. La si può rendere più vicina ad un vero Client-Server se 
sul Sql-Server c'è una buona parte elaborativa, ad esempio con 
Stored-Procedure.
Relativamente al tuo quesito:
Innanzitutto, sta al fornitore e al cliente concordare una formula di 
licensing. Se si sono accordati per far pagare per postazione, non è 
una cosa che ti riguardi.
Tecnicamente parlando, è anche possibile avere sistemi client-server 
tutti su una macchina. Basta che ci siano due parti distinte, ciascuna 
installabile indipendentemente dall'altra, e *non necessariamente* 
sulla stessa macchina, perchè si sia di fronte ad un sistema 
client-server.
Ciao
Alberto
-- 
I have a dream that my four little children
will one day live in a nation where they
will not be judged by the color of their skin
but by the content of their character.


Grazie per la risposta esauriente.
Ciao!

Newsgroup: it.comp.lang.visual-basic
Titolo: Il mio Italiano non è un granchè !!

La mia richiesta era in tal senso :
devo realizzare un'applicazione che analizzi il traffico fatto in rete.
Praticamente ho la necessità di "intercettare" dei dati che vengono
richiesti da un programma verso il server della rete.

C'è qualcuno che gentilmente mi saprebbe
indicare dove reperire informazioni possibilmente in italiano
sulle Tapi o Tapi32 .
Sto scrivendo un programma che usa il modem
e non riesco a rilevare quando si apre o chiude
una comunicazione non so come fare
aiutatami la riconoscenza sara grande
ringrazio anticipatamente

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Avi e pictureboxes sovrapposte

Ciao a tutti.
E' la prima volta che scrivo in questo newsgroup.
Potete aiutarmi?
Sto facendo un programmino che visualizza un filmato AVI in un picturebox.
(uso il controllo MCI con output indirizzato ad una picturebox)
Adesso dovrei riuscire a fare delle semplici operazioni di paint (linee e
cerchi) "sopra" il filmato in modo da visualizzare per esempio un rettangolo
rosso in posizione 10,10 mentre scorrono le immagini.
Giusto per capirci, una specie di simbolo televisivo, tipo Rai o Mediaset.
Ho provato a usare la proprietą Autoredraw, ma funziona solo con le
immagini, non con i filmati reindirizzati dal controllo MCI.
Ho pensato ad un altro picturebox trasparente sul quale effettuare le
operazioni di paint, mentre in quello sotto scorrono le immagini, MA NON SO
COME FARE!!!
Avede altre idee?
Praticamente l'ideale sarebbe avere differenti "Livelli" (layer) sui quali
disegnare senza intaccare il filmato-padre
Boh. Grazie in anticipo.
Ciao,
Francesco

 
prova questa te la devi un po' ... adattare
Private Function MakeTrans(picSource As PictureBox) As Long
   Dim lRetr As Long, _
       lHeight As Long, _
       lWidth As Long, _
       lColor As Long, _
       lRgnFinal As Long, _
       lRgnTmp As Long, _
       lStart As Long, _
       lRow As Long, _
       lCol As Long
   lColor = GetPixel(picSource.hdc, 0, 0)
   lHeight = picSource.Height / Screen.TwipsPerPixelY
   lWidth = picSource.Width / Screen.TwipsPerPixelX
   lRgnFinal = CreateRectRgn(0, 0, 0, 0)
   For lRow = 0 To lHeight - 1
     lCol = 0
     Do While lCol < lWidth
       Do While lCol < lWidth And GetPixel(picSource.hdc, lCol, lRow) = 
lColor
         lCol = lCol + 1
       Loop
       If lCol < lWidth Then
         lStart = lCol
         Do While lCol < lWidth And GetPixel(picSource.hdc, lCol, lRow) 
<> lColor
           lCol = lCol + 1
         Loop
         If lCol > lWidth Then lCol = lWidth
         lRgnTmp = CreateRectRgn(lStart, lRow, lCol, lRow + 1)
         lRetr = CombineRgn(lRgnFinal, lRgnFinal, lRgnTmp, RGN_OR)
         DeleteObject (lRgnTmp)
       End If
     Loop
   Next
   MakeTrans = lRgnFinal
End Function
ciao, divertiti
Max
Newsgroup: it.comp.lang.visual-basic
Titolo: double quotes character in a string

 CHeers
'i would say "this way"'
but i never tested it

 How can you make String variable contain double quote characters (") ?
Debug.Print "This is a " & Chr$(34) & "trick" & Chr$(34) & " you can try ."
Debug.Print "This is a " & Chr$(145) & "trick" & Chr$(146) & " you can try ."
Debug.Print "This is a " & Chr$(147) & "trick" & Chr$(148) & " you can try ."
Bye, G.

 How can you make String variable contain double quote characters (") ?
Debug.Print "ABCDEF" & Chr$(34) & "GHIJK"
Debug.Print "ABCDEF" & """" & "GHIJK"
Debug.Print "ABCDEF""GHIJK"
--
Ciao.
Maurizio

 but i never tested it
AAAAAAUGH!!! This is not Visual Basic, this can be C, C++, Java or Javascript,
but NOT Visual Basic!!! In VB the ' character begins a comment line!!! use chr()
function, instead!!!

 In VB the ' character begins a comment line!!!
true...
(pal remember: always test before speaking...)
(e si' che ho letto altre 4-5 risposte completamente diverse senza che mi
venisse il minimo dubbio...)

How can you make String variable contain double quote characters (") ?
CHeers

 Debug.Print "This is a " & Chr$(147) & "trick" & Chr$(148) _
  & " you can try."
Ma i caratteri 145..148, in installazioni con altre localizzazioni, non
potrebbero mostrare caratteri diversi da quelli che intendi? O sbaglio?
--
Ciao.
Maurizio

 potrebbero mostrare caratteri diversi da quelli che intendi? O sbaglio?
Esatto, e anche usando altri font potrebbero uscire cose strane.
Anche per questo ho segnalato tutti e tre i tipi di virgolette, in modo da
dargli la scelta.
E se ci avessi pensato, avrei suggerito anche i «caporali»   ;-))
Bye, G.

Newsgroup: it.comp.lang.visual-basic
Titolo: come restiruire il focus?

Esiste un sistema per restituire il focus all'applicazione che lo deteneva,
dal momento che una mia applicazione lo acquisisce per mettersi in primo
piano?
In pratica voglio che la mia applicazione non disturbi l'utente che magari
scrive in Word , ma solo che una finestra appaia in primo piano.
saluti a tutti
e grazie

carlo molli ha scritto:

Con GetForegroundWindow ottieni l' handle della finestra in primo
piano, che l' utente sta usando.
Private Declare Function GetForegroundWindow Lib "user32" _
                                    Alias "GetForegroundWindow" () As Long
-- 
hth, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: grafici in VB 5 o 6

Ciao a tutti,
sono un giovane che si diletta a programmare in Visual Basic
e chiedo aiuto a qualche anima volenterosa:-)))
Il problema:
ho scritto un prg che alla fine mi da dei valori (volt e tempo in sec.)
anziché vederli in una lunghissima lista, vorrei visualizzarli in un grafico
ma, per quanto mi sia "sforzato" non ci sono riuscito:-((
C'è qualcuno che mi darebbe una mano, inviandomi il codice,
almeno quello più importante???
Nel grafico, gli assi X-Y si devono  autoadattare ai max valori.
Ringrazio
Giovanni

 Nel grafico, gli assi X-Y si devono  autoadattare ai max valori.
Cerca nella guida MSChart
ciao
		maxx

 Cerca nella guida MSChart

 mi applicherò:-))
se " il piu' " e' l'adattamento allora il "metodo" e' semplice :
3 variabili ( o vettori o altro ) valMin , valMax , valCurrent
Adesso non dovrai fare altro che trovare per prima il valore massimo e il
minimo tra  i tuoi dati e quindi settare le 2 var valMin e valMax , adesso
la differenza tra valMax e valMin e' l'altezza completa ( il grafico
cartesiano lo immagino diviso nei primi 2 quadranti quindi con x sempre
positive da 0 a infinito e le y da +infinito a -infinito ) e quindi per
esempio i tuoi dati saranno :
valMax 100 , valMin -10  altezzatotale = 110  ( 100 - -10)
adesso hai il massimo , il minimo e hai l'area totale , non ti resta altro
che passare il dato corrente a valCurrent e disegnarlo in proporzione
dato corrente n1 = 10 n2 = 30 se conti che il punto in basso sia lo zero
adesso il punto uno si disegnera' a :
n1 - valmin = 20  ( 10- -10)
il due a
n2 - valMin = 30 - -10 = 40
adesso hai : altezza , il punto 0 come inizio e i dati trasformati e quindi
non ti resta altro che disegnare un punto in proporzione :
 x sta a altezza grafico come n1 sta a altezzaarea
x = grafico.height * n1 / altezza
oddio come mi spiego da cani .. spero sia un po chiaro !

"Gigio2K" <barone.fab...@M.libero.it.invalid> ha scritto nel
messaggio news:pHX19.24092$lu5.6...@twister1.libero.it...
Ciao,
    ti ringrazio della spiegazione, che ho perfettamente capito, malgrado
la tua considerazione in te:-)))))
Avrei risolto alla casereccia e funziona,
sai, come certamente avrai capito, non sono un guru di VB:-)
ho caricato i dati da un archivio, ho recuperato il massimo numero di dati
e......
'grafico
With MSChart1
    .ColumnCount = 1
    .RowCount = massimo
    .Column = 1
    For rigo = 1 To massimo
        .Row = rigo
        .Data = dati(rigo)
    Next rigo
End With
che ne pensi?
ho impiegato un pò per la parte 
grafica.ma
 alla fine ho ottenuto quello che
volevo
Grazie
Giovanni

Newsgroup: it.comp.lang.visual-basic
Titolo: DataGridView con email

Se in una colonna di un DataGridView ho delle email
e' possibile renderle cliccabili e far aprire outlook per
inviare una mail ?
Per capirci meglio...e' come se in HTML
avessi una tabella con una cella con dentro
<A HREF="mailto:
Pr...@hotmail.com
">Send me an
email</A>Grazie. 

 inviare una mail ?
Non conosco quella grid, ma con una flexgrid penso non ci siano problemi.
Al caricamento imposti il testo sottolineato e colore azzurro, e nell'evento 
clik apri outlook, col destinatario impostato al valore della cella.
greg

"greg" <gr...@tin.it.invalid> ha scritto nel messaggio 
news:fb13fk$aou$1...@tdi.cu.mi.it...

Non e' che hai un codice di esempio da passarmi ?
Per aprire outlook penso di riuscirci, ma non ho
idea di come fare a dirgli il destinatario.
Grazie mille :) 

 idea di come fare a dirgli il destinatario.
a = ShellExecute(Me.hWnd, vbNullString,
"mailto:
Pi...@Pallino.it
?subject=Oggetto&body=Caro amicoti scrivo",
vbNullString, "", 0)
Ti apre il programma di default
Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP]problema con i numeri

Stò sviluppando un programma con VB5  è ho bisogno che in una TextBox
mentre
digito un numero questo mi si aggiorni con i puntini di divisione (es.
1.000.000) qualcuno sa dirmi come posso fare
Grazie anticipatamente a tutti
Sergio Bonifazi


La soluzione piu' banale e' quella di intercettare l'evento Change,
scrivendo al volo nella tua casella til testo formattato. Ricordati alla
fine di mettere Text1.SelStart=0, per mettere il prossimo carattere a sx
di quanto scritto
Bye by Massimo 8-]

 > Stň sviluppando un programma con VB5  č ho bisogno che in una TextBox


Newsgroup: it.comp.lang.visual-basic
Titolo: x Cristiano Larghi

    Per favore puoi scrivermi il codice perchè mi dà errore di  run-time
'438' :
    Proprietà o metodo non supportati dall'oggetto.
    Sembra che il metodo 'Docmd' non sia disponibile in VB.
    Grazie mille
    LuCa

Sei fortunello, ho trovato un esempietto che dovrebbe funzionare:
DIM NomeFileMdb
Dim ObjAccess
Dim Nomemacro
NomeFileMdb="C:\Prova\db.mdb"
Nomemacro="macro_da_eseguire"
Set ObjAccess = CreateObject("Access.Application")
ObjAccess.OpenCurrentDatabase (NomeFileMdb)
ObjAccess.DoCmd.RunMacro Nomemacro
ObjAccess.CloseCurrentDatabase
set ObjAccess=nothing

Newsgroup: it.comp.lang.visual-basic
Titolo: disabilitare tastino x per chiudere form

come è possibile disabilitare il tastino X in alto a destra, in nu form? so
che si puo fare perche l'ho visto da un sacco di parti.
grazie.
MarioH

su VBCode.com c'é un esempio
    Ciao
            Allanon

MarioH
è Possibile utilizzando getsystemMenu & removeMenu :
Private Declare Function GetSystemMenu Lib "user32" (ByVal hWnd As Long,
ByVal bRevert As Long) As Long
Private Declare Function RemoveMenu Lib "user32" (ByVal hMenu As Long, ByVal
nPosition As Long, ByVal wFlags As Long) As Long
Private Const FlagsDelForm = &H400&
Public Sub Rimuovi_X(Form_hWnd As Long)
    Dim ControlBox As Long
    ControlBox = GetSystemMenu(hWnd, 0)
    Call RemoveMenu(ControlBox, 6, FlagsDelForm)
    Call RemoveMenu(ControlBox, 5, FlagsDelForm)
End Sub
Private Sub form_load()
    Call Rimuovi_X(Me.hWnd)
End Sub
by Utente Win2k

     Call RemoveMenu(ControlBox, 5, FlagsDelForm)
perche togli 5 e 6 ??
cosa rappresentano rispettivamente ?
MarioH


La voce Close (o Chiudi) del menu piccino in alto a destra e la righina di
separazione sopra tale voce.
ciao, hal

La voce Close (o Chiudi) del menu piccino in alto a destra e la righina di
                                                                        ^^^^^^^^^^^^^^^^^^^^
--------------->>>> sinistra !


 --------------->>>> sinistra !
non mi formalizzo... ::)))))))))

 ByVal bRevert As Long) As Long.......................
Ma se io dovessi includere una libreria o un controllo Active X, come faccio
a sapere quello che mi serve?....c'è qualcosa che spieghi in dettaglio ogni
controllo ?
Ciao
Alessandro
Newsgroup: it.comp.lang.visual-basic
Titolo: Comprimere un file...

Salve a tutti !
Sto scrivendo un'applicazione sotto VB5 (SP3) che deve effettuare dei
backups periodici dell'archivio su cui lavora. Per ora uso l'ActiveZipper
(la versione free), ma non mi sembra un granche' (del resto e' gratis!).
Avevo provato anche il MAQZlib, ma la versione compilata dell'applicazione
non gira (sotto Visual Basic funziona perfettamente) : mi da' un bell'errore
di run-time 7 (memoria esaurita) ed esce di schianto; il tutto appena la
finestra che contiene il controllo MAQZlib viene caricata in memoria.
Siete x caso a conoscenza di un controllo che faccia al caso mio ? Avete una
qualche idea sulla causa del problema ?
Grazie a tutti in anticipo, Giovanni.

 qualche idea sulla causa del problema ?
Io ho sempre usato le Compression Plus, sono decisamente buone, però non
sono gratuite.
--
Nino Stella
Inteldata Srl
email: 
nino...@tin.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Informazioni di sistema... come?

Avete presente quando faccio click col tasto destro del mouse su risorse di
sistema e poi su proprieta' mi appaiono le info di sistema con le info sul
S.O usato?
Ecco come faccio a richiamarle pure io??? Che devo fare?
Grazie!

 ha scritto nel messaggio
news:4Lul8.38630$1S3.1...@twister1.libero.it...

www.allapi.net
Newsgroup: it.comp.lang.visual-basic
Titolo: Api, "sicure" ?!

 
Ciao, il subject non e' provocatorio, volevo solo chiedere (da
profano), visto che le Api mi sembrano cosi' "scontrose" (maiuscole,
virgole, ecc.), facendo un uso non dico smosato ma comunque ....
diciamo, usandole semplicemente, non e' che c'e' il rischio che poi
qualche sistema non le riconosca ?!
Cioe' magari chiamo ShowCursor lib32 ecc. poi Nt, il 98 ecc. ecc
avranno lo stesso "Ape".... (Ho premesso il mio noviziato nel
settore...)
Grazie per le vostre dissertazioni.
Ciao
Primo

settore...)
Le chiamate api sono sempre le stesse, cambia la definizione di alias
sotto w 3.1 w95 0 NT.
Solo questo.
Programma sviluppato pe W95 va pure su W98 (Non ti sei accorto che e'
solo l'ennesima idea di M$ per spillare soldi ? W98 e' identico a W95,
solo "qualche" bug risolto, FORSE)
Ciao.
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
 -----------Federico Emanuele Galli----------
 ----------Visual Basic's Programmer---------
 
 Sideralis Programs (Visual-Basic and Delphi)
 
http://www.geocities.com/colosseum/loge/2151
°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°°
                 Trust no ONE.
Per rispondermi via E-Mail togli STOPSPAMMERS.
Guarda la RFD per it.comp.prog.collaborazione !


Questo e' quello che nessuno sviluppatore Windows vorrebbe che succedesse!
In realta' le funzioni API sono in continua (ma lenta, fortunatamente)
evoluzione.
WIN16 -> WIN32
Nel passaggio da Windows 3.1 (16bit) ci sono state diverse modifiche, molte
funzioni aggiunte ed alcune eliminate; tali modifiche sono state attuate
sostanzialmente per la differente architettura di Windows95 e NT.
WIN32 (95) <-> WIN32 (NT)
Anche tra Windows95 e WindowsNT, le API non sono identiche...
NT ha delle caratteristiche non comprese in Win95 (ad esempio tutta la parte
di sicurezza e gestione servizi server). (Nota: in WindowsNT 3.5 non c'era
tutta la parte della nuova interfaccia utente stile Win95, per cui niente
icona nella traybar e amenita' simili).
In genere la Microsoft inserisce nuove funzioni API "estese" quando ha
necessita' di migliorarle, lasciando quelle vecchie; ad esempio tutte le
funzioni API il cui nome termina per Ex (extended, credo) sono API nuove che
pian piano sostituiranno quelle vecchie (Es. ExitWindows() ->
ExitWindowsEx()).
Per finire...
Il set di funzioni API non e' costante, subisce modifiche piu' o meno
consistenti, in genere al rilascio di una nuova major release di Windows.
E' comunque estremamente difficile che una funzione sparisca nel nulla
(anche se e' gia' successo, come GetModuleUsage()).
Come sviluppatori possiamo solo mantenerci documentati e aggiornare il
nostro software (sperando che l'aggiornamento non ci porti via troppo tempo
:-)
--
Roal Zanazzi
z...@iol.it



Newsgroup: it.comp.lang.visual-basic
Titolo: Leggere e scrivere da file

Ciao a tutti ,scrivo a questa ng per chiedervi come posso leggere e scrivere
contemporaneamente da un file,le seguenti linee di codice mi danno alcuni
problemi,sbaglio la modalità di apertura file,l'accesso o altro?
GRAZIE ATICIPATAMENTE
    Dim Header As String
   Open "Pippo.dat" For Random Access Read Write  As #1
    Line Input #1, Header  'se sulla prima linea sta scritto Prova scrivi
sulla successiva Ciao
    if(Header = "Prova") then
        Print #1, "Ciao"
    end if
    Close #1

[*STEX* : 
smug...@amsjv.it
] ha scritto:

No, se è un file sequenziale con lunghezza record/riga variabile, non puoi
leggere e scrivere.
Se è testo puro vedi l'apertura For Input e For Output (o For Append).
Se trattasi di records a lunghezza fissa (apertura For Random) allora puoi
leggere e scrivere indicando il numero del record, vedi Get per leggere e
Put per scrivere.

 wrote in message
news:bbqfdi$ce34m$1...@ID-174464.news.dfncis.de...


 scrivere sulla seconda?
Sě, se la seconda la riscrivi per identica lunghezza, no se diversamente
perchč se fosse piů lunga coprirebbe parte della terza, se fosse piů corta
resterebbe parte di quella che era prima la seconda.

Newsgroup: it.comp.lang.visual-basic
Titolo: List Box

Ciao a tutti, vorrei sapere se esiste qualcosa di più bellino della list
box.
Mi spiego meglio, ho la necessità di emettere a video il contenuto di una
tabella mdb che ovviamente ha più colonne e vorrei che la distanza tra una
colonna e l'altra sia sempre la stessa e non che cambi in base alla
lunghezza del dato. Altra necessità è quella di colorare in modo diverso
solo alcuni campi se rispettano una determinata condizione.
Ringrazio tutti per l'aiuto.
Altra curiosità, come faccio ad aprire un database ADO 4.0 invece che 3.5
???

 wrote in message
2I7w3.18073$98.1...@typhoon.libero.it...


...

Newsgroup: it.comp.lang.visual-basic
Titolo: [VB6] Inserimento automatico indirizzo Web sul browser

Mi chiedevo come sarebbe possibile creare un programma che alla pressione 
del tasto "W"
inserisca automaticamente un indirizzo web nella barra "indirizzo" del 
browser aperto. 


Senza aprire il link?
-- 
-> GbC|
www.gbcweb.com
www.chiappori.com
 

 
www.chiappori.com
Esatto, senza aprire il link.
Deve solo inserire l'indirizzo nella barra del browser.

Newsgroup: it.comp.lang.visual-basic
Titolo: janus gridex - bloccare colonna

Qualcuno sa se č possibile e, se sě, come bloccare la prima colonna di una 
griglia janus (2000), un po' come si fa con excel in modo che scorrendo il 
record la colonna resti sempre visibile?
Grazie per qualsiasi aiuto.
eSQueL 

 record la colonna resti sempre visibile?
grid.FrozenColumns= numero colonna
Ciao
Efisio

 record la colonna resti sempre visibile?
grid.FrozenColumns= numero colonna
Ciao
Efisio
---------------
Molto, molto grato :)
Ciao.
eSQueL

Newsgroup: it.comp.lang.visual-basic
Titolo: A volte ritornano...

.... sta volta sono tornato io....
fino a circa 4 anni fa ogni tanto giravo su questo ng per farmi una cultura
su vb. Per mancanza di tempo il mio vecchio titolare non mi ha più fatto
sviluppare un tubo, di mezzo ho anche messo 1 moglie e un figlio.... Ora
lavoro in proprio e ho ricominciato pure a sviluppare in vb passando dalla 6
alla 2005 .net.
Dopo questo tanto tedioso quanto inutile prologo vengo al dunque.
Mi collego ad un database MySql senza usare dataset, data adapter, binding
navigator, etc.... ma da codice, dopo aver settato il driver odbc per my
sql,  usando una roba di questo genere.
Dim SQL As String
Dim ConnString As String
ConnString = "DRIVER={MySQL ODBC 3.51 Driver};
SERVER=192.168.0.253;DATABASE=mydatabase;UID=pippo;PWD=******;OPTION=35"
e via dicendo.
E' possibile secondo voi usare lo strumendo reportviewer, creare un report
senza usare datasource e affini ma continuando a lavorare in RDO?
Se si come posso operare?
Vi disturbo con queste domande perchè ho veramente poco tempo a disposizione
e troppo lavoro da fare.
Ringrazio anticipatamente e felice di partecipare di nuovo a questo ng che
in passato mi ha dato veramente tanto.
Salutoni a tutti e buon lavoro!

 sviluppare un tubo, di mezzo ho anche messo 1 moglie e un figlio....
Direi che quest'ultima cosa non può certo farti rimpiangere il mancato 
sviluppo ;)
Ciao 

 ha scritto nel messaggio
news:454af...@x-privat.org...

Newsgroup: it.comp.lang.visual-basic
Titolo: programmazione dell'oggetto Word

Ciao a tutti.
Ho provato a programmare l'oggetto Word da Visual Basic 5.0 ottenendo
risultati interessanti dal punto di vista della qualitą dei documenti
ottenuti ma abbastanza scarsi dal punto di vista delle prestazioni. In
particolare, attivando Word durante la creazione e la scrittura dei
documenti mediante il codice VB5, ho notato un refresh di tutto ciņ che
compare sul documento prima della posizione nella quale si sta
scrivendo, e credo che sia proprio questa la causa delle scarse
prestazioni.
Esiste qualcuno che abbia dei suggerementi da darmi in proposito?
Luigi
@mail: 
pir...@mi2.flashnet.it

 wrote in message
36306D7C...@mi2.flashnet.it...


...


Newsgroup: it.comp.lang.visual-basic
Titolo: Database Update...chi mi aiuta ?!?

ciao a tutti,
avevo già scritto x questo problema, ma senza nessun riscontro, cmq...il
problema è il seguente.
Ho un programma in VB6 che utilizza dei dati in un database Access, ora io
ho la necessità di aggiornare il programma aggiungendo la possibilità di
inserire una nuova serie di dati che saranno poi memorizzati nella tabella
del DB che già utilizza. A questo punto sorge la domanda: come faccio, da
codice, ad aggiornare la tabella del database, aggiungendogli i nuovi campi
che mi servono?! ....
....ho bisogno cioè :
 Che all'avvio del programma, lo stesso, controlli che il suo db, è
aggiornato;
 Se è già aggiornato non fa nulla, altrimenti,
 aggiunge alla tabella già esistente e contenente vari dati, una serie di
campi nuovi (possibilmente in coda)
Sono certo che sia possibile fare una cosa del genere da codice, ma non so
proprio come...mi aiutate ?!
grazie mille a tutti e ciaooo
Trickballante .

Fai una funzione che apre la struttura della tabella (con ADOX - o DAO),
oppure fine una select * e guardi l'insieme dei fields e stabilisci se la
tabella
è aggiornata o no.
Poi fai una query "Alter table tabella add column Pippo char(50) " dove
applichi le modifiche.
Ciao
Andrea

Newsgroup: it.comp.lang.visual-basic
Titolo: Visual Basic clone

Mi hanno detto che su Internet e' reperibile un clone gratis del
Visual Basic....
Qualcuno sa anche dirmi dove lo posso trovare...?
Grazie mille in anticipo!
Stefania

...


provato a collegarmi ma il browser mi dice 'sito non trovato ...'
In giro si trova ancora, se vuoi poso cercare l'indirizzo, ma credo
che facendo una ricerca sotto 
http://ftpsearch.ntnu.no
 con envelop
oppure (se la memoria non mi tradisce) envelop1.zip si trovi ancora da
qualche parte un grasso file da vari mega con il programma. 
Purtroppo il supporto per il prodotto e' stato interrotto dal
produttore (probabilmente Bill gli avra' fatto causa, era praticamente
VB3 o 4 con i caratteri piu' piccoli e senza gli array di controlli).
Comunque IMO non ti perdi nulla, se non lo cerchi. Invece, al posto
del vecchio VB sto scoprendo le bellezze del Borland C++ Builder (e
immagino anche di Delphi, ma non l'ho ancora provato), che ti danno un
prodotto all'altezza del VB4 (devo dire che il VB5 come IDE e' ancora
un gradino piu' in alto) senza 3 MB di DLL per far girare un
programmino di 16 KB...
Paolo
Newsgroup: it.comp.lang.visual-basic
Titolo: [Spam] e' nato it-alt.comp.hardware.modding ^_^

Spero vi faccia piacere sapere che e' nato un nuovo Ng per gli amanti del
modding
it-alt.comp.hardware.modding
NB: essendo un neonato e' possibile che il vostro server non ancora lo
carichi, a giorni sara' visibilissimo. Scusate ancora per lo spam
-- 
[Gigio2k]
www.g2kweb.it
it-alt.comp.hardware.modding <-- nuovo nato

 it-alt.comp.hardware.modding
argh... lo scartavetratore pazzo...
-> GbC|
www.gbcweb.com

 argh... lo scartavetratore pazzo...
Gibibello mi presteresti per qualche ora una delle tue chitarrine ? ghghhghg
-- 
[Gigio2k]
http://www.g2kweb.it
[ it-alt.comp.hardware.modding ] - 
http://www.g2kweb.it/ichm

 argh... lo scartavetratore pazzo...
non vedo il post originale, ma stando alla faq
http://www.g2kweb.it/ichm/manifesto.asp?Menu=1&SubMenu=0
sia in ie sia in firexof, a leggere questa riga
Il gruppo è dedicato a tutto ciò che concerne l'arte del modding, ovvero
l'arte di apportare modifiche ai PC ma non solo: infatti il gruppo supporta
anche discussioni su modding di apparati elettronici, case modding, desktop
modding e tutto ciò che riguarda questo mondo.
si direbbe che gigio ha una scheda video width=3000. complimenti per il
modding :P
j.

 il modding :P
Eddai sono le prime bozze :ppp
DATEMI TEMPO, non posso scartavetrare e scrivere assieme, altrimenti mi si
cancellano i tasti :p

Newsgroup: it.comp.lang.visual-basic
Titolo: Risoluzione Video in VB

E' possibile far si che un programma sviluppato su un PC con
risoluzione video 1024 x 768 sia correttamente visto su altri PC con
risoluzione  inferiore?
Grazie per gli aiuti
Mauro
(EMail modificata: togliere NOSPAM)

...


Newsgroup: it.comp.lang.visual-basic
Titolo: Req: Conversione DB da Access 97 a Access 2000

Ciao a tutti,
non ricordo più cosa bisogna fare in VB6 (SP5) per poter leggere il DB
convertito. Uso DAO tramite Microsoft Common Dialog Control 6.0 (SP3) e devo
obbligatoriamente passare da Office 97 a Office 2K.
Grazie 1K
Chris



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

    Inn un oggetto TreeView1 esiste la proprietą MultiSelect ?
    Se si dove si imposta ?

    Inn un oggetto TreeView1 esiste la proprietą MultiSelect ?
purtroppo no :-(
ciao, hal
Newsgroup: it.comp.lang.visual-basic
Titolo: Accesso tramite RecordSet ADO in un foglio Excel

Buongiorno a tutto il NG.
Qualcuno sarebbe così gentile di indicarmi come posso fare per accedere ad
un foglio di Excel.
Ho già creato una connessione alla base dati in sola lettura.
Avrei la necessità di copiare dei dati da un foglio Excel in una tabella
Acess.
Ho scritto del codice VBA in Acess che crea una connessione in sola lettura
ad acesso esclusivo ma nel momento in cui
effettuo l'Open del RecordSet mi dice che nella stringa SQL è errata
l'idicazione nell'istruzione FROM
come faccio a caricare il foglio in un recordSet ADO??
        Call Apri_Chiudi_DB_Excel(True, strNameSpec)
        'Istanzazione dei RecordSet
        Set rstExcel_S = New ADODB.Recordset
        Set rstExcel_T = New ADODB.Recordset
        Set rstExcel_Campi = New ADODB.Recordset
        'Apertura dei RecordSet
        rstExcel_S.Open CodStu & " record S", cntSpecExcel     '<=ERRORE
NOME DEL FOGLIO =>CodStu & " record S"
'---------------------------------------------------------------------------
---
' Procedure : Apri_Chiudi_DB_Excel
' DateTime  : 25/10/2003
' Author    : Marco
' Purpose   : Permette di APRIRE / CHIUDERE il database di
'             delle specifiche cioè il File di Excel e di costruire così una
'             connessione.
'---------------------------------------------------------------------------
---
'
Public Sub Apri_Chiudi_DB_Excel(ByVal b_OpenClose As Boolean, ByVal strFile
As String)
    On Error GoTo Errore
    If b_OpenClose Then
        'CREAZIONE ED APERTURA DELLA CONNESSIONE ALLA BASE DATI
        Set cntSpecExcel = New ADODB.Connection
        'Definizione del tipo di puntatore al record
        cntSpecExcel.CursorLocation = adUseClient
        cntSpecExcel.Open strProvider & strSource & strExcelPath & strFile &
";" & strProviderExtended
    Else
        'CHIUSURA E DISTRUZIONE DELLA CONNESSIONE
        If cntSpecExcel.State = adStateOpen Then
            cntSpecExcel.Close
        End If
        If Not cntSpecExcel Is Nothing Then
            Set cntSpecExcel = Nothing
        End If
    End If
Exit Sub
Errore:
    Call MsgErr("Apri_Chiudi_DB_Excel")
End Sub
Grazie Marco

 Acess.
Guarda questo articolo:
http://support.microsoft.com/default.aspx?scid=http://support.microsoft.com:80/support/kb/articles/q257/8/19.asp&NoWebContent=1
ciao
	maxx
-- 
NOSPAM: Rimuovere i trattini dallo username!
Cut hyphens from my username!

Newsgroup: it.comp.lang.visual-basic
Titolo: [OT] Stored procedure e parametri

Ho creato una stored procedure che accetta un parametro stringa che
contiene di fatto la condizione WHERE da applcare internamente alla stored.
La stored di fatto esegue una query che deve avere come condizione di WHERE
il parametro che passo dal chiamante [ Es. exec sp_esegui_query("WHERE
Numero=1")]
Si può fare?
Grazie.
Giacomo
Newsgroup: it.comp.lang.visual-basic
Titolo: avviare command senza premerlo

ciao a tutti. lo so il titolo non spiega molto ma spero di spiegarlo
meglio adesso: io ho messo un command button nascosto e un label
visibile. io voglio fare in modo che se premo il label venga fatto ciò
che succederebbe se premessi il command button. come faccio??? ciao

 che succederebbe se premessi il command button. come faccio???
E mettere il codice in Label1_Click()?
Ciao

quello l' ho fatto ma poi cosa devo fare???? che codice devo
mettere????

 ha scritto nel messaggio
news:1122296933.4...@g14g2000cwa.googlegroups.com...

Nell'evento Click della Label scrivi
Command1.Value = True
Bye
Raf

 mettere????
Forse non sono stato chiaro: se il command è invisibile e ti serve solo come 
"contenitore di codice" sposta il codice dal click del command a quello 
della label (e elimina il command).
In entrambi i casi la via corretta sarebbe farti una sub con il codice e 
richiamare questa dai vari eventi.
Ciao 

che succederebbe se premessi il command button. come faccio??? ciao
Semplicemente, in "Label1_Click()", metti "Call Command1_Click"
Newsgroup: it.comp.lang.visual-basic
Titolo: Ado Connection ed Open SQL, x' non va?

Cosa c'è di sbagliato in questo codice non capisco:
stringa = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source= \prova.mdb"
    Set cn = New ADODB.Connection
    Set rs = New ADODB.Recordset
    cn.Open stringa
    rs.Open "SELECT * FROM Rubrica WHERE Nome_Cognome = " Pluto "", cn, 1
oppure
rs.Open "SELECT * FROM Rubrica WHERE Nome_Cognome = " & "Pluto" & "", cn, 1
Mi dice operatore mancante sintassi non corrretta 

 Mi dice operatore mancante sintassi non corrretta
Ho trovato l'inghippo:
rs.Open "SELECT * FROM Rubrica WHERE Nome_Cognome=""Pluto""", cn, 1
Sembra andare. Speriamo bene....
Adesso dovro' fare anche condizioni Where più complicate....
Incrocio le dita....

 Incrocio le dita....
Come avete letto sopra ho risolto il caso della stringa e se volessi mettere 
una variabile?
rs.Open "SELECT * FROM Rubrica WHERE Qualifica="Qualific"", cn, 1
con Qualific variabile stringa!
Mi da errore. Strano pero' ho levato le 2 " 

 Mi da errore.
Ma dai? Non l'avrei mai detto...
rs.Open "SELECT * FROM Rubrica WHERE Qualifica='" & Qualific & "', cn, 1
Occhio però che se qualific contiene un apice ottieni un errore di run
time, la soluzione è come sempre quella di raddoppiare gli eventuali
apici, e non ti preoccupare, se scrivi papa' lo cerchi come papa'', ma
troverai comunque e solamente i record corrispondenti a papa'
-- 
Salutoni
Sergio
C'è il giorno in cui nasci e quello in cui scegli di vivere
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it


Ci deve essere qualche errore. Mi dice:
Errore run-time 3709
Connessione chiusa o non valida in questo contesto. Impossibile utilizzarla 
per esguire l'operazione. 

 rs.Open "SELECT * FROM Rubrica WHERE Qualifica='" & Qualific & "', cn, 1
Questa purtroppo non va. Spero di aver risolto con questa:
rs.Open "SELECT * FROM Rubrica WHERE (Nome_Cognome='" & NomeCognomeDaCercare 
& "');", cn 

 & "');", cn
Ah.
E a parte aver modificato i nomi dei campi e delle variabili (io ho usato
quelli da te utilizzati nel post originario, se non sono quelli giusti io
che ci posso fare?), quale sarebbe la differenza tra la mia e la tua
versione?

Newsgroup: it.comp.lang.visual-basic
Titolo: Una qeury moolto simpatica

Mi stanno venendo dei dubbi esistenziali per colpa di questa ,in apparenza
semplice, query SQL che non vuole funzionare.
Select Unita_Immobiliari.Unita,Uscite.Importo,Uscite.In_data,
Uscite.Ragione,Uscite.Intestazione,Uscite.Note From Unita_Immobiliari,
Uscite Where (Unita_Immobiliari.Unita = 'Magazzino A' ) 
And (Unita_Immobiliari.Unita = 'Magazzino B' ) 
And Unita_Immobiliari.IDUnita=Uscite.IDUnita
La query l'ho fatta con VisData di VB 5 e neanche qui funziona, ma se dalla
condizione WHERE elimino  uno dei filtri , ad esmpio la ricerca della voce
"Magazzino B", la query funziona .
Mi piacerebbe avere qualche suggerimento per risolvere la mia crisi.

Da quello che scrivi (anche se sarebbe necessario conoscere meglio la
struttura delle tabelle) stai eseguendo una query di tipo esclusivo (AND per
intenderci) su un campo (Unita_Immobiliari.Unita), che deve essere allo
stesso tempo uguale a due valori diversi.

...

Giusto devo utilizzare semmai l'operatore OR.

Ciao, Prova cosě !!
   Select
        Unita_Immobiliari.Unita,
        Uscite.Importo,
        Uscite.In_data,
        Uscite.Ragione,
        Uscite.Intestazione,
        Uscite.Note
    From
        Unita_Immobiliari,
        Uscite
    Where
    (Unita_Immobiliari.Unita = 'Magazzino A'   or  Unita_Immobiliari.Unita =
'Magazzino B' ) And
    Unita_Immobiliari.IDUnita=Uscite.IDUnita
Buona fortuna.
Enrico wrote in message <01bd1ec7$35253d00$1be5...@ekkral.044>...


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

La mia domanda di aiuto sarà sicuramente banale, ma visto che non sono
esperto di Visual Basic chiedo il vostro aiuto su una proprietà che mi si
presentava come le altre.
Stò cercando di da tempo di impostare a "true" la proprietà RightToLeft dei
controlli Hscrollbar e/o Vscrollbar; quando esegue il codice si blocca sulla
riga di comando dove vado a modificare la proprietà, es.
Private Sub Form_Load()
HScroll1.RightToLeft = True
End Sub
Risultato: ERORE DI RUN-TIME
Ho provato anche a cambiare la proprietà RightToLeft attraverso la finestra
di proprietà, evitando di scrivere righe nel codice:
Risultato:  "MEMORIA ESAURITA"
Se potete darmi indicazioni prego rispondere nel nwesgroup
 GRAZIE

riga di comando dove vado a modificare la proprietà, es.
La proprietà RightToLeft si usa nei sistemi bidirezionali, ovvero in
quelle lingue nelle quali si scrive anche da destra verso sinistra. La
proprietà la trovi in tutti i controlli.
Penso però che a te non interessi scrivere da destra verso sinistra,
soprattutto riportando l'esempio delle ScrollBars, più che altro far
scorrere al contrario, dal massimo al minimo. Per fare ciò devi
impostare le proprietà MinValue e MaxValue e la proprietà Value: le
prime impostano rispettivamente il valore minimo e il massimo
restituito dalla barra, il terzo il valore di partenza che non può
eccedere, logicamente, al minimo e massimo.
Spero di essere stato chiaro e di averti soddisfatto.


...

Chiarissimo! Grazie mille
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Numero dei bit di colore del desktop

Caro NG,
vorrei sapere come è possibile ottenere da VB il numero di bit di colore su
cui è impostato il desktop di Windows (ad esempio 8, 16, 24). Ho scritto un
programma di grafica e solo alla fine scopro che funziona SOLO a 24 bit di
colore... me tapino.
Esiste un sistema che funziona su tutti i sistemi Windows esistenti ?
Grazie per eventuali risposte,
   Enrico.

ET ha scritto nel messaggio ...

Function GetDeviceColors(ByVal hdc As Long) As Long
    Const PLANES = 14
    Const BITSPIXEL = 12
    GetDeviceColors = GetDeviceCaps(hdc, PLANES) * 2 ^ GetDeviceCaps(hdc,
BITSPIXEL)
End Function
Non capisco cosa intenda tu con "funziona solo a 24 bit"...
Forse intendi dire che non funziona con 32bit che non è rappresentabile con
un long
Ciao

 un long
Grazie per la risposta, adesso proverň questa funzione
Nel mio programma uso delle bitmap a 24 bit di colore.
Ad ogni livello di colore associo un punto con un significato.
Se per sbaglio carico l'immagine quando Windows č impostato a meno di 24 bit
le librerie di gestione delle bitmap segano le informazioni sul colore in
eccesso. Le primitive come "point" ritornano solo i colori che sono
effettivamente visualizzabili su schermo.
Sto usando le bitmap perchč sono il metodo piů rapido per gestire
velocemente matrici 2x2 con valori numerici abbastanza piccoli...
Lo so, non č un grande trucco perň devo ammettere che funziona.
Ciao,
  Enrico.

 wrote in message
news:PyWK5.48803$3K3.1...@news.infostrada.it...


Newsgroup: it.comp.lang.visual-basic
Titolo: Spazio libero su disco

per calcolare lo spazio libero Usavo con vb4 la funzione DiskSpaceFree 
cosi' definita
Declare Function DiskSpaceFree Lib "STKIT416.DLL" () As Long 
Sto facendo il porting in vb6 a 32 bit e quando chiamo la suddetta funzione
mi dice libreria stkit416.dll non trovata anche se sotto windows\system 
c'e'... sapete il motivo ? oppure quale funzione usate voi per calcolare
lo spazio libero?
grazie
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

 c'e'... sapete il motivo ?
Perche' vb6 non carica le dll a 16 bit.
--
ciao, hal
--------------------------------
Inviato via 
http://usenet.libero.it

 Perche' vb6 non carica le dll a 16 bit.
Infatti avevo provato a sostituirla con stkit432.dll  ma nel system non
esiste ... e neanche nel cd di vb6...
ci sono altre funzioni o la dll sai se e' scaricabile?
arigrazie


lo spazio libero?
fatto fso il FileSystemObject
fso.drives("c").availablespace
ti ritorna lo spazio su C
--
Regards LaZ
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸
Mi riservo, con fermezza, il diritto di contraddirmi. (Paul Claudel) 
.·´¯`·.¸.·´¯`·.¸ ><((((º> ....... <º))))>< .·´¯`·.¸.·´¯`·.¸

 ti ritorna lo spazio su C
ne deduco quindi  che la funzione DiskSpaceFree Lib "STKIT432.DLL"  
non e' piu utilizzabile?


...oppure quale funzione usate voi per calcolare lo spazio libero?
http://makeashorterlink.com/?D2B464FE3
Newsgroup: it.comp.lang.visual-basic
Titolo: Help! Drag-and-Drop in to AutoCAD

Can anyone tell me how to drag-and-drop a file from a FileListBox in VB5
into AutoCAD r12 to be inserted as a block. Any help is appreciated. Thanx


It's so hard to seem virtually impossible!
Try with Autocad 14...
bye

Newsgroup: it.comp.lang.visual-basic
Titolo: VBA e Excel

Domanda semplice semplice:
Se in un foglio excel (office97) non so dove sono ma voglio comunque andare
avanti di una riga come faccio?. 
Il registratore di macro mi scrive solo l'istruzione per un
riposizionamento assoluto, ma ricordo che il registratore di macro di
excel95 sebbene non usasse VBA, lo facesse in relativo quindi penso sia
possibile.
--
Peppo
 
ICQ    : UIN 5709387
Fidonet: 2:331/301.45

 wrote in message 379ff6d6...@news.flashnet.it...


ActiveSheet per il sheet ativo...
perfetto! ActiveCell.row e ActiveCell.Column era cio` che mi serviva.
Grazie!

Newsgroup: it.comp.lang.visual-basic
Titolo: [Consiglio implementazione] Player mp3 con Dsp

Salve gente...
mi trovo davanti ad un problema che ha varie soluzioni e non sono sicuro su 
quale via adottare
e dato che tra voi ci sono dei super-mega-esperti volevo discuterne un pò 
:-)
Il problema fondamentalmente è il seguente...
realizzare una piccola applicazione vb che funga da player mp3 e che 
permetta il pitch shift [il cambio di tonalità] al volo...naturalmente cose 
del genere esistono ma il software avrebbe tutta una serie di feature 
otimizzate per chi fà serate di pianobar e simili [ad esempio playlist delle 
varie serate con cambi di tonalità memorizzati, ricerca veloce in 
repertorio,etc etc]
Il mio primo approccio è stato...
- decomprimo il file
- faccio la trasformata
- cambio la tonalità
- eseguo il file
- cancello il file decompresso
Ok funziona bene....ma non cambia la tonalità al volo e impiega circa 8-10 
secondi per fare il tutto
Temporizzato nel modo giusto non dovrebbe darmi grandi problemi [tipo inizia 
a preparare il prossimo file mentre il precedente è un esecuzione], ma non è 
flessibilissimo se decidi di cambiare al volo l'ordine della scaletta...
Secondo approccio:
Basarsi su un player già esistente e sfruttare un effetto DSP che faccia un 
pitch shift al volo...
Questa soluzione sembrava ottima perchè mi sgravava di molti problemi di 
playing di cui si sarebbe occupato il player, però c'è un problema, i plugin 
in questione esistono in larga scala per Winamp, ma sono quasi inesistenti 
[ne esistono solo due entrambi a pagamento (il programma voleva essere un 
utility free da rilasciare a tutti)] per Media Player.
Ora devo scegliere se integrare WinAmp nella mia applicazione [ e a questo 
punto decidere come farlo...nel senso di far aprire il player e comandarlo 
da remoto dalla mia applicazione, dando pero troppa liberta all'utente di 
utilizzare le funzionalita di winamp, oppure utilizzarlo in modo "nascosto" 
facendo scomparire la finestra e lavorandoci di sendmessage] o trovare una 
via alternativa...
Suggerimenti?
Approcci?
Link?
Grazie Giuseppe

 - cancello il file decompresso
Ciao giuseppe,
non so aiutarti ma ne approfitto per chiederti come fai a
decomprimere un file?
Ti ringrazio per qualsiasi dritta.
saluti,
pusky

>come fai a decomprimere un file?
Al momento io uso Lame


Ho provato a fare una ricerca veloce e mi sembra di capire che tramite
lame si converte un wave in mp3, ma non trovo riferimenti per il
contrario...
sai mica indicarmi qualke link
ancora grazie,
Pusky 

 > - cancello il file decompresso
Usa le directx library for visual basic (dx8vb.dll) e potrai fare 
praticamente ogni cosa, anche variare la frequenza di campionamento 
in real time
-- 
A computer program does what you tell it to do, not what you want it to do.
News 2002 [v 2.07] / StopDialer / PopDuster - 
http://www.socket2000.com
Akapulce portal: 
http://www.akapulce.net


Grazie della risposta, proverò con le DX.
Saluti,
pusky