Форум программистов, компьютерный форум, киберфорум
PascalABC.NET
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск Заказать работу  
 
 
Рейтинг 4.77/30: Рейтинг темы: голосов - 30, средняя оценка - 4.77
1 / 1 / 0
Регистрация: 03.01.2020
Сообщений: 84
GraphABC

Program1.pas(14) : Left не объявлен в типе procedure

03.01.2020, 20:22. Показов 6798. Ответов 65
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
uses GraphABC, ABCObjects;
var
  x,y: integer;
procedure coub();
begin
  RectangleABC.Create(x,y,100,50,clRed);
  RectangleABC.Create(x+99,y+25,25,25,clRed);
  ABCObjects.CircleABC.Create(x+20,y+50,10,clBlack);
  ABCObjects.CircleABC.Create(x+100,y+50,10,clBlack);
end;
procedure KeyDown(Key: integer);
begin
  case Key of
  VK_W: coub.Left := Coub.Left + 10;
  end;
end;
begin
  coub;
  OnKeyDown := KeyDown;
end.
ошибка во 2ой процедуре, понять не могу.
0
Лучшие ответы (1)
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
03.01.2020, 20:22
Ответы с готовыми решениями:

Ошибка "Interpolators.pas(47) : _low не объявлен в типе TInterpolator"
Скачать архив с движком можно по ссылке. Ошибка в модуле Interpolators: Почему возникает и как ее исправить? ///Предоставляет...

Program1.pas(63) : Встречено 'else', а ожидалось ';'
var a:array of integer; st:array of integer; rez:array of integer; sum,i,j,k,x,s,n:integer; otvet:string; begin ...

Program1.pas(12) : Встречено 'else', а ожидался оператор
Program jg; Label 1; Var y,x:integer; Begin y:=6; Write('Введите число '); 1:Readln(x); if x < y then writeln('Мало'); ...

65
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 09:57
Студворк — интернет-сервис помощи студентам
ProMix0, Всеми этими свойствами обладает как wf,так и GraphWPF/WPFObjects
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 10:02
Цитата Сообщение от Пс Посмотреть сообщение
ProMix0, Всеми этими свойствами обладает как wf,так и GraphWPF/WPFObjects
Но, это учебные модули. GraphABC и ABCObjects также умеет с изображениями по-простому работать. Переучиваться с учебного модуля на учебный не вижу смысла. А если чего-то не хватает - прекращайте в игрушки играть и изучайте WPF.
0
80 / 33 / 10
Регистрация: 14.06.2019
Сообщений: 516
06.01.2020, 10:06
Я останусь верен паскалю
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 10:07
ProMix0, тогда не пишите на WPF. Ибо без XAML мы возвращаемся к тому, от чего начинали, к Windows Forms - без нормального разделения на описание интерфейса и бизнес-логики.
0
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 10:08
Соколиный глаз, Если есть мозги и фантазия,и на учебных модулях можно серьезные проектв делать)
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 10:09
Пс, на Ассемблере тоже много чего можно написать, но на нем не пишут браузеры или оконные приложения. Если Вы считайте по-иному, то приведите мне серьезные проекты (не свои) на учебных модулях, которые пользуются популярностью.
0
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 10:17
Соколиный глаз, Я ниговорю,что они есть,и уж тем более в публичном доступе.Я сказал что можно.И почему свои нельзя?(необоснованный критерий).
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 10:20
Пс, на Ассемблере тоже можно, но не нужно. Учебные модули на то и учебные, чтобы обучать юных программистов, а не писать серьёзные проекты.
0
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 10:25
Соколиный глаз, По-моему,паскаль уже давно идет не по учебному пути.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 10:49
Пс, Вы отошли от вопроса про учебные модули, увы.
0
58 / 42 / 21
Регистрация: 01.01.2018
Сообщений: 273
06.01.2020, 10:53
Соколиный глаз, раз уж речь зашла, что скажете про SFML? Сегодня завершили возиться с подключением. Оно стоит того?
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 11:02
Ksardas_178, увы, ничего не скажу - я с ним не работал. Но, если хотите сразу, проще и без проблем - стоило бы сменить язык на иной, производственный, более серьёзный, а не использовать язык, направленный на обучение.
1
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
06.01.2020, 11:39
Я с WPF мало работал, но я так понимаю XAML там работает как пища кодогенераторов? Ну, синтаксис вроде простой, можно и свой кодогенератор написать.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 12:07
Sun Serega, да, правильно понимаете, но незачем изобретать свой «велосипед». Тем более, по качеству маловероятно, что он будет таким же как от Microsoft.
0
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 12:09
Цитата Сообщение от Соколиный глаз Посмотреть сообщение
Вы отошли от вопроса про учебные модули
Где я отошел?
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 12:10
Проще и лучше взять проверенное временем решение.
0
257 / 149 / 70
Регистрация: 29.07.2018
Сообщений: 1,254
06.01.2020, 12:16
Соколиный глаз, И какое же решение вы предлагаете?Перейти на C#?

