Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 21.05.2009, 18:53   #1
lider24816
Пользователь
 
Регистрация: 21.12.2008
Сообщений: 17
Радость Помогите с Решенме Задачи

Нужно Построить круговую диаграмму для 4 параметров, значения которых указывает пользова-тель
lider24816 вне форума Ответить с цитированием
Старый 21.05.2009, 21:23   #2
ArtInt
Форумчанин
 
Аватар для ArtInt
 
Регистрация: 06.03.2009
Сообщений: 583
По умолчанию

Примерно так

Код:
procedure TForm1.Button1Click(Sender: TObject);
begin
 Chart1.Series[0].Clear;
  Chart1.Series[0].Title:='Круговая диаграмма';
  Chart1.Series[0].Add(strtoint(Edit1.Text),'First',clREd);
  Chart1.Series[0].Add(strtoint(Edit2.Text),'Second',clBlue);
  Chart1.Series[0].Add(strtoint(Edit3.Text),'Third',clWhite);
  Chart1.Series[0].Add(strtoint(Edit4.Text),'Four',clBlack);

end;
Не стыдно чего-то не знать, стыдно не стремиться к знаниям.
ArtInt вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Помогите, задачи (С++) БаунтЯ Помощь студентам 7 03.12.2008 20:56
Помогите решить задачи на C++ Many man Помощь студентам 7 02.12.2008 20:41
задачи ПОМОГИТЕ maximon Помощь студентам 13 26.12.2007 22:07
ПОМОГИТЕ РЕШИТЬ ЗАДАЧИ С++ lawny Фриланс 1 24.12.2007 20:58