Associare un estensione file alla vostra applicazione : Associare un estensione file alla vostra applicazione : Procedure RegisterFileType(cMyExt, cMyFileType, cMyDescription, ExeName: string; IcoIndex: integer; DoUpdate: boolean = false); var Reg: TRegistry; begin Reg := TRegistry.Create; try Reg.RootKey := HKEY_CLASSES_ROOT; Reg.OpenKey(cMyExt, True); // Write my file type to it. // This…
Leggi tutto
E’ possibile ottenere l’ip (ip address) del proprio computer utilizzando la classe Indy “idIpWatch” , ad esempio per inserire l’ip nella caption del ns form è sufficiente: implementation uses IdIPWatch; … procedure TfrmMain.FormCreate(Sender: TObject); var ids: TidIpWatch; begin ids := TidIpWatch.Create; Caption := Caption + ‘(‘ + ids.LocalIP + ‘:8888)’; ids.Free; end; Se invece ci…
Leggi tutto
Esempio invocazione package SQL Server da Visual Basic Script engine: sub ExecutePackage(Server,UserId,UserPw,PackageName); set objDTSPackage = CreateObject(“DTS.Package”); objDTSPackage.LoadFromSQLServer Server, UserId,UserPw, DTSSQLStgFlag_Default, “”, “”, “”, PackageName objDTSPackage.Execute Set objDTSPackage = Nothing msgbox(“Esecuzione package conclusa”) End Sub call ExecutePackage(“localhost”,”sa”, “sa”, “PortingFromIB”)
Per le connessioni ADO in Delphi si usa in genere il componente TADOConnection i cui parametri di connessioni sono definiti da una stringa di connessione. Questo componente è la mappatura esatta delle API degli MDAC per le connessioni ADO. La definizione della connection string non è sempre immediata e quando si crea un programma di configurazione /…
Leggi tutto
In Delphi è possibile accedere a tutte le API (Advanced Program Interfaces) di Windows, molte di queste già importate in molte librerie preconfezionate per semplificarci la vita. La funzione di Windows che permettere di legere l’host name è GetComputerName implementata nella dll di windows “Kernel32.dll”. La “Kernel32.dll” viene mappata in Delphi dalla unit Windows.pas. Codice…
Leggi tutto
In alcuni casi particolari è utile generare dinamicamente delle query all’interno di stored procedure xchè esistono istruzioni non parametrabilizzabili in Sql-Server. Ad esempio la “drop table” non permette la sintassi : “drop table @mia_variabile”. Per ovviare a questo problema è possibile eseguire una query costruita dinamicamente tramite il comando exec. Nell’esempio si costruirà una stored…
Leggi tutto
