Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Общие вопросы Delphi
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 23.09.2018, 10:34   #1
Kukla19
Пользователь
 
Регистрация: 23.09.2018
Сообщений: 38
По умолчанию Почему не происходит компиляция? В Delphi у строки нет метода ToWords

Вот такой код:
Код:
program Project2;

{$APPTYPE CONSOLE}
uses
  SysUtils;

var
s: string;
str,dex,points: integer;
begin
str:=0;
points:=25;
repeat
read(s);
 
if s.towords[0] = 'сила' then
begin
str:=str+strtoint(s.ToWords[1]);
writeln(s.ToWords[0] +str);
points:=points-strtoint(s.ToWords[1]);
writeln('Очков осталось:',' ', points);
end
else
writeln('Не правильно введен параметр');

 
if s.towords[0] = 'ловкость' then
begin
dex:=dex+strtoint(s.ToWords[1]);
writeln(s.ToWords[0] + dex);
points:=points-strtoint(s.ToWords[1]);
writeln('Очков осталось:',' ', points);
end
else
writeln('Не правильно введен параметр');

until points<=0;
end.

И такие ошибки возникли в процессе компиляции.
[Error] Project2.dpr(19): Record, object or class type required
[Error] Project2.dpr(21): Record, object or class type required
[Error] Project2.dpr(21): 'END' expected but ')' found
[Error] Project2.dpr(25): 'UNTIL' expected but 'END' found
[Error] Project2.dpr(31): Identifier redeclared: 'Finalization'
[Error] Project2.dpr(32): Record, object or class type required
[Error] Project2.dpr(32): 'END' expected but ')' found
[Warning] Project2.dpr(36): Text after final 'END.' - ignored by compiler

В программе PascalABC.Net код выполняется, я думал и в делфи будет если это Object Pascal.

Обьясните пожалуйста в чем ошибки. Делфи только установил в не м пока мало что понимаю.
Kukla19 вне форума Ответить с цитированием
Старый 23.09.2018, 10:52   #2
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

На сколько я помню ToWords это метод расширения из PascalABC.Net, в Delphi его нет. Пишите сами.
p51x вне форума Ответить с цитированием
Старый 26.09.2018, 08:04   #3
Kukla19
Пользователь
 
Регистрация: 23.09.2018
Сообщений: 38
По умолчанию

Спасибо за ответ. Узнать бы еще как писать свои методы расширений .
Kukla19 вне форума Ответить с цитированием
Старый 26.09.2018, 08:20   #4
p51x
Старожил
 
Регистрация: 15.02.2010
Сообщений: 15,695
По умолчанию

А зачем вам именно метод расширения? Напишите обычную функцию, которая вернет массив и чуть измените вызов.
p51x вне форума Ответить с цитированием
Старый 26.09.2018, 09:37   #5
Kukla19
Пользователь
 
Регистрация: 23.09.2018
Сообщений: 38
По умолчанию

Ну работать с методами пригодится в каком-нибудь другом случае. Ой с функциями я только начал работать, пока плохо в них разбираюсь. Ну так понял что вы говорите. Хорошо, попробую попозже.
Сейчас через split ' ' разделяю строку на 2 ячейки массива.
Kukla19 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Установил Delphi XE6. Почему-то нет средств для разработки под Android Thechno-1024 Общие вопросы Delphi 4 21.04.2016 19:53
Delphi. Найдите плиз ошибку: почему квадратные матрицы умножаются, а прямоугольные нет Tonikmod Помощь студентам 3 16.11.2013 00:01
В чем ошибка?Почему не происходит удаление строки и столбца?Язык С++. RG21 Помощь студентам 0 29.05.2013 21:50
Как происходит Компиляция? ZhekON Свободное общение 21 22.04.2010 10:06
Почему строки в компоненте ListBox программно удаляются, а визуально нет? Velross Компоненты Delphi 7 10.12.2009 19:35