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

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

Здравствуйте эксперты. Проблема такова - есть код создания отчета, но в нем есть ошибка
With table1 do begin
While not EOF do begin
Abc.Cells[i,2]:=FloatToStr(Table1['No_Zapisi']);
Abc.Cells[i,1]:=FloatToStr(Table1['No']);
Abc.Cells[i,3]:=FloatToStr(Table1['Vstuplenie']);
Abc.Cells[i,4]:=FloatToStr(Table1['Doljnost']);
необходимо присвоить полям правильное преобразование строк. Как это сделать?

Вопрос задал: BLOOD_OMEN (статус: Посетитель) Вопрос отправлен: 11 января 2007, 22:21 Состояние вопроса: открыт, ответов: 2.

Ответ #1. Отвечает эксперт: Knjazev

Здравствуйте, BLOOD_OMEN!
Надо так:
Abc.Cells[i,2]:=String(Table1['No_Zapisi']);
Советую почитать какой-нить учебник по D&БД, про создание объектов-полей в частности, а то мне не нравится ваш стиль.

Ответ отправил: Knjazev (статус: 3-ий класс) Время отправки: 12 января 2007, 01:28 Оценка за ответ: 2 Комментарий к оценке: With table1 do begin While not EOF do begin Abc.Cells[i,2]:=Vartostr(Table1['Family']); Abc.Cells[i,1]:=Vartostr(Table1['Name']); Abc.Cells[i,3]:=Vartostr(Table1['Otchestvo']); Abc.Cells[i,4]:=Vartostr(Table1['Data_Rojd']); Знаешь, а я сделал вот так!! И все ногрмально работает... Твой вариант, вообще то сам по себе не работоспособен!!! Извини, но факт!

Ответ #2. Отвечает эксперт: Иусов Сергей Ник.

Здравствуйте, BLOOD_OMEN!
Все ж таки, как говорится, "классически" нужно писать так (приложение)

Ответ отправил: Иусов Сергей Ник. (статус: 3-ий класс) Время отправки: 12 января 2007, 05:18

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

Мини-форум пуст.

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