Dopo la dimostrazione il modo su come leggere input da file excel con Borland C + + Builder, stiamo andando per illustrare un modo per scrivere il vostro output a file excel usando la stessa lingua, C + +.

A volte è meglio spiegare le cose attraverso esempio, in modo semplice Ecco un buon esempio per dimostrare il processo.

Dando per scontato che andare a scrivere un memorizzati in uscita variabile, x, diciamo x = 3,14 a riga 2, colonna 3 del file Excel. Quindi, tutto ciò che dovete fare è quella di utilizzare il codice riportato di seguito.

Caso 1: Si deve creare un nuovo file excel quindi scrivere la produzione Consulta

/ / dichiarare variabili
Variante XL, v0, v1, v2, v3;
doppia x = 3,14;

/ / apre Excel
XL = Variante:: CreateObject ( "Excel.Application");

/ / impostare l'applicazione come invisibile, si può invertire "false" a "true" per renderlo visibile
XL.OlePropertySet ( "visibile", false);

/ / Get cartella di lavoro
v0 = XL.OlePropertyGet ( "lavoro");

/ / aggiungere un libro di lavoro
v0.OleProcedure ( "Aggiungi");

/ / cartella di lavoro selezionare il numero 1
v1 = v0.OlePropertyGet ( "Voce", 1);

/ / Get foglio di lavoro
v2 = v1.OlePropertyGet ( "fogli di lavoro");

/ / Aggiungere un foglio di lavoro
v2.OleFunction ( "Aggiungi");

/ / foglio di lavoro selezionare il numero 1
v3 = v2.OlePropertyGet ( "Voce", 1);

/ / rinominare il foglio di lavoro a "Esempio 1"
v3.OlePropertySet ( "Nome", "Esempio 1");

/ / Finalmente, scrivere la produzione a riga 2 colonna 3
char temp [10];
sprintf (temp, "% lf", x);
v3.OlePropertyGet ( "cellule"). OlePropertyGet ( "Voce", 2,3). OlePropertySet ( "Valore", temp);

/ / questo si arresta in cui vi si chiede se si desidera il tuo stesso file excel o non
XL.OlePropertySet ( "DisplayAlerts", false);

/ / salvare il file excel a "d" e il nome come "case1.xls"
XL.OlePropertyGet ( "lavoro"). OlePropertyGet ( "Voce", 1). OleProcedure ( "Salva con nome", "d: \ \ case1.xls");

/ / Close libretto di lavoro
v1.OleProcedure ( "Chiudi");

/ / piuttosto la domanda excel
XL.OleProcedure ( "Quit");

/ / variabile unassign
XL = Non assegnati;

Caso 2: si desidera scrivere il vostro output esistenti in un file excel denominato "case1.xls" situato a "D:"

doppia x = 3,14;
/ / dichiarare variabili
Variante XL, v0, v1, v2, v3;

/ / apre Excel
XL = Variante:: CreateObject ( "Excel.Application");

/ / impostare l'applicazione come invisibile, si può invertire "false" a "true" per renderlo visibile
XL.OlePropertySet ( "visibile", false);

/ / aprire la cartella di lavoro "di nome case1.xls"
XL.OlePropertyGet ( "lavoro"). OleProcedure ( "Apri", "d: \ \ case1.xls");

/ / apre il foglio di lavoro "Esempio 1"
v0 = XL.OlePropertyGet ( "schede", "Esempio 1");

/ / ottenere una cella
v1 = v0.OlePropertyGet ( "cellule");

/ / Finalmente, scrivere la produzione a riga 2 colonna 3
char temp [10];
sprintf (temp, "% lf", x);
v1.OlePropertyGet ( "Voce", 2,3). OlePropertySet ( "Valore", temp);

/ / questo si arresta in cui vi si chiede se si desidera il tuo stesso file excel o non
XL.OlePropertySet ( "DisplayAlerts", false);

/ / salvare ciò che avete fatto
XL.OleProcedure ( "Salva");

/ / piuttosto la domanda excel
XL.OleProcedure ( "Quit");

/ / variabile unassign
XL = Non assegnati;

Questo è tutto. Anche se lunghi, la procedura è ancora standard e semplice.