|
|
Регистрация Восстановить пароль |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
11.02.2011, 22:58 | #1 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
StringGrid
Проблем такая... нужно сделать чтобы при введению в ячейку некорректных данных (букв или пустая ячейка )
вставлял в ячейку 0 и подсчитывал сумму, и высчитывал сумму всех чисел 3-его столбца. Код:
Код нужно оформлять по правилам: тегом [CODE]..[/СODE] (это кнопочка с решёточкой #) Не забывайте об этом! Модератор. Последний раз редактировалось Serge_Bliznykov; 12.02.2011 в 08:39. |
11.02.2011, 23:01 | #2 |
DelphiProger
Участник клуба
Регистрация: 14.11.2010
Сообщений: 1,023
|
тоесть должны оставаца числа и нули?
VirusN13
|
11.02.2011, 23:20 | #3 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
Да и если можно чтобы буквы вообще не прописывались.
|
12.02.2011, 00:18 | #4 | |
Подтвердите свой е-майл
Регистрация: 19.12.2010
Сообщений: 808
|
Первый вариант. Пример для A[j]:
Цитата:
Код:
Код:
From Stilet: Попрошу правила форума соблюдать, и код выделять его тегом по кнопке # Последний раз редактировалось Stilet; 12.02.2011 в 11:25. |
|
12.02.2011, 09:42 | #5 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
Спасибо большое за помощи, тока вот с вводом букв не помогло,
я имел в виду что бы как бы задать маску ввода данных в ячейку, что бы нельзя было вводить некорректные данные на вроде (44,44,44 или буквы) ну при этом понимал и перемножал (44,44 и 12е и т д ). Подскажите пожалуйста в чем тут проблема не могу сделать чтобы в ячейках пересчитывал и дробные числа если заменить integer на real и TryStrToFloat, StrToFloat то процедура не выполняется. Код:
Последний раз редактировалось Stilet; 13.02.2011 в 11:39. |
13.02.2011, 10:02 | #6 |
Форумчанин
Регистрация: 08.01.2011
Сообщений: 226
|
После замены на real нужно заменить
TryStrToint на TryStrToFloat intToStr на FloatToStr |
13.02.2011, 10:17 | #7 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
Проблема в том что после замены не могу понять почему появляется ошибка вот тут
Код:
|
13.02.2011, 11:41 | #8 |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Какого рода ошибка?
I'm learning to live...
|
13.02.2011, 13:12 | #9 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
Вот такая
[Error] Main.pas(322): For loop control variable must have ordinal type [Error] Main.pas(323): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(324): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(326): For loop control variable must have ordinal type [Error] Main.pas(327): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(328): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(329): For loop control variable must have ordinal type [Error] Main.pas(331): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(332): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(333): Incompatible types: 'Integer' and 'Real' [Error] Main.pas(333): Incompatible types: 'Integer' and 'Real' [Fatal Error] MainP.dpr(5): Could not compile used unit 'Main.pas' и вот такая [Error] Main.pas(323): There is no overloaded version of 'TryStrToFloat' that can be called with these arguments [Error] Main.pas(327): Types of actual and formal var parameters must be identical [Error] Main.pas(331): Incompatible types: 'Integer' and 'Extended' |
13.02.2011, 13:58 | #10 |
Пользователь
Регистрация: 11.02.2011
Сообщений: 16
|
Заработало
Всем спасибо за помощь!!!
Выкладываю готовый рабочий код вдруг у кого возникнет такая проблема. Код:
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
StringGrid | Don Karleone | Общие вопросы Delphi | 2 | 09.10.2010 20:17 |
StringGrid | serj-07 | Общие вопросы Delphi | 12 | 25.05.2010 17:43 |
StringGrid | stp56 | Общие вопросы Delphi | 4 | 27.07.2009 20:44 |
StringGrid | Chudo4258 | Помощь студентам | 1 | 17.03.2009 09:24 |
StringGrid | StartMis | Общие вопросы Delphi | 5 | 21.11.2008 15:11 |