Newsgroup: it.comp.lang.visual-basic
Titolo: Creazione DLL di funzioni

Salve, visto il periodo di calma, mi sto' divertendo nel creare una DLL
nativa (non activex insomma).
All'interno sto' mettendo varie funzioni che per la mia esperienza, sono
utili per tutti i programmatori.
Ad esempio passando un array di valori (numerici o stringa) ritorna un array
ordinato, formatta un testo all'interno di n caratteri con il carattere
specificato es :
RJust("Ciao","*") ==>> ritorna "******Ciao"
LJust("Ciao,"*")  ===>   "Ciao******"
RJust("Ciao")    ==>>>  "Ciao      "
ecc. ecc. ecc......
altro esempio :
Print Words("Ciao come stai")   ====> da come risultato 3
Print SubWords("Ciao come stai",2,2) ====> da come risultato "come stai"
Print Word("Ciao come stai",3) ====> da come risultato "stai"
Bene, avro' raccolto una 30ina di funzioni ma se voi avete dei suggerimenti
e delle funzioni che al momento non mi vengono in mente potrete anche
suggerirle spiegando che parametri deve avere in IN e cosa dare in
OUT.......le includero' nella DLL.
Naturalmente la DLL una volta terminata sara' completamente FREE........e
inviata al sito comune.
Ciao
Ven.

inviata al sito comune.
con i sorgenti? Sono abituato troppo al GPL...
PS se possibile, sarebbe comodo aggiungere anche delle funzioni utili per usare il registro di sistema usando le api, che pero non tutti sanno fare.
Se vuoi de lo posso mandare le varie chiamate con le Dichiarazioni.
-- 
ciao
---------------------------------------------------------------------
Sidewinder  
    - this is a test machine based on debian 2.1 slink -
       -- Pannello pubblicitario in allestimento --
---------------------------------------------------------------------

 inviata al sito comune.
Ottima cosa!! ^__^
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


Non si puo'.
--
Roal Zanazzi
z...@iol.it

 Function BoolToStr(Valore As Boolean, Tipo As Integer) As String
Per non perdere il vizio, ti modifico anche questa 8-):
Function BoolToStr(Valore As Boolean, Tipo As Integer) As String
    Dim avElencoToken As Variant
    If Valore Then
        avElencoToken = Array("1", "True", "Vero", "Yes", "Si", "Alto",
"On", "Acceso", "Attivo")
    Else
        avElencoToken = Array("0", "False", "Falso", "No", "No", "Basso",
"Off", "Spento", "Disattivo")
    End If
    On Error Resume Next
    BoolToStr = avElencoToken(Tipo - 1)
    If Err > 0 Then
        BoolToStr = Valore
    End If
    On Error GoTo 0
End Function
Anche qui, se vuoi aggiungere valori basta cambiare le stringhe all'interno
delle funzioni <Array>
Ciao
*Roby*

 Paolo 83 RE
Devi usare per forza un altro linguaggio......... magari Basic Like per non
perdere lo skill....... ;-))
Ciao
Ven.

 >



Le DLL normali espongono direttamente le funzioni contenute (leggi
programmazione classica, strutturata, basata su variabili e funzioni).
Le DLL ActiveX espongono l'interfaccia di uno o piu' oggetti (leggi
programmazione basata su oggetti), quindi le proprieta' ed i metodi, secondo
la definzione COM, standard definito principalmente da Microsoft.
--
Roal Zanazzi
z...@iol.it

 PS se possibile, sarebbe comodo aggiungere anche delle funzioni utili per
usare il registro di sistema usando le api, che pero non tutti sanno fare.
Ecco questi si che sono utilissime!!!! ^____^
--
Volete un abbonamento gratuito a TiscaliFREEnet??
Chiedetemi i Codici di Attivazione!!!
--
Ciao!
==================================
Daniele Pinna
Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola OOPS
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
______________________________________
  La fantascienza come Star Trek non e' solo un buon divertimento, ma
assolve anche uno scopo serio, che e' quello di
espandere l'immaginazione umana.
  Limitare la nostra attenzione a questioni terrestri equivarrebbe a fissare
dei confini allo spirito umano.
Stephen Hawking

 wrote in message
KJcy3.5967$H3.5...@typhoon.libero.it...

Io ho la versione Learning di VB6 e so che posso creare dei
"Controlli edizione Learning" (Lo vedo quando carico VB...).
Sono DLL ActiveX o cosa? Che differenza c'é? A me sembra che
non cambi nulla perché nelle proprietà del progetto il "Tipo di progetto"
rimane
"EXE standard" ed è disabilitato.
--
Volete un abbonamento gratuito a TiscaliFREEnet??
Chiedetemi i Codici di Attivazione!!!
--
Ciao!
==================================
Daniele Pinna
Email: 
dap...@lycosmail.com
Nell'indirizzo Email eliminare la parola OOPS
Sito Web: Il DoCFa in Pillole: 
http://dapinna.freeweb.org
ICQ UIN: 24567484
______________________________________
  La fantascienza come Star Trek non e' solo un buon divertimento, ma
assolve anche uno scopo serio, che e' quello di
espandere l'immaginazione umana.
  Limitare la nostra attenzione a questioni terrestri equivarrebbe a fissare
dei confini allo spirito umano.
Stephen Hawking
ma non ho capito cosa posso fare...


--
Francesco Marcolini
fmarc...@stock-spa.it
Sent via Deja.com 
http://www.deja.com/
Share what you know. Learn what you don't.