Графика
Начерталка

Математика

Лабы

Visual Foxpro 7 Электронный учебник Курс лекций начало

 

Передача данных в Microsoft Excel с помощью OLE

В рассматриваемом примере используем данные из таблицы cntcust для построения диаграммы распределения клиентов по городам в программе Microsoft Excel с помощью OLE-объектов,

  1. В меню File (Файл) выберите команду New (Новый), установите опцию Program (Программа) и нажмите кнопку New file (Новый файл). Откроется новое окно редактирования программ.
  2. Для установления связи с Microsoft Excel, передачи в него данных и построения диаграммы введите следующие команды:

* Создание OLE-объекта

obj ExcelSheet=CreateObject("Excel.Sheet")

objExcelSheet.Application.Visible=.Т.

objExcelSheet = objExcelSheet.Sheets[1]

* Передача данных из таблицы CntCust в Excel

SELECT CNTCUST

nRow=0

SCAN

nRow=nRow+l

objExcelSheet.Cells(nRow,1).ValueCntCust.City

objExcelSheet.Cells(nRow,2).Value=CntCust.Quant

ENDSCAN

objChart = objExcelSheet.ChartObjects.Add{100, 100, 400, 200)

* Выделение данных и создание диаграммы

objExcelSheet.chartObjects(1).Chart.;

chartwizard(objExcelSheet.Range(objExcelSheet.Cells(1,1) ,;

objExcelSheet.Cells(nRow,2)),;

-4100,4,1,0,1,1,"","","","")

objExcelSheet.chartObjects(1).Select

objExcelSheet.chartObjects(1).Copy

* Закрытие сервера

objExcelSheet.application.quit

release objExcelSheet

  1. Проверьте синтаксис и запустите программу на выполнение. Результат выполнения программы представлен на рис. 21.13.

Замечание

Наиболее простым способом формирования команд для выполнения действий над OLE-объектами является запись соответствующего макроса на сервере приложении и использование текста этого макроса в Visual FoxPro.

gl21-13.jpg

Рис. 21.13. Создание диаграммы с помощью OLE

 

Delphi 7
Потоки и процессы Работая с Delphi, нужно иметь в виду: этот замечательный продукт не только упрощает разработку сложных приложений, он использует при этом все возможности операционной системы. Одна из возможностей, которую поддерживает Delphi, — это так называемые потоки (threads) или нити. Потоки позволяют в рамках одной программы решать несколько задач одновременно. С недавних пор операционные системы для персональных компьютеров сделали это возможным.
Потоки и процессы
Обзор потоков
Потоки и процессы
Фоновые процедуры, или способ обойтись без потоков
Приоритеты потоков
Класс TThread
Пример создания многопоточного приложения в Delphi
Проблемы при синхронизации потоков
Тупики
Гонки
Средства синхронизации потоков
Событие
Взаимные исключения
Семафор
Критическая секция
Процесс. Порождение дочернего процесса.
Поток
Консольный ввод
Оповещение об изменении в файловой системе
Локальные данные потока
Как избежать одновременного запуска двух копий одного приложения

Машиностроительное черчение, инженерная графика, начертательная геометрия. Выполнение контрольной