[Delphi] Inviare e-mail a più utenti.

In una mia applicazine ho avuto la necessità di creare una procedura che, all’occorrenza, potesse inviare una e-mail a tutti gli indirizzi contenuti in una tabella di un database, utilizzando il client predefinito di posta elettronica.
Partendo dal presupposto che abbiamo già creato il nostro DataModule, che io per comodità ho chiamato DMSsn, con i relativi DataSet (nel mio caso al dataset ho dato il nome di Referenti), DataSource e li abbiamo settati correttamente, apriamo una nuova form, assegniamole un nome (nel mio caso frmVisResp) e salviamola, inseriamo fra le uses ShellApi.

[Delphi] DBLookupComboBox e db InterBase

Spesso, quando sviluppiamo delle applicazioni interfacciate con dei database ed utilizziamo dei componenti di tipo Data Controls, si può verificare che qualche componente non dia l’esito voluto, ad esempio, in un’applicazione che sfrutta dei componenti Interbase come IBTable, IBQuery o IBDataSet (dò per scontato che sappiate configurare tali componenti).

[Delphi] Inserire immagine in un campo di tipo BLOB di un DB.

Una vacanza ogni tanto non fa certamente male… Oggi utilizziamo una procedura in modo da poter inserire un’immagine in un campo di tipo blob di un database Microsoft Access.

Creiamo il nostro database contenente una tabella con un campo id di tipo contatore ed uno immagine di tipo Oggetto OLE.

A questo punto avviamo Delphi, creiamo una nuova applicazione Win 32 che contiene un Data Module (DataModule1) ed una Form (Form1), andiamo sul DataModule1 e creiamo la connessione al database utilizzando una ADOConnection (Connessione), ADOTable (Tabella1) e DataSource (DSTabella1); settiamo i parametri per collegare i componenti su indicati al nostro database, successivamente, una volta attivati i parametri di connessione, facciamo doppio click sul componente ADOTable, apparirà una finestra, clicchiamo col tasto destro e selezioniamo la voce aggiungi tutti i campi, a questo punto appariranno i campi id ed immagine; torniamo sulla form principale ed inseriamo un componente di tipo OpenDiaolog, utilizzando l’Object Inspector settiamo i campi relativi al filtro in base all’estenzione del file, rinominiamo il componente in ImportaImmagine. Sempre sulla form inseriamo due pulsanti ed un componente DBImage.

[Delphi] Splash form su ogni modulo dell’applicazione

Lo splash screen può essere utilizzato in più form della nostra applicazione. Infatti si può utilizzare tale modulo per inizializzare l’applicazione, quindi far visualizzare il copyright ed altre informazioni, oppure si può utilizzare tale form per visualizzare delle stringhe di testo come: “Attendere…”, “Ancora qualche secondo”, ecc. Tali messaggi possono essere utili nel caso in cui l’applicazione sta effettuando un operazione che impiega molto tempo.
Quindi per creare dinamicamente un semplice splash screen avvio Delphi, creo una nuova applicazione, inserisco le form che mi servono nella mia applicazione; dopo di che creo un form che mi funge da splash screen, su tale form definisco due variabili:

var:
  FormAttesa := TForm;
  EtichettaAttesa := TLabel;


[Delphi] Conoscere l’indirizzo IP di un PC.

Oggi utilizziamo Delphi per creare un software con il quale è possibile conoscere l’indirizzo IP di un computer, tale applicazione può essere utilizzata sia nel caso in cui si è connessi ad internet, sia nel caso in cui la macchina sta lavorando in locale.

Avviamo Delphi, creaiamo una nuova applicazione, visualizziamo la nostra form in modalità codice ed inseriamo la libreria Winsock fra le uses, tale libreria viene utilizzata dai sistemi operativi Microsoft Windows in modo che i protocolli di rete TCP/IP vengano utilizzati in maniera semplificata.