Исправили ошибки с foreach. Версия - на сайте
Исправили сообщение об ошибке
Используя модуль GraphABC я составил программу
Uses GraphAbC; Var p:picture;
Begin p:=picture.Create(100,100);
p.FloodFill(50,50,clred); p.Draw(50,50); end.
Казалось бы, результат данной программы это вывод красного квадрата в область окна, однако при запуске данной программы ожидаемого результата не последовало. Я считаю, что это ошибка модуля GraphABC, если это не так, пожалуйста, запишите правильный рабочий код. С уважением пользователь
Да, FloodFill для рисунков не работает.
Обычная ошибка с автоопределением типов. Лечится указанием типа:
foreach var x : Boolean in s do
Ошибка исправлена уже - я об этом писал
модуль crt не работает. При воспроизведении пишет что crt можно запускать только через Shift+F9. Потом при нажатии shift+F9 вылетает.
А Вы сохраните программу. У Вас наверное диск защищен от записи.
всё равно не работает
Нам не удаётся воспроизвести ошибку. На скриншоте я вижу, что файл не найден. Это очень странное сообщение.
Собственно, все видно из картинки. Было время, для динамичеcких массивов это нормально работало.
А это и не должно работать.
Интеллисенс ввел вас в заблуждение. Надо исправить
Что делать - пока это один из наиболее доступных “компасов” в океане новых возможностей языка.
Не работает кортежное присваивание вот в таком примере (пытался упростить, но на скорую руку не сильно упростилось).
type SNode<T> = class
data: T;
next: SNode<T>;
end;
var mynil : SNode<integer> = nil;
function g := (mynil, mynil);
begin
var f, l : SNode<integer>;
(f, l) := g();
end.
Исправили
Может, это не считается ошибкой, но вот такая проблема. Нижеследующая программа в последних версиях (конец 2015 — начало 2016) выводила 1
, а сейчас выводит [1,2,3]
. Из-за этого поломалось несколько старых программ
procedure g<T>(params a:array of T);
begin
write(a[0]);
end;
procedure f<T>(params a:array of T);
begin
g(a);
end;
begin
f(1,2,3);
end.