Добавлено через 1 минуту
Цитата Сообщение от Соколиный глаз Посмотреть сообщение
На мой взгляд, если пользователь начал с GraphABC/ABCObjects лучше на них и закончить
На мой взгляд,если он начал писать на PABC.NET,лучше на нем и дописать.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 12:17
Пс, да, перейти на C# и использовать WPF и XAML. Если Вам лично не нравиться данный язык, то извините, не мои проблемы. То, что здесь предложили использовать - не даёт преимуществ в разделении проекта на бизнес-логику и описание интерфейса, для чего именно и был сделан WPF.
0
 Аватар для Sun Serega
2355 / 1458 / 526
Регистрация: 07.04.2017
Сообщений: 4,798
06.01.2020, 12:21
Цитата Сообщение от Соколиный глаз Посмотреть сообщение
но незачем изобретать свой «велосипед»
А вот по этой фразе можно определять не настоящих программистов.
Велосипеды, кодогенераторы и прочая ересь - программисту лучше хлеба!

Если (более) серьёзно - обучение всегда состоит из теории и практики. В случае программирования это всегда справки и велосипеды соответственно.
А раз, как известно, обучение программированию может закончится только в гробу - нечего говорить что нечего велосипеды делать.
0
Alvin Seville
 Аватар для Соколиный глаз
343 / 273 / 134
Регистрация: 25.07.2014
Сообщений: 4,537
Записей в блоге: 22
06.01.2020, 13:17
Sun Serega, человеку нужен WPF, пусть берёт сразу нормальный инструмент. Опыт да, при написании своего аналога - получит, но это - не настоящий XAML. Чтобы писать аналог XAML надо сначало его хорошо знать, а это можно сделать изучив его через написание на C# WPF приложений. Или Вы будете с этим спорить? Так, что по Вашей фразе можно:
определять не настоящих программистов
На мой взгляд,если он начал писать на PABC.NET,лучше на нем и дописать.
Проще, но не лучше. Вы затягиваете человека в изучение учебных модулей, чтобы быстрее он писал код (если я верно Вас понял). Это - благие намерения, но негативная сторона их в том, что Вы отдаляете тот момент, когда человек перейдёт к серьёзным и производственным технологиям разработки. Изучит человек все модули PascalABC.NET - что с того? Да, узнает принципы работы, например, с графикой, но и всё. Узнает ли он что-то то полезное из серьёзных технологий нужных в реальной работе при таком подходе? Нет. Я думаю и считаю, что задача помогающих форумчан развивать других, подталкивать их к развитию, а не заставлять вертеться на одном месте. Я уверен, что в душе Вы также считаете, но не видите (или забываете) о негативных последствиях долгого «засиживания» на учебных модулях.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
06.01.2020, 13:17
Помогаю со студенческими работами здесь

Проверить расчет по формуле: Program1.Pas(8): Встречено 'else', а ожидалось ';'
Program ChM; Var a,b,y,z: real; begin Writeln('Введите y и Z'); Read(y,Z); b:=ln(y)/ln(10)-ln(Z); If b=y then begin...

Что значит Program1.pas(5,1): FOUND'readln'EXPECTED':'
program qq; var s:string; beign readln (s); for i:=length(s) downto 1 do if not(s in ) then delete(s,i,1); {это в Турбо и Фрее,...

Program1.pas(10) : Операция 'mod' не применима к типу real
Дана блок-схема алгоритма. Какое значение приобретет переменная S после завершения выполнения алгоритма, если на вход подали N = 289? ...

Program1.pas(11) : Нет перегруженной подпрограммы с такими типами параметров
uses crt; var f: text; a, i, d, p, max, j:integer; s:real; function sum(m:integer):integer; begin sum := 0; ...

Program1.pas(9) : Нет перегруженной подпрограммы с такими типами параметров
В 17 строке выдаёт ошибку: "Program1.pas(9) : Нет перегруженной подпрограммы с такими типами параметров" var m:array of integer; ...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
60
Ответ Создать тему
Новые блоги и статьи
Debian 13: Установка Lazarus QT5
ВитГо 09.05.2026
Эта инструкция моя компиляция инструкций volvo https:/ / www. cyberforum. ru/ blogs/ 203668/ 10753. html и его же старой инструкции по установке Lazarus с gtk2. . .
Нейросеть на алгоритме "эстафета хвоста" как перспектива.
Hrethgir 06.05.2026
На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .
Асинхронный приём данных из COM-порта
Argus19 01.05.2026
Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .
попытка написать игровой сервер на C++
pyirrlicht 29.04.2026
попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .
Контроль уникальности выбранного документа-основания при изменении реквизита
Maks 28.04.2026
Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание
Maks 24.04.2026
У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .
Валидация и контроль данных табличной части документа перед записью
Maks 22.04.2026
Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .
Отчёт о затраченных материалах за определенный период с макетом печатной формы
Maks 21.04.2026
Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru