mii-community/UsenetArchiveIT-conversations huggingface dataset:
Newsgroup: it.comp.lang.visual-basic
Titolo: Forma per sdalvataggio file

Raga, non avete un form per permettere il salvataggio dai file gia
pronto (avete capito di che sto parlando? Intendo quei form che si
aprono quando si clicca su SALVA FILE CON NOME.....)? Io ho provato a
farlo  e ci sarei anche riuscito se non fosse per un maledetto bug che
non riesco ad elilminare e che è difficile da spiegare....... 
P.S.
Chi fosse così gentile da voler aiutarmi ad elilminare il bug dal mio
form di salvataggio, me lo dica che gli mando tutto il forma, visto
che non riuscirei a spiegare che tipo di bug è.......)
ByeZ!
Alkondor

farlo
Alko, fatti prestare da qualcuno il CD con l'Help ! :-))
C'è il controllo commondialog che è fatto apposta, per le finestre
apri file, salva con nome, scelta colore, stampa, scelta font, help,
imposta stampante...
Devi inserirlo nel tuo form, poi usare uno dei metodi
ShowOpen 'Apri
ShowSave 'Salva con nome
ShowColor 'Colore
ShowFont 'Carattere
ShowPrinter 'Stampa o Opzioni di stampa
ShowHelp 'Attiva il motore della Guida in linea di Windows
--
---------------------------------------------
    Le risposte alle tue domande le trovi sul
    Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------
Real E-address: 
gaet...@hotmail.com

Alko, fatti prestare da qualcuno il CD con l'Help ! :-))
Ah!
E io che sono stato a dannarmi per creare qualche cosa di simile al
form standart di win........
Mannaggia!
ByeZ!*
Alkondor
P.S.
Grazie a tutti quelli che mi comprendono e mi aiutano!! Spero di
potervi ricambiare, prima o poi.......

Newsgroup: it.comp.lang.visual-basic
Titolo: Settare permessi a file directory?

Quali sono le istruzioni che devo utilizzare per settare i permessi ad
alcune directory e/o file ad alcuni utenti NT e/o gruppi ?
Grazie,
Simone

alcune directory e/o file ad alcuni utenti NT e/o gruppi ?
Ci sono alcune apette tostarelle qui:
HOWTO: Set Security on a NTFS Folder Programmatically 
Q240176
http://support.microsoft.com/support/kb/articles/Q240/1/76.ASP
hth, hal

 
http://support.microsoft.com/support/kb/articles/Q240/1/76.ASP
E' fenomenale!
Grazie mille l'ho provato e funziona benissimo.
Ora dovrò perder qualche secolo a capire bene come funziona per usarlo
esattamente per i miei fini, però è già un bell'inizio!
A dire il vero io preferirei fare le stesse cose con un file VBS, ma non ci
sono riuscito in nessun modo, sai per caso se c'è un tool che mi permette di
esportare codice VB in VBS o viceversa?
Grazie ancora,
Simone

 esportare codice VB in VBS o viceversa?
spero ardentemente di no.
seno' apro un mail in outlook e mi ritrovo espulso dai miei server :)

 ha scritto nel messaggio
news:9of2he$d3d44$1...@ID-51318.news.dfncis.de...

Contentati di non restare espulsa dalla cuccia....
ciao
ugo


Sono riuscito a fare un po' di modifiche, ma non riesco a levare
l'ereditarietà dalla directory che creo, e ciò mi impedisce di dare permessi
a quella dir ad altri utenti.
Sai per caso qual'è la prprietà che devo impostare a tal fine?+
Poi non riesco a settare altri permessi oltre a quelli standard. A me
farebbe comodo il directory listing ossia la proprietà "visulaizza contenuto
cartella", ma non anche lettura file. Sai se è possibile?
Grazie,
Simone

Newsgroup: it.comp.lang.visual-basic
Titolo: ricavare i nomi di tutte le tabelle

Salve,
	Dovrei ricavare i nomi di tutte le tabelle che sono in un db SQL 
utilizzando ADO.
Come posso fare ?
Grazie

 ha scritto


Hai ragione !!!
Nella documentazione c'č anche un BEL esempio :-)
Sono io che non ho visto che mi devo mettere gli occhiali :-/
Grazie 

 Grazie

Newsgroup: it.comp.lang.visual-basic
Titolo: Crystal report e stampa fatture....

Mi sto accingendo a fare una stampa della fattura.
Ecco il mio problema:
vorrei che la parte inferiore della fattura (quella subito dopo gli
articoli) sia disposta sempre alla stessa altezza del foglio,
indipendentemente dal numero di articoli.
Come posso fare ?
Es. Fattura
INTESTATARIO
::::
:::
ARTICOLI
Art.1
Art.2
TOTALE ORDINE <---------- QUESTA RIGA la vorrei sempre alla stessa altezza
!!!
Grazie 1000

 TOTALE ORDINE <---------- QUESTA RIGA la vorrei sempre alla stessa altezza
puoi mettere il totale in una sezione di gruppo e fra le sue proprietą
imposta "stampa a fine pagina"
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] APP.PREVINSTANCE VB6 SP4

Non capisco se e' un buco di VB oppure.....
senza tediarvi con tutta la storia, vado al dunque....
ho un programma scritto in VB6 sp4.
tramite
app.previnstance
nella form_load della prima form dell'applicazione, vado a testare che non
sia gia' in esecuzione e fin qui.... tutto ok, funziona egregiamente e fa
cio' che mi aspetto faccia, ossia una volta lanciato il programma, non ne
permette l'esecuzione di altre istanze dello stesso.
Ma guarda caso lo stesso programma l'ho messo anche su CD, bene.... lancio
quello sull'HD parte..... doppio click su quello del CD e parte anche quello
!!!!!! e questo sinceramente oltre che a non andarmi bene mi sconvolge
alquanto....
e non mi sogno nemmeno di mettere un qualsiasi indicatore di programma
attivo ne su file ne sul registro perche' lo ritengo una barbarie....
(ma se proprio debbo... sigh !!! )
E' una cosa normale o capita solo a me... ????? Magari ne avete parlato  e
riparlato la settimana scorsa di questo problema, ma e' da un po' che latito
da queste parti... ;o))
TIA
Ven.

Se non sbaglio sul sito comune è stato aggiunto di recente un'applicazione
che fa al caso tuo ..
Saluti


 ha scritto nel messaggio
news:9955m0$1qc$1...@fe1.cs.interbusiness.it...


 deve per forza pensare che siano la stessa cosa? =)
dipende da cosa controlla app.previstance

Newsgroup: it.comp.lang.visual-basic
Titolo: Controllo apertura Programmi Windows

