Via Cà Matta 2 - Peschiera Borromeo (MI)
+39 02 00704272
info@synaptica.info

Autore: Ivan Revelli

Digital Innovation Partner

Windows 8 “Conumer Preview” – Impressioni

Dopo aver installato il futuro ambiente operativo di Microsoft in una macchina virtuale , mi son reso conto che questa preview sembra funzionare molto bene (succhia un po di risorse, ma è allineato con Win7) . Ovviamente la nuova interfaccia utente mi lascia un pochino smarrito, tipo non ho capito come si chiudono le applicazioni,…
Leggi tutto

Installare Windows 8 preview su vmware player 4.02

Microsoft ha annuciato la disponibilità di Window 8 Preview prima del rilascio definitivo. Questo nuovo sistema operativo si prefigge l’obiettivo di essere il fattor comune della strategia microsoft per mantenere il mercato PC ed avvicinarsi al mondo dei tablet al momento dominato da Google (con il fantastico Android) e da Apple con lo strepitoso iOS.…
Leggi tutto

Delphi XE2 – Native compression support “ZIP” & “UNZIP”

In questi giorni comincio a metter mano su questo nuovo tool che Synaptica ha acquistato, e usandolo un pochino si scoprono belle cose. Tra cui il fatto che Embarcadero ha integrato delle funzioni cross per il supporto della compressione Zip direttamente nella RTL library. Nella libreria “System.Zip” sono presenti diversi metodi per gestire la compressione…
Leggi tutto

TIP del giorno UBUNTU : NAUTILUS e la barra Indirizzi (Nautilus address box)

Quanti con le nuove versioni di Ubuntu si sono strincazzati perchè non riescono a scriver l’indirizzo (di un server remoto o di una location che sanno a memoria) perchè la barra degli indirizzi è stata sostituita da una specie di bottoniera naviga cartelle (a mio avviso di una scomodità totale). Beh nel caso vi serva…
Leggi tutto

Tip – [DELPHI] : Read windows environment variables

this function that i found on the Net allow your delphi code to access at environment variables of your Windows systems : function GetEnvVarValue(const VarName: string): string; var BufSize: Integer; // buffer size required for value begin // Get required buffer size (inc. terminal #0) BufSize := GetEnvironmentVariable( PChar(VarName), nil, 0); if BufSize > 0…
Leggi tutto

TIP [DELPHI] – Invio di una mail utilizzando il protocollo MAPI

function SendEMail(Handle: THandle; Mail: TStrings): Cardinal; type TAttachAccessArray = array [0..0] of TMapiFileDesc; PAttachAccessArray = ^TAttachAccessArray; var MapiMessage: TMapiMessage; Receip: TMapiRecipDesc; Attachments: PAttachAccessArray; AttachCount: Integer; i1: integer; FileName: string; dwRet: Cardinal; MAPI_Session: Cardinal; WndList: Pointer; begin dwRet := MapiLogon(Handle, PChar(”), PChar(”), MAPI_LOGON_UI or MAPI_NEW_SESSION, 0, @MAPI_Session); if (dwRet SUCCESS_SUCCESS) then begin MessageBox(Handle, PChar(‘Error while trying…
Leggi tutto