![]() |
|
#1
|
|||
|
|||
![]() Здравствуйте! Я пишу программу. Мне нужна ваша помощь! Файл прикреплен ниже. Мне нужно открыть тексовые файлы(myfile.txt, mytemp.txt), сделать поиск по дате, например за 16.11.2008 и построить 2 диаграммы (внизу). Одна по темрературе. Вторая по давлению, именно за 16 декабря!. Как это сделать пока не знаю. Может кто-нибудь сможет помочь с одним графиком!???
|
#2
|
|||
|
|||
![]() на самом деле всё просто, если файлы не большие можно загрузить с стринглисты их содержимое, затем в цикле искать дату, нашел дату - пишешь в чарт. Будет время покажу в коде
|
#3
|
|||
|
|||
![]() Код:
var s1 : TStringList; i, j : integer; d1 : string; begin d1 := edit9.text + '.' + edit10.Text + '.' + edit11.Text; s1 := TStringList.Create; s1.LoadFromFile('mytemp.txt'); j := 0; while Contain(s1[i], d1) do begin chart2.SeriesList[1].AddXY(j, StrToInt( Trim( copy ( s1[i], 10, length(s1[i]) - 10) ) ),'',clblue); inc(i); end; s1.Free; Процедура Contain будет проверять содержит ли строка дату. Последний раз редактировалось Act, 18.12.2008 в 03:06. |
#4
|
|||
|
|||
![]() Спасибо большое.Я попробую! Я лишь любитель, который разбирается в Дельфи по исходникам, но и немного по help-ам.
|
#5
|
|||
|
|||
![]() Процедуру Contain, где-нибудь надо еще описывать ( Undeclared identifier: 'Contain')?
|
#6
|
|||
|
|||
![]() ее, наверно, надо описать глобально!?
|
#7
|
|||
|
|||
![]() Цитата:
Помогите с описание процедуры Contain. Где она должна описываться!? |
#8
|
|||
|
|||
![]() Ну, подозреваю, что это поиск в строке подстроки (судя по параметрам и названию). Можно заменить на
Код:
POs(dl,sl[i]) > 0 |