Salute a tutti,
E' possibile con VB6 (o meglio, se già esistesse qualche utility in
WIN98) intercettare l'evento di apertura di un'altra applicazione
Windows, e registrarne l'istante di apertura e chiusura in un file
sequenziale ?
Esempio: voglio sapere a che ora è stato aperto WORD.EXE e a che ora è
stato chiuso, o eventualmente un qualsiasi programma .EXE 
Grazie.  Loris

 ha scritto nel messaggio
news:3cba6dfa...@news.seven.it...

Beh, la cosa più semplice è quella di creare un file Batch da inserire come
'destinazione' nelle proprietà dei collegamenti ai programmi che vuoi
controllare.
Il file batch protrebbe contenere le seguenti righe:
@echo off
If "%1" == "" Goto End
time /t >> c:\ApplicationRun.Log
date /t >> c:\ApplicationRun.Log
echo %1 >> c:\ApplicationRun.Log
echo **** >> c:\ApplicationRun.Log
start %1
:End
exit
Il file batch lo chiami p.e. c:\Run.Bat e come 'destinazione' nella proprietà
del collegamento a Word (p.e.) scrivi:
c:\Run.Bat "C:\Programmi\Microsoft Office\Office\WINWORD.EXE"
Ciao!
--
Esteban
Hosted by 
www.seber.it
(Remove nonspammare for reply)
Newsgroup: it.comp.lang.visual-basic
Titolo: Gestione eventi

Ho creato un programma in VB che invia sulla porta seriale una stringa di
dati (2 Byte) ogni 100ms.
Ho utilizzato un semplice "Timer" settato con la temporizzazione di cui
sopra.
Ho verificato con l'oscilloscopio che se lancio il programma da solo, il
tempo di invio dei 2 Byte ogni 100ms viene rispettato (salvo piccole
varianze). Se nel contempo uso altri programmi, i tempi alcune volte si
allungano di molto, altre volte più o meno si attestano sui fatidici 100ms.
Non sono un esperto di VB e Windows, credo che il problema sia dovuto al
rilascio dell'evento da parte degli altri programmi (il DoEvents per
intenderci).
Chiedo aiuto a chi ne sa più di me: esiste un modo per rendere prioritaria
l'esecuzione di questo programma rispetto agli altri?
O comunque come posso fare per risolverlo?
Grazie.
--------------------------------
Inviato via 
http://arianna.libero.it/usenet/

 sopra.
Il Controllo Timer non è adatto per applicazioni 'real time' avendo
uno scarto non sempre accettabile (come anche tu hai verificato).
Potresti usare il timer multimediale di windows (API della multimedia
library winmm.dll).
Prova a dare un'occhiata qui:
http://www.vbaccelerator.com/home/vb/code/Libraries/HiResTimer/article.asp
Altrimenti dovresti creare un Thread separato assegnandogli un'alta
priorità, ma questa strada con VB è difficilmente percorribile.
Ciao.
Daniele.
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] [VB.NET] Domande varie

Ciao ragazzi,
E' da un po' che sto smanettando con 
VB.NET
 Beta 2 e ho alcuni problemi che
non riesco a risolvere... Procediamo con ordine:
1. Qualcuno che ha provato la Release Candidate 1 mi può dire se in essa è
tornata la proprietà "Visible" nella finestra delle Proprietà di un Windows
form? Con la Beta 2 non sono ancora riuscito a trovare il modo per avviare
un'applicazione con il form principale nascosto all'avvio;
2. Se, nella proprietà Text di un CommandButton, inserisco una & per creare
uno short-cut, la lettera in fase di esecuzione non appare sottolineata, per
farla sottolineare devo premere il tasto ALT. E' normale questo
comportamento, oppure è un bug delle Beta 2 (anche se non credo...)?
3. (Preciso che ho cercato per 2 secondi, magari questa è una stupidata...)
Come si crea una matrice di controlli? Ho provato a inserire due PictureBox
nel form e impostare per la seconda lo stesso nome della prima: pensavo che
VB mi chiedesse se volevo creare una matrice di controlli, come accade con
la versione 6, mentre ottengo un messaggio di errore "Proprietà non valida";
4. L'handle di un form, che in VB si recuperava accedendo alla proprietà
"hWnd", in 
VB.NET
 è disponibile in "handle.Int32"? Lo chiedo perché,
cercando di utilizzare alcune API che richiedono l'handle del form, usando
"handle.Int32" la funzione non va...
Ringrazio in anticipo quanti avranno la voglia e la pazienza di rispondermi.
--
Marco Minerva, 
vbco...@libero.it
http://www.marcominerva.com/vbcorner

 la versione 6, mentre ottengo un messaggio di errore "Proprietà non
valida";
Non ho ancora avuto l'onore (o orrore?) di provare 
VB.NET
, ma mi risulta che
non sia pù possibile creare matrici di controlli.
Forse a run-time...
Ciao

 "handle.Int32" la funzione non va...
La vecchia proprietà hWnd e stata sostituita con Handle che, a memoria,
ritorna un Int32 (Integer in VB.Net) percui basta che passi Form1.handle
alla tua API, ricorda che nella Declare i Long diventano tutti degli integer
visto che in .Net un intero è 32 bit, Long è 64 bit. Non dimenticare di
usare l'attributo MarshalAs in caso di stringhe.
Ciao
Corrado

 Form.Hide nell'evento activate (per nulla bello...)
Io ho l'RC1 e lavoro con quella. E' una gran rottura dato che tutti gli
esempi e le cose fatte che si trovano in giro sono per la Beta2, ma viste le
differenze tra le due versioni in termini di cose cambiate (avevo mandato il
link tempo fa) preferisco usare quella in modo da minimizzare le modifiche
al codice man mano che arrivano le cose definitive.
Saluti
Massimo

 ha scritto nel messaggio
news:9ukvgf$99a86$1...@ID-112744.news.dfncis.de...

Newsgroup: it.comp.lang.visual-basic
Titolo: [?]Programmi sito comune

Ho 2 programmi che vorrei inserire nel sito comune, sia per la grafica,
che per la funzione. Dunque, di uno non voglio dare i sorgenti, perchè c
sono anche 7 uova di pasqua dentro e voglio che le scopriate voi,
l'altro posso darli i sorgenti. Ho scritto al webmaster ma sono + di 15
giorni che non ricevo risposta. Gli ho anche mandato il primo programma,
ma nisba. A chi devo rivolgermi in questi casi?
Ciao e grazie
Artemis 23am

...

Probabilmente ci sarà del lavoro arretrato da sbrigare, inoltre i programmi
che vengono inseriti nel sito devono essere di pubblica uitlità e non so se
le uova di pasqua facciano parte di questa categoria.
Con questo non voglio dire che il tuo prg non sia di utile...
Vedrai che riceverai qualche risposta.
Ciao Marco

 Vedrai che riceverai qualche risposta.
Lo spero...
Ciao
Artemis 23am


