Экспертная система Delphi.int.ru

Сообщество программистов
Общение, помощь, обмен опытом

Здравствуйте, уважаемые эксперты! Возник вопрос, никак не въеду, что делать. При компиляции выдается ошибка:
" Implicit string cast with potential data loss from 'string' to 'ShortString'"
помогите, что я неправильно делаю?
фрагмент кода прилагается

К вопросу прикреплён файл. Загрузить » (срок хранения: 60 дней с момента отправки вопроса)

Вопрос задал: Ghostb (статус: Посетитель) Вопрос отправлен: 6 апреля 2011, 00:00 Состояние вопроса: решён, ответов: 1.

Ответ #1. Отвечает эксперт: Вадим К

Здравствуйте, Ghostb!
Удивительно, как оно вообще компилируется. Делфи - язык с строгой типизацией и складывать строки с вещественными числами нельзя так просто. Судя по коду, выделенная строка должна выглядеть так

sum := sum+StrToFloat(a[i]);

a:array[1..100] of string;

 Edit1.text := FloatToStr(sum)

Ответ отправил: Вадим К (статус: Академик) Время отправки: 6 апреля 2011, 00:29 Оценка за ответ: 5

Мини-форум вопроса

Мережников Андрей (статус: Абитуриент), 6 апреля 2011, 06:07 [#1]: Зачем было делать два цикла друг за другом, а не сделать две операции в одном цикле?

17 апреля 2011, 11:39: Статус вопроса изменён на решённый (изменил автор вопроса — Ghostb): вопрос решён

Чтобы оставлять сообщения в мини-форумах, Вы должны авторизироваться на сайте.