AlKon
Forum Professor / Завсегдатай форума
Участник № / Member № 1919
отправлено / posted
Привожу код (код делает нормальное формирование даты и времени (год,месяц,день,час,минута) в единую строку) :
PROGRAM VAR_INPUT Min : INT := 12; END_VAR VAR_INPUT Chas : INT := 2; END_VAR VAR_INPUT Day : INT := 3; END_VAR VAR_INPUT Mes : INT := 8; END_VAR VAR_INPUT God : INT := 2009; END_VAR VAR_OUTPUT TpDateTime : STRING; END_VAR VAR_OUTPUT TpDate : STRING; END_VAR VAR_OUTPUT TpTime : STRING; END_VAR
if Day>10 then TpDate:=Day; else TpDate:='0'+Day;end_if; TpDate:=TpDate+'/'; if Mes<10 then TpDate:=TpDate + '0';end_if; TpDate:=TpDate+Mes; TpDate:=TpDate+'/'; TpDate:=TpDate+God; if Min>10 then TpTime:=Chas+':'+Min; else TpTime:=Chas+':0'+Min; end_if; TpDateTime:= TpDate+' '+TpTime; <- на этой строчке ТМ слетает.
В чем ошибка?
И со строками частенько такое бывает. Причем в точности такой же код в составе другой программы работает без проблем.
Сообщения / Posts 229 | Из / From: Россия
| IP / IP: IP адрес / IP address |
AlKon
Forum Professor / Завсегдатай форума
Участник № / Member № 1919
отправлено / posted
И еще - задаю высоту шрифта и характеристики текста на панелях для МикроМРВ. Проверяю - во время исполнения текст отображается одной высоты и без особых свойств (подчеркивание и т.п.). Надеюсь в реальной МиркроМРВ отображение текста будет нормальное (заданное разработчиком)?
Сообщения / Posts 229 | Из / From: Россия
| IP / IP: IP адрес / IP address |
отправлено / posted
1) Ошибка связана с тем, что Вы одному и тому же строковому аргументу несколько раз присваиваете значения. Сократите присваивания, например, с помощью промежуточных локальных переменных.
Printer-friendly view of this topic