Vi chiedo scusa per le attese!
Haime' Alfonso Di Stasio ed io abbiamo tentato di presidiare il Sito Comune
(come WM) anche in Agosto, ma alla fine gli incastri non  hanno conbaciato
:-(
Il WM, Alfonso Di Stasio (e non piu' io come riportato sulla HomePage), e'
tornato operativo giusto oggi.
Le Mail arrivate sono TANTE (60 e +), e ci vorra' tempo prima di smaltirle
tutte (contando anche che continuano anche ad arrivarene di nuove, il che e'
fantastico ovviamente :-)), comunque tutti riceveranno risposta.
Il sito tornera' operativo al 100% entro pochi giorni.
Per quanto riguarda i tuoi due files, dare i sorgenti e' sempre l'ottimo, ma
ovviamente non sempre si puo' fare... . Quindi vengono accettati anche senza
sorgenti, l'importante e' che siano programmi/OCX che possano essere utili
agli sviluppatori. Comunque posso dire che a tutt'oggi la % di files
scartati perche' OT e' bassa.
Anzi, dato che ci siamo :-)))
Sarebbe bello se la sezione degli articoli in "Piccole Perle" di espandesse
con nuove pubblicazioni, quindi se qualcuno ha una conoscenza particolare su
qualcosa (c'e' sempre) puo' provare a scrivere un articolo da pubblicare; al
piu' presto ne faro' uno anch'io sui barcodes.
Salutoni
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

 qualcosa (c'e' sempre) puo' provare a scrivere un articolo da pubblicare;
B'è, io sto facendo anche un super programma con Delphi e non con VB. Posso
mettere quelle conoscenze? :)
Grazie
Ciao
Artemis 23am

 qualcosa (c'e' sempre) puo' provare a scrivere un articolo da pubblicare;

Newsgroup: it.comp.lang.visual-basic
Titolo: AIUTO!!

Ho fatto un programma con VB4 16bit che utilizza un controllo VBX per
gestire immagini JPG e finche' lo uso io funziona benissimo .
Il problema e' che per installarlo su altre macchine ho utilizzato
l'autocomposizione installazione e dopo aver eseguito il setup quando
tento di far partire il programma mi dice che non puo' caricare o
registrare il controllo .
L'unico modo di farlo girare e' installare il controllo anche su
questa macchina , ma non mi sembra proprio il caso!!
Qualcuno sa darmi una mano ??
Grazie

...


Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Listview: colore di sfondo di una cella

Ciao a tutti. Ho cercato tutto quanto riguarda listview e colore, ma non ho
trovato come assegnare a una singola cella (vorrei usare listview come una
griglia) un colore diverso da quello di evidenziazione della riga
correntemente selezionata. In pratica vorrei evidenziare (anche da codice,
non necessariamente in automatico) una cella qualsiasi della riga corrente
per la quale prevedo la FullRowSelection (non ricordo bene, insomma, quella
proprietą che evidenzia tutta la riga). Grazie.

 
Temo non sia possibile. Devi usare un altro controllo ...
ciao
		maxx

 ha scritto nel messaggio
news:3CEEB619...@laserinforma.com...

... lo temevo. Grazie, comunque.
(M$ scrive (o compra) 8000 controlli, molti simili fra loro, ma si diverte a
mettere alcune funzionalità in uno, altre in un altro). Bah, continuerò a
usare la mia vecchia, brutta, ma fidata Grid.

 usare la mia vecchia, brutta, ma fidata Grid.
In questo caso e' la scelta migliore...
uno degli equivoci piu' comuni e' quello di considerare il ListView in
modalita' Report una "griglia", spesso quindi ci si aspetta delle
funzionalita' che non possiede; in realta' e' stato concepito piu' che altro
con l'intento di visualizzare liste di Oggetti e relativi attributi.
Ciao
--
Luca Dormio - 
luca....@tin.it
________________________________
"Marty, non stai ragionando in maniera quadridimensionale"
Dr. Emmett L. Brown

 attributi.
Ok, però il colore del testo si può impostare per ogni ListSubItem...
potevano fare anche lo sfondo, no?
Bah ...
--
Faber
Newsgroup: it.comp.lang.visual-basic
Titolo: VS PRO 2005: Impossibile trovare la DLL PInvoke 'sqlceme30.dll'.

Salve a tutti,
ho creato un semplice programmino in VB2005 PRO che visualizza i dati
di un database..
Il database è  di tipo origine dati "Microsoft SQL Server mobile
Edition", è connesso e funzionante..
Succede questo:
- se lo eseguo in modalità "Pocket PC 2003 - Emulatore", l'emulatore
si avvia ed il programma funziona!
- se lo eseguo in modalità "Pocket PC 2003 - Dispositivo", quindi con
il mio palmare collegato, lo elabora, ma poi si ferma in debug sulla
riga:
Me._adapter.DeleteCommand = New System.Data.SqlServerCe.SqlCeCommand
dandomi il seguente errore:
" Impossibile trovare la DLL PInvoke 'sqlceme30.dll'.".
Ho effettuato un pò di ricerche su internet, ho letto che bisogna
copiare questa e altre dll nella cartella \bin\debug\ del programma,
cosa che ho fatto!
Ho provato inoltre a metterle anche nella cartella del programma sul
palmare, ma stesso errore..
Chi mi sà aiutare? Credo di esserci molto vicino, ma..
Grazie molte!

Ho risolto!
Bisogna copiare nella directory del programma, direttamente sul
dispositivo, le dll presenti sul PC al percorso C:\Program
Files\Microsoft Visual Studio 8\SmartDevices\SDK\SQL
Server\Mobile\v3.0\wce500, e da questa directory scegliere quella del
processore del proprio device!
tutto qui ed ha funzionato!

Newsgroup: it.comp.lang.visual-basic
Titolo: Vecchio archivio DBIII

vi chiedo un aiuto per questo(banale?+ACE-)problema
ho un archivio che contiene dei campi vuoti che una volta inseriti in VB4
vengono letti come null e mi danno un err94 tutte le volte che provo a dare
text2.text+AD0-data2.recordset+ACEAWw-t1+AF0-
con t1 campo vuoto.
Seguendo le istruzioni in linea ho provato ad applicare la proprieta'
V1xNullBehavior al mio database (che gestisco tramite un oggetto 'data' di
VB4) ma ottengo un errore.
potrei risolvere la cosa con un controllo tipo isnull per ogni campo, ma i
campi sono tanti e non so se esiste qualcosa di piu' veloce.
grazie in anticipo
massimo
--
Non farei mai parte di un club che avesse tra gli iscritti uno come me

Prova a fare l'assegnazione in questo modo:
Text1.Text = "" & AdoControl.Fields("TuoCampo").Value
Assegnando alla proprietà Text Una stringa Vuota concatenata ad una stringa
nulla non otterrai più l'errore poichè il risultato è una stringa vuota.
--
      Pino Saffioti
-----------------------------------
pino.s...@asl1.to.it

