Last update: 21/01/99
... under construction

Free components:

TrialVersion updated !
Rebar

In fase di sviluppo:

EasyCrypt

Codice:

Codice selezionato
Codice compatto

Impressioni:

Inserisci
Leggi

Varie:

Libri in italiano
Riviste
Pochi link, ma tosti
BenchMark

Da Internet:

News selezionate
Archivio

Componenti gratuiti

TrialVersion 1.2.2
TrialVersion è un activex che permette di trasformare le proprie applicazioni in applicazioni con una scadenza dipendente da un certo numero di giorni, è possibile decidere quali programmi trasformare in demo, la durata della demo e il messaggio che deve apparire quando il demo scade.
Nella versione 1.2.2 è ora implementata la funzione ResetT che può annullare la creazione della demo a tempo, semplicemente utilizzando la riga di codice, in questo modo si ripristina l'applicazione originale (è possibile così collegare l'esecuzione della funzione all'inserimento di un numero di serie).

TrialV1.ResetT(1) 'indice dell'applicazione

Esempio di codice:

Private Sub ControlDemo
TrialV1.DayForTrial = 20 'numero di giorni per la demo
TrialV1.IndexT = 1 'indice dell'applicazione da fare come demo
TrialV1.MsgExpire = "Tempo scaduto" 'messaggio di data scaduta
TrialV1.ExecuteT 'esecuzione delle funzioni
If TrialV1.Status = 1 Then
End
End If
End Sub

Download:

Versione 1.2.2 (15 kb)

Rebar 1.0.0
rebar è una dll activex e un modulo .BAS che permettono l'accesso diretto alle funzioni API e attraverso il subclassing consentono di modificare le proprie toolbar, creando il classico aspetto dei menu e dei pulsanti di Office 97

Il codice è stato scritto originariamente da Ramon Guerrero e successivamente modificato ed adattato da me.

Codice di esempio:

creare un riferimento alla libreria dll attraverso progetto/riferimenti e caricare il modulo .bas

Posizionare una o più toolbar su un controllo picture.

Private Sub Form_Load()

'sposta la toolbar dietro il lato sinistro
'in modo che non si veda il bordo.
Toolbar(0).Left = -15
Toolbar(1).Left = -15
Toolbar(2).Left = -15
...

'assegna lo stile Flat.
rebar.TBMakeFlat Toolbar(0)
rebar.TBMakeFlat Toolbar(1)
rebar.TBMakeFlat Toolbar(2)
...

'Crea la rebar
Set rebar.Parent = Me
rebar.Create

'Aggiunge le varie bande
rebar.AddBands "", 0, picture(1).hwnd, 0, 10
rebar.AddBands "Internet Links ", 1, picture(2).hwnd, 0, 10
rebar.AddBands "", 2, picture(0).hwnd, 0, 10
...

'Attiva il Subclassing
SubClass Me.hwnd

Me.Show

picture(0).SetFocus

End Sub

Download:

Versione 1.0.0001 (12 kb)

In fase di sviluppo:

EasyCrypt

Easycrypt sarà un activex che permetterà di criptare e decriptare file, basando l'algoritomo di criptazione su alcuni parametri decisi dallo sviluppatore, si tenterà di rendere l'algoritmo particolarmente sicuro... ma evitate comunque di criptare documenti TROPPO importanti con questo ocx...!