промышленное кондиционирование оборудование

Компании требуется водитель Наша компания ищет водителя с личным легковым автотранспортом (подробности в разделе вакансий сайта) Центр Поддержки Бизнеса "Унисервис" ( www.fin-u.ru ) 2003-06-17 18:19:29 Поздравляем Вас с Днем принятия Декларации о государственном суверенитете Российской Федерации! Желаем вам доброго здоровья, счастья, благополучия, успехов! Центр Поддержки Бизнеса "Унисервис" ( www.fin-u.ru ) 2003-06-12 13:01:52 Вакантное место бухгалтера/кассира занято Компания закрывает вакансию на должность бухгалтера / кассира. О других вакансиях читайте в соответствующем разделе сайта Центр Поддержки Бизнеса "Унисервис" ( www.fin-u.ru ) 2003-06-02 15:12:03 Вакантное место инженера технической поддержки занято Компания закрывает вакансию на должность системного администратора / инженера техподдержки. О других вакансиях читайте в соответствующем разделе Центр Поддержки Бизнеса "Унисервис" ( www.fin-u.ru ) 2003-05-30 10:52:18 Об объеме получаемой корреспонденции Для только что оформивших подписку на новости Аудит-Унисервис ( www.audit-u.ru ) 2003-05-22 11:04:28 Просмотров: 1041

Диаграмма for i:=0 to 31 do begin if form1.StringGrid1.Cells[1,i] ” then begin inc(j,50); chart1.Series[i].AddXY(j,strtoint(form1.stringgrid1.cells[1,i])); chart1.Series[i].Title:=form1.StringGrid1.Cells[0,i]; end else chart1.Series[i].Title:=form1.StringGrid1.Cells[0,i]; end; Также мы использовали компонент chart , который позволяет выводить графики/диаграммы в программе. Свойством AddXY и строится сам график. А title определяет заголовок каждого элемента диаграммы в легенде. Легенда – это условные обозначения справа от графика. Функция inc() увеличивает переменную на заданное значение. Функция эквивалента x:=X+1. Но ребята из Borland (ныне CodeGear) советуют использовать именно Inc(), т.к. она работает гораздо быстрее. Замечу, что во втором модуле обязательно писать обращение к компонентам первой формы в виде form1.*****. Т.к.