|  | 
 
 | 
| 
 | |||||||
| Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны | 
|  | 
|  | Опции темы | Поиск в этой теме | Опции просмотра | 
|  | 
| 
			 
			#1  
			
			
			
			
		 | |||
| 
 | |||
|  Разработать приложение Помогите, пожалуйста, с заданием: Разработать приложение, использующее компоненты: 1. Главное меню: Файл(Построить график, Выход), Справка(О программе) 2. Многострочный редактор Memo 3. Диаграмма Chart (тип Horiz. Bar) Назначение приложения: Построение диаграммы по значениям, указанным построчно в редакторе. Я не понимаю как сделать так, чтобы по значениям в редакторе строилась диаграмма и все это работало по нажатию на кнопку. | 
| Этот пользователь сказал Спасибо Qubeeq за это полезное сообщение: | ||
|  
darya.platonova.94 (21.01.2021)
 | ||
| 
			 
			#2  
			
			
			
			
		 | |||
| 
 | |||
|   В Memo вносятся значения. На одной строке одно значение. Надо просто их перевести в цифры и "засунуть" в Serie, созданное в TChart. Код: procedure TForm1.N2Click(Sender: TObject);
var
  I : Integer;
  D : Double;
begin
  Chart1.Series[0].Clear;
  For I := 0 To Memo1.Lines.Count-1 Do
    If TryStrToFloat(Trim(Memo1.Lines[i]),D) Then
      Chart1.Series[0].Add(D);
end;Проект Delphi 7 прикреплен. Последний раз редактировалось lmikle, 26.12.2016 в 07:23. | 
| Этот пользователь сказал Спасибо lmikle за это полезное сообщение: | ||
|  
darya.platonova.94 (21.01.2021)
 | ||
| 
			 
			#3  
			
			
			
			
		 | |||
| 
 | |||
|   Спасибо Вам огромное |