Newsgroup: it.comp.lang.visual-basic
Titolo: Problema con Database

Ho un problema con i database, come faccio a confrontare 2 database ed a
ottenerne uno con la differenza dei due!!!
Timothy Redaelli
red...@libero.it

Mi sembra che sul Sito Comune ci sia qualcosa!
www.it-lang-vb.net
CiaoZ
SebaMix
Newsgroup: it.comp.lang.visual-basic
Titolo: eliminare o cambiare il tipo di avvio di un servizio

Ciao a tutti,
In VB è possibile eliminare un servizio nt o cambiare il tipo di avvio
(es da manuale ad automatico)???
Grazie


Sì, bisogna usare le API di advapi32, come OpenSCManager, OpenService,
ChangeServiceConfig, DeleteService etc. etc.
http://www.smsoft.ru/en/ntservice.htm
http://www.techbytes.ca/techbyte16.html
Bye
Raf
-----------------------------------------------------
Funk: cooler than the other side of the pillow.
--------------------------------------------------------------------------------
La mia Cartella di Posta in Arrivo è protetta con SPAMfighter
965 messaggi contenenti spam sono stati bloccati con successo.
Scarica gratuitamente SPAMfighter!

Newsgroup: it.comp.lang.visual-basic
Titolo: ole in visual basic

mi servirebbe inserire la possibilita' in una mia form in VB di inserire
del testo avendo la possibilita' di cambiare colore/fonts.
Ho pensato a realizzare un OLE ma il salvataggio funziona, mentre il
caricamento (da file) mi blocca l'ogetto e non mi da piu' la possibilita'
di editarlo (ne cmq si vede qualcosa).
Se disabilito la funzione che fa il loadole riesco a modificare e salvare
quello che ho scritto. se la abilito mi blocca tutto. idee?
grazie mille
Private Sub getOle()
Dim FileNum As Integer
Dim filename As String
filename = "gc-" + id.Caption + ".ole"
 
   FileNum = FreeFile
   Open filename For Binary As #FileNum
   OLE1.ReadFromFile FileNum
   Close #FileNum
OLE1.DoVerb vbOLEShow
End Sub
Private Sub saveOle()
Dim FileNum As Integer
Dim filename As String
MsgBox "disattivata", vbCritical
Exit Sub
filename = "gc-" + id.Caption + ".ole"
   FileNum = FreeFile
   Open filename For Binary As #FileNum
   OLE1.SaveToFile FileNum
   Close #FileNum
End Sub

>>>...
proprio nessuno? un consiglio, un link, non  so proprio che fare

 Ho pensato a realizzare un OLE
Il RichTextBox l'hai scartato?



Solo cercando ora su internet ho trovato qlc a riguardo.
se mi permette di far scegliere all'utente dei fonts diversi all'interno
dello stesso richtext e di salvare/ricaricare sono a posto.
mi salvo il percorso del file sul db e poi lo carico li.
si puo' fare? grazie 1000

 si puo' fare? grazie 1000
Io non lo uso, ma sono certo che usa la (potente) sintassi RTF, quella di
Word, per intenderci e quanto contiene (dietro, non quello che si vede) è
puro testo ascii, quindi lo puoi depositare come vuoi.
Vedi RichTextBox sulla guida.

 
grazie,stasera  provo a guardarci
Newsgroup: it.comp.lang.visual-basic
Titolo: [?] medesima Combo in più Form... si pote ?

ahi ahi...nubi nere all'orizzonte...
dunque avrei la necessità di utilizzare una stessa combo in più form. Il
problema è che questa combo contiene 6000 voci per cui ho ovviato al
problema con un mini form "Attendere Prego" ma naturalmente questo si apre
ogni qual volta accedo alla form.
Poichè la stessa combo (l'ho chiamata C7) esiste in diverse form... qualcuno
sa se è possibile predisporre una "Global Combo7" in modo che l'utente non
debba sempre "attendere prego" ?
decisamente und perniciosamente
Davide

perchè nessuno mi risponde ?
delusamente und drasticamente
Davide

Ciao Davide,
    se vuoi puoi raggirare l'ostacolo caricando in avvio di programma una
form contenente un DBGRID o un MSFLEXGRID o un  GRID dipende solo da dove
arrivano i dati (da DB access ad es., o da file TXT).
In ogni caso la form la leggo ma non la visualizzi se non quando ti serve.
Nelle form sotituisci il combo con un textbox e all'evento dblclick richiami
sub textbox.click
    form6000dati.show vbmodal
    textbox.text=pubvar
exit sub
In questo modo la procedura si ferma dopo la prima riga e visualizza la form
con il grid.
Quando fai dblclick sul record con il dato che hai scelto (ad es.
dbgrid.column(0).text ) fai sě che il dato che ti interessato scriva il suo
contenuto o il codice relativo in una variabile:
ad es:
sub dbgrid_dblclick()
    pubvar=dbgrid.column(0).text
    me.hide
exit sub
La form viene nascosta e non chiusa: in questo modo č subito disponibile al
prossimo show.
E' un pň scomodo ma alla fine sono solo 4 righe e non penso vada abbastanza
veloce..
NB: Chiaramente 'pubvar' č una variabile globale di tipo VARIANT
Spero di essere stato chiaro e soprattutto utile!
Ti saluto
Pancho
ste...@officybe.com

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] SHELL

la funzione SHELL di VB mi permette di lanciare un applicazione in modo
asincrono.
Il problema č che io vorrei lanciare l'applicazione in modo sincrono (cioč
la funzione mi ritorna quando l'applicazione lanciata termina).
Neppure la la funzione API ShellExecute sembra che lo permetta.
Come Fare?
Grazie
 Lorenzo

Sul sito comune (
www.murialdo.it/it_lang_vb
) ho visto un esempio di Shell
sospensiva, che dovrebbe essere quello che cerchi tu. Spero che il server
Murialdo.it non sia giů... :(
CiaoZ
SebaMix
!...!

!...!

Sito comune

 ha scritto nel messaggio
news:Dhbk6.45894$Uj1.4...@twister2.tin.it...

Newsgroup: it.comp.lang.visual-basic
Titolo: Pubblicazione di immagini su sito web

Ciao a tutti,
devo realizzare un programmino che prenda delle immagini da un disco
locale e le salvi in una directory su un sito web (via ftp).
Mi date per favore qualche link da dove prendere spunti in merito?
Grazie mille
Ciao
A.
-- 
questo articolo e` stato inviato via web dal servizio gratuito 
http://www.newsland.it/news
 segnala gli abusi ad 
ab...@newsland.it

Il componente "Microsoft Internet Transfer Control 6.0" fa al caso tuo.
Guarda sull'MSDN per la guida a riguardo.
Ciao,
*Roby*
Manuel ha scritto:


per il trasferimento ftp guarda su 
www.vbsimple.net
 nella sezione
client/server
bye
-- 
Esistono 10 tipi di persone: chi conosce il binario e chi no.
Gestione Ottica - Gestionale per Ottici e Programmi Gratuiti su:
http://www.nicolaottomano.it

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] stampare VB

Il problema è il seguente: quando si usa la sintassi Printer.Print tutto ciò
che si desidera stampare viene inviato allo spooler di Windows; solo quando
si usa Printer.EndDoc il tutto viene inviato effettivamente alla
stampante.... e fin qui tutto ok.
Piccolo particolare: Printer.EndDoc fa un salto pagina ed in qualche caso
non lo deve fare!!! C'è modo di evitarlo?

...


Semplice: se la stampante è una stampante ad aghi e devo stampare su delle
etichette può essere antipatico fare un salto pagina come invece si fa
normalmente quando si stampa un documento su di un foglio normale.

...


Colpito e affondato!
tante scuse ....
In effetti è un problema che devo affrontare anch'io fra poco ed ho pensato
ad una soluzione del genere:
- un pgm deve stampare n etichette alla volta (n non è prevedibile)
- Stampante: ink-jet a fogli singoli
- Supporto: etichette 2cm x 4cm ca su fogli A4
- La stampa avviene in stretta cooperazione con l'operatore che deve
immediatamente usare le etichette:
Soluzione:
    Dato che i fogli sono sempre gli stessi e che, staccate le etichette, il
singolo foglio puo' essere riposto nuovamente nel cassetto della ink-jet
(evitando sprechi e carta in giro): tengo traccia della posizione
dell'ultima etichetta stampata, quando richiesto faccio partire la stampa
dall'etichetta successiva e, se è il caso, passo anche al foglio successivo.
Prima della stampa presento all'operatore un form che riproduce il foglio di
stampa (etichette stampate in nero, etichette vuote in bianco) in modo che
possa, se necessario, indicare quali etichette sono utilizzabili.
Se non ci sono problemi (stacco un'etichetta e ne strappo un'altra) la cosa
puo' procedere molto velocemente e senza sprechi di etichette.
Naturalmente la soluzione è adeguata alla problematica da affrontare e
comnque prevedo, in futuro quando il pgm funziona da mesi e sono rientrati
dei costi, di far acquistare un bar-label-printer economica
(duemilionicinquecentomilalirealmenoallafacciadell'economicita').
Saluti By MAX

Newsgroup: it.comp.lang.visual-basic
Titolo: Come Spedire Email con O.Express da VB6..??

Grazie
--
------ C.E.D. - L'Abbondanza Srl -----
Lorenzo Piombini & Vigna Federico
Email : 
abbon...@technet.it
------------------------------------------------------

...

Newsgroup: it.comp.lang.visual-basic
Titolo: Cerchi software!!!

Richiedi lista!!!

>Richiedi lista!!!
Ho mandato la richiesta ad 
ab...@libero.it

 Richiedi lista!!!

Newsgroup: it.comp.lang.visual-basic
Titolo: Esempi su CR

Salve,
esistono esempi sull'utilizzo di  Crystal Report  in VB?
Inoltre , è necessario di licenze particolari per usare il CR incluso nel
visual studio?
Grazie

 Grazie
se il visualstudio non è piratato no... puoi distribuire le tue applicazioni
con cr (cioè con la gestione dei report fatta da cr) senza problemi...
Aloha
Stefano

Newsgroup: it.comp.lang.visual-basic
Titolo: Menu di excel

Salve a tutti.
Sono alle primissime armi con il VBA e chiedo il vostro aiuto
per risolvere un mio problema.
In certo foglio devo sostituire i menu di excel per cambiarli con altri con
funzioni diverse.
Con le macro di excel 4.0 riuscivo a cavarmela ma con il VBA no riesco
a sbrogliarmela.
Inoltre vorrei che all'apertura del foglio vengano rimosse tutte le barre
degli
strumenti esistenti e che alla chiusura (da fare a mezzo di una macro)
vengano
riprisitinate per non creare problemi con altri fogli di lavoro.
Armeggiando con la guida in linea ho trovato il comando
"Application.CommandBars("...........").Visible = False
ma questo pressuppone che io conosca quali barre siano aperte
mentre non sempre so quali barre siano presenti.
Come si puň rimediare?
Grazie a tutti.
Pino

 riprisitinate per non creare problemi con altri fogli di lavoro.
Prova con questo codice che ho "riesumato" da un mio vecchio foglio (mettilo
in un modulo)
Quanto alla sostituzione invece, penso che tu possa creare delle barre
personalizzate tue e renderle visibili ad hoc.
Dim barre(25) As Integer (questo è da mettere nella dichiarazioni del
modulo)
Sub auto_open()
    contabarrestrum = Toolbars.Count
For i = 1 To contabarrestrum
If Toolbars(i).Visible = True Then barre(i) = 1
Next
For a = 1 To contabarrestrum
Toolbars(a).Visible = False
Next a
End Sub
Sub auto_close()
For a = 1 To Toolbars.Count
    If barre(a) = 1 Then Toolbars(a).Visible = True
Next a
End Sub

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

ciao a tutti,
il mio problema e' questo: se ho un oggetto list1 con all'interno dei nomi e
vorrei
ad esempio estrarre tre nomi a caso della lista1 e visualizzarli in una
lista2 come posso fare?
spero di essermi spiegato bene ,se qualcuno puo' farmi un'esempio ne sarei
molto grato.
grazie a tutti ciao.

guarda sull'help le funzioni Rnd e Randomize, poi lavora su List1.ListIndex
Ciao!
Faber

 ha scritto nel messaggio
news:8ad96b$2cts$1...@stargate1.inet.it...


probabilmente sbaglio qualcosa(sono principiante)
Allora prova a postare un tuo pezzetto di codice che vediamo dove sbagli.
Il problema č piuttosto semplice...
Ciao

 ha scritto nel messaggio
news:8aep4s$5n6$1...@nslave2.tin.it...


Next
Ok, perņ č inutile che ad ogni giro fai il Randomize, lo puoi benissimo
chiamare prima di entrare nel for.
Poi, se anzichč Int(i * Rnd) + 1 usavi Int(i * List1.ListCount) ogni volta
TUTTE le voci avevano la stessa probabilitą di essere scelte.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: Installazione applicazione.

Salve a tutti,
devo distribuire il mio programma, ma vorrei evitare che lo possa installare
gente da me preventivamente non autorizzata. In pratica il mio programma non
lo faccio pagare ma vorrei essere sicuro che venga installato solo da quelli
a cui do il pacchetto ed evitare che qualcuno facendosene una copia o
ricevendone una copia da quelli autorizzati lo possa installare.
Grazie a tutti
Vincenzo

Newsgroup: it.comp.lang.visual-basic
Titolo: Controlli immagine kodak

Salve,
qualcuno potrebbe indicarmi dove posso trovare esempi di applicazioni in cui
si utilizzano i seguenti controlli:
ImageEdit (IMGEDIT.OCX)
Annotation Toolbar (IMGEDIT.OCX)
Thumbnail Viewer (IMGTHUMB.OCX)
Scanner Control (IMGSCAN.OCX).
La documentazione che ho a disposizione e' molto scarsa, pertanto qualsiasi
riferimento potrebbe tornarmi utile.
Ringrazio anticipatamente chiunque voglia rispondere.
Rita  M.

Scanner Control (IMGSCAN.OCX).
[...]
So che ci sono informazioni su MSDN. Microsoft infatti supporta questi
controlli che fanno parte di Imaging fornito con Windows.
Ciao
---
--
-
MIX (VB5SP3)
170 links a siti VB
http://www.tempolibero.com/user/mix/
http://space.tin.it/computer/gaais/
-
--
---

Newsgroup: it.comp.lang.visual-basic
Titolo: Jpeg and Gif

Come posso leggere i formati JPEG e GIF da Visual Basic 4?
Chiunque legga questo messaggio, per favore mi aiuti!
Grazie
pil...@tin.it

 Grazie
Se hai solamente bisogno di leggerli basta che usi una picturebox ed il suo
metodo loadpicture... Ma sicuramente non è questo che chiedevi... Quindi
almeno per il formato Jpg sul Sito Comune (Url in fondo al post) trovi
quello che ti serve.
Ciao
Daniele
---------------------------------------------------------------------------
Le risposte alle tue domande le trovi sul Sito Comune di questo NewsGroup:
 
http://www.murialdo.it/it_lang_vb
---------------------------------------------------------------------------


Puoi anche utilizzare il controllo IMGEDIT.OCX, basta istallare Imaging della
Kodak. E' fornito con Windows95.
Usa la proprietą IMAGE per indicare il percorso dell'immagine, e quindi il
metodo DISPLAY per visualizzarla.
Ciao
--
Posted from 
venere.inet.it
 [194.20.8.4]
via Mailgate.ORG Server - 
http://www.mailgate.org
Newsgroup: it.comp.lang.visual-basic
Titolo: MODEM

Dovrei aggiornare due o piu' database Access tra loro via MODEM , qualcuno
può darmi per favore qualche indizio??.
Grazie in anticipo a coloro che mi aiuteranno.
Ciao Gabriele

 wrote:
C'e' il modo di connettere due computer via modem o via internet
simulando una rete locale. Mi sembra che lo si possa fare con win98...
bho...
Mi sembra l'approccio piu' generale possibile.
Forse, peero', se i dati sono tanti, e' meglio prevedere un piccolo
programma da spedire via posta o corriere (CDROM o dischetti) che
faccia sul posto tutte le modifiche del caso.
Ciao Lorenzo

Lorenzo Tomellini


Dipende da che tipo di aggiornamento devi fare.
Se devi sincronizzare i due database fai vedere ad Access (o a VB) i due
computer collegati come se fossero in rete locale e poi usi i comandi per le
repliche.
Usando le repliche hai un tempo morto iniziale che dipende dal numero di
record complessivo del database, poi il tempo č direttamente proporzionale
al numero di record che devi aggiornare. Una mia applicazione gestisce le
repliche via modem e non va malaccio.
Attenzione a gestire i conflitti tra i vari database.
La soluzione piů comoda č quella di evitare conflitti e cioč di fare in modo
che due o piů utenti non possano modificare lo stesso record nello stesso
intervallo di tempo. Ma questo dipende dall'applicazione.
Se le modifiche ad un database avvengono da una sola parte e devi solo
riportarle nelle altre parti probabilmente ti conviene farti un formato file
tipo testo o simili che puoi comprimere come vuoi e inviarlo
all'applicazione che lo decomprime e lo importa.
E' sicuramente piů veloce che nel gestire le repliche etc
Paolo Spellani

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] Criptazione per novellini!

Sto tentando disperatamente di fare un programma
che cripti i files in un modo semplicissimo... Ma...
Ovviamente, non funziona!
Il mio problema è questo.
Il codice in questione per criptare i file pone in testa
al codice del file una serie di bytes, per avvisare il
mio programma, al momento della decriptazione, che
quel file è già stato criptato e che deve quindi essere
tradotto. Successivamente mette un byte che varia a
seconda della password. E, fin qua, tutto OK.
Poi, per incasinare veramente il file, il mio amico programma
legge tutti i valori decimali dei byte li incrementa di uno.
Lo so che è un metodo un po' bovino, ma per me basta
ed avanza! Il problema è che a volte, per motivazioni
a me oscure, viene generato un overflow al momento di
aggiungere 1. Questo dovrebbe avvenire, immagino,
se il byte da occultare è pari a 255. Qualcuno saprebbe
propormi un metodo migliore, più sicuro ma ugualmente
semplice?
Ciao
Giulio

semplice?
Se guardi 3 o 4 righe più sotto troverai il post "Criptare un numero".
La soluzione dello Xor potrebbe andarti più che bene.
Ciao
Newsgroup: it.comp.lang.visual-basic
Titolo: [OT]  XP Outlook express / email

Ciao a tutti.
Vorrei fare un mio programmino VB6 per
rintracciare pi� agevolmente le email
inviate/ricevute ma non riesco a trovare
dove sono.
Supponevo che si trattasse di normalissimi
files ma forse mi sbaglio.
Ho fatto una ricerca su C:
Tutti i files *.*
Contiene: "un indirizzo email utilizzato"
Anche nelle cartelle di sistema
Non ha trovato niente.
Attendo, se possibile, chiarimenti.
Grazie.
Sauro 

 ha scritto nel messaggio
news:hcs13n$g7v$1...@aioe.org...



Outlook Express conserva le email in appositi file binari .dbx, ciascuno 
corrispondente ad una cartella di OE, situati in una particolare directory:
C:\Documents and Settings\{UserName}\Local Settings\Application 
Data\Identities\{Guid}\Microsoft\Outlook Express
Sfortunatamente per� il formato dei file dbx non � documentato ed � 
difficile trovare delle librerie free per accedervi.
Qua forse trovi qualcosa (sebbene in C#):
http://www.codeproject.com/KB/recipes/DBXParser.aspx
Bye
Raf 

 
http://www.codeproject.com/KB/recipes/DBXParser.aspx
O in VB6 dal Sito Comune:
http://www.it-lang-vb.net/archivio.asp?subMenu=Tutte&FullText=on&TypeRic=AND&keyword=dbx
Nicola

 Raf
Grazie Raf
Adesso ci provo.
Sauro 


Grazie ToSka.
Saluti.
Sauro 

 Nicola
Thx
Ciao
Raf 

 Nicola
Grazie Nicola.
L'ho provato.
E' ottimo ma un po' troppo complesso per me.
In realt� non user� solo l'ocx ma apporter� solo
qualche modifica sul programma di prova che c'�.
Saluti.
Sauro 

 dove sono.
Apparte i consigli tieni conto che Outlook Express non esiste pi� in Vista
o Seven, quindi avr� vita breve.


E, tralaltro, ci sono molti client email in giro oltre ad OE.
Ad esempio Thunderbird, outlook, Windows Live Mail, ecc...
Nicola
Newsgroup: it.comp.lang.visual-basic
Titolo: [?2] disattivare nel text BOX la tendina del p. destro

Ciao
Sapate come disabilitare la tendina (Annullata, Taglia, Copia, Incolla,
elimina , seleziona tutto?) che appare quando si clicca con il tasto destro
del mouse su un Text BOX
hal1961 mi ha suggerito : Text1.Enabled = False
ma non riesco più ad usare l'oggetot. Voglio poter utilizzare quell' oggetto
generando alla pressione del tasto desto del mouse un evento particolare,
l'apertura di una tendina personalizzata.
Cosa mi suggerite per la disattivazione???
Cosa mi suggerite per la tendina???
Ciao Grazie

l'apertura di una tendina personalizzata.
Ahecco !
Non c'e' nemmeno bisogno di subclassare la textbox.
Ho provato mettendo una textbox in un form e un menu, chiamato mnuPopUp
e composto da mnuPop1 e mnuPop2.
Ecco l' esempio, provato con win2k e vb6:
Private Declare Function LockWindowUpdate Lib "user32" _
         (ByVal hwndLock As Long) As Long
Private Sub mnuPop1_Click()
   Text1.Text = "cliccato il menu custom n. 1"
End Sub
Private Sub mnuPop2_Click()
   Text1.Text = "cliccato il menu custom n. 2"
End Sub
Private Sub Text1_MouseDown(Button As Integer, Shift As Integer, _
                           X As Single, Y As Single)
   If Button = vbRightButton Then
      LockWindowUpdate Text1.hWnd
      Text1.Enabled = False
      DoEvents  '// e' necessario !
      PopupMenu mnuPopUp
      Text1.Enabled = True
      LockWindowUpdate 0&
   End If
End Sub
ciao, hal

End Sub
Sicuro del DoEvents?
A me funziona anche senza... (VB6+SP3+W95)
Ciao

A me funziona anche senza... (VB6+SP3+W95)
Anche a me, adesso :)
Ho cambiato pc, probabilmente l' altro era un po' sovraccarico :)
(era un p200 con 176 MB, e  una quantita' esorbitante di programmi attivi, 
adesso ho riprovato con un pIII 800 e 512 MB)
Diciamo, allora, di non usare DoEvents nemmeno in questo caso.
Grazie per l' attenzione ;-)
ciao, hal

Grazie per l' attenzione ;-)
Eheh, ogni DoEvents in meno č un piccolo passo per noi, un grande passo per
l'umanitą.
:)
Ciao

> (era un p200 con 176 MB, e  una quantita' esorbitante di programmi attivi,
176M ??
Cioe' 128 + 32+ 16??
E che configurazione e'? :)
Ciaotutti,
Asterix

E che configurazione e'? :)
16 era la ram originaria (e' vecchiotto:), 32 li avevo recuperati da un altro pc,
128 ho messo mano al portafogli due natali fa :(
ciao, hal
p.s. che nel frattempo lo ha portato a 384 MB :))
Newsgroup: it.comp.lang.visual-basic
Titolo: [HELP Risoluzione problemi] Come, dove e quando

Come risolvere un problema? Dove trovare informazioni?
1) Per prima cosa consultate la guida in linea.
*  Premere il tasto [F1] in alto a sinistra sulla vostra tastiera.
2) Seconda fonte di informazione: l'MSDN online.
*  
http://msdn.microsoft.com/
3) Terza fonte di informazione: cercate tra i vecchi post di questo
newsgroup: quasi tutti i temi sono stati gią ampiamente trattati e risolti.
*  
http://groups.google.com/groups?group=it.comp.lang.visual-basic
4) Quarta fonte di informazione: il Sito Comune(SC) di questo NewsGroup.
*  
http://www.it-lang-vb.net/
5) Quinta fonte di informazione: cercate tra i sorgenti gią scritti e pronti che al 99%
risolvono quello su cui state lavorando e con minime modifiche.
*  
http://www.it-lang-vb.net/
  (Sezione sorgenti)
*  
http://www.planet-source-code.com/vb/
6) Per ultima, se non avete ancora trovato nulla: chiedete al newsgroup.
*  Ricordatevi di leggere il Manifesto di questo Gruppo di Discussione:
 
http://www.it-lang-vb.net/docs/Manifesto.txt








--- Link Segnalati -----------------------------------------------
API: 
http://www.allapi.net/

Come risolvere un problema? Dove trovare informazioni?
1) Per prima cosa consultate la guida in linea.
*  Premere il tasto [F1] in alto a sinistra sulla vostra tastiera.
2) Seconda fonte di informazione: l'MSDN online.
*  
http://msdn.microsoft.com/
3) Terza fonte di informazione: cercate tra i vecchi post di questo
newsgroup: quasi tutti i temi sono stati già ampiamente trattati e risolti.
*  
http://groups.google.com/groups?group=it.comp.lang.visual-basic
4) Quarta fonte di informazione: il Sito Comune(SC) di questo NewsGroup.
*  
http://www.it-lang-vb.net/
5) Quinta fonte di informazione: cercate tra i sorgenti già scritti e pronti che al 99%
risolvono quello su cui state lavorando e con minime modifiche.
*  
http://www.it-lang-vb.net/
  (Sezione sorgenti)
*  
http://www.planet-source-code.com/vb/
6) Per ultima, se non avete ancora trovato nulla: chiedete al newsgroup.
*  Ricordatevi di leggere il Manifesto di questo Gruppo di Discussione:
 
http://www.it-lang-vb.net/docs/Manifesto.txt
--- Per approfondire... -------------------------------------------
Sommario:
¯¯¯¯¯¯¯¯
[API]
[SOCKET]
Contenuto:
¯¯¯¯¯¯¯¯¯
[API]
http://www.allapi.net/
[SOCKET]
http://www.vbip.com
http://www.socketwrench.com
Newsgroup: it.comp.lang.visual-basic
Titolo: VB 5 SPECIAL DEVELOPER KIT

Sono venuto a conoscenza ed in possesso (di un amico programmatore) di una
versione del vb5 uscita da poco, ma non in commercio. A quanto pare si
tratta della versione Enterprise ma con manualistica in italiano, <<
INCREDIBILE MA VERO, COMPLETA! >> (Esclusa API) e di dimensioni + del
doppio, ed inoltre possiede anche l'OCX CHE FA IL CAPPUCCINO!!! Insomma in
più alla vers. Enterprise ha... tutto quello che manca all'Enterprise.
MORALE DELLA FAVOLA?
    Versione SOLO per aziende, che hanno un particolar contratto con M$(non
ne sono sicuro).
    Prezzo per l'azienda? 3 milioni e mezzo!!!!!
CIAO A TUTTI!


Questo messaggio sembra quello di un bambino capriccioso che si vanta di
avere un giocattolo piu' bello e di non volerlo dare agli amici. Ma chi se
ne frega che tu lo hai? Ma guarda un po' e pensare che ho anche sprecato
tempo di connessione per scaricare questo messaggio inutile e di un PIRATA
in quanto da quello che dici non sei ne' una azienda ne' una particolare che
ha paricolari rapporti con MICROFOGN

ha paricolari rapporti con MICROFOGN
Prima ti saluto. VATTENE AFFANCULO!
Prima di criticare cerca di collegare il cervello al resto del corpo di
animale che ti ritrovi. Cretino!
Primo: La copia e' ORIGINALE CON LICENZA d'USO!
SECONDO: L'HO VISTO e POSSEDUTO PER UN ATTIMO! NON HO DETTO CHE L'HO FINO
ALLA TUA MORTE! PIRLA!
TERZO: POTREI ESSERE ANCHE UN PIRATA CHE A TE NON TE NE FREGA UN CAZZO!
            SE RIESCI A LEGGERE IL MESSAGGIO, CAPISCI CHE l'AZIENDA NON SONO
IO.
            MA FORSE E' CHIEDERE TROPPO...
QUARTO: SEI STUPIDO ED IGNORANTE.
Per il resto del NG: Dato che non ho intenzione di scatenare un putiferio,
questo è un addio dal NG da parte mia, a molti non fregherà nulla, ma il
povero Roal, ora a chi scriverà LEGGI I VECCHI MESSAGGI??? :-)) (RISPOSTA: I
messaggi erano un centinaio per volta, e di conseguenza non riuscivo a
leggerli tutti, quindi quelli con l'intestazione che mi interessava). Vedere
"Elaboriamo decalogo del NG"...
Peccatto proprio ora che preparavo l'OCX per il cappuccino.. :-)
    ADDIO....
Newsgroup: it.comp.lang.visual-basic
Titolo: deformare un'immagine

Salve
esiste un'API , un OCX , una DLL free o qualsiasi altra cosa in grado di
deformare un'immagine in una picturebox (ruotarla, allungarla, accorciarla,
allungare solo un lato, ecc...)
Grazie
Milliken

Milliken:
  visto che nessuno ti risponde con un BUON metodo per fare
quanto da te richiesto, (risposta in cui speravo moltissimo
anch' io) ti spiego il mio BRUTTISSIMO metodo per ruotare,
ridimensionare e rendere rettangolari le mappe geografiche
dopo averle digitalizzate con lo scanner.
Ti riporto la descrizione dell' algoritmo che avevo inviato ad
un amico pilota, riferito a coordinate geografiche ma e',
ovviamente, valido per qualsiasi sistema di riferimento ortogonale.
----------------------------------------------------------------
Per quanto riguarda la preparazione e la squadratura delle carte
(dopo averle digitalizzate)  puoi usare questo sistema:
Prendiamo ad esempio il primo foglio che ho digitalizzato
delle carte BBQ: su di esso definisco un quadrilatero con
vertici A, B, C e D in cui A e' il vertice in basso a sinistra
e gli altri progressivi in senso antiorario.
Il vertice A ha coordinate di longitudine e latitudine pari
a 08.00.00 e 44.05.00; il vertice C (opposto) ha coordinate
di 09.00.00 e 45.00.00.
Con un programma qualsiasi (io me lo sono creato in VB ma va'
bene anche PaintBrush) leggo la posizione digitalizzata, in
pixels, dei quattro vertici che e', e.g.:
A: (55,853)
B: (685,871)
C: (705,72)
D: (85,53)
Ora mi creo il quadro finale che avra' l' altezza di 872 pixels
per grado di latitudine (alla scala di 1:500,000) e larghezza
di 872 pixels per grado di longitudine moltiplicato per il
coseno della latitudine media.
A questo punto per ogni pixel Px del quadro finale, di cui ricavo
dalla posizione in pixels le coordinate (Ltx, Lnx), procedo come
segue:
Trovo sul segmento AB la posizione Pab in pixels di Lnx.
Trovo sul segmento CD la posizione Pcd in pixels di Lnx.
Trovo sul segmento BC la posizione Pbc in pixels di Ltx.
Trovo sul segmento DA la posizione Pda in pixels di Ltx.
Calcolo il pixel corrispondente all' intersezione dei
segmenti passanti rispettivamente per (Pab, Pcd) e (Pbc, Pda)
e ne attribuisco il colore al pixel Px del quadro finale.
Il procedimento e' lento (specie se fatto in Vb, in C sarebbe
piu' veloce) ma funziona abbastanza bene anche con immagini
originali piuttosto sghembe.
----------------------------------------------------------------
Ciao e a risentirci.
Franco

Newsgroup: it.comp.lang.visual-basic
Titolo: [?] solo un istanza di un app

se faccio
Private Sub ShowVolume()
    On Error Resume Next
    Dim conf As Long
    conf = Shell("sndvol32.exe", vbNormalFocus)
End Sub
ogni volta mi apre una nuova finestra.
c'e' modo di portare solo il focus su quella gia' eventualmente aperta ?
grazie, a.

 ha scritto nel messaggio
news:8r23gf$gft5g$1...@ID-51318.news.cis.dfn.de...


 Sub Attiva(sTitle As String, sExeName As String)
grazie, direi che funzioni. se ho capito, l'ho un po' abbreviata:
Private Sub ShowVolume()
    On Error GoTo errman
    AppActivate "Controllo volume"
    Exit Sub
errman:
    If Err = 5 Then
        Dim conf As Long
        conf = Shell("sndvol32.exe", vbNormalFocus)
    Else
        MsgBox Error
    End If
End Sub
mi sa che in un windows in inglese non vada granche', ma intanto e' ok.

Newsgroup: it.comp.lang.visual-basic
Titolo: Formazione in provincia di Venezia

C'e' qualcuno dalla provincia di Venezia disponibile per fare formazione 
su 
vb.net
 e nhibernate?

 su 
vb.net
 e nhibernate?
Io conosco Davide Vernole, se non direttamente lui molto probabilmente 
ha qualcuno da consigliarti: 
http://blog.knodev.com/
.m
-- 
Mauro Servienti
{C67C0157-5D98-4733-A75E-93CAEE4BADC8}
Microsoft MVP - Visual C# / MCTS
http://mvp.support.microsoft.com
blog @ 
http://milestone.topics.it
whynot [ at ] topics [ dot ] it

 ha qualcuno da consigliarti: 
http://blog.knodev.com/
Ti ringrazio Mauro