PascalABC.NET

Форум программистов и сисадминов Киберфорум

Войти

Регистрация
Восстановить пароль

Другие темы раздела
PascalABC.NET Графические построения в паскале - треугольная пирамида https://www.cyberforum.ru/ pascalabc-net/ thread353861.html Нарисовать на экране треугольную пирамиду. Ввести координаты некоторых точек (выбрать самостоятельно) и цвет контура.	PascalABC.NET PascalABC.NET - подпрограмма. Необрабатываемое исключение в приложении Здравствуйте! Уменя вопрос по поводу подпрограммы!(PascalABC.NET); Нажимаю на кнопку --> прехожу в подпрограмму --> и когда приходят в действие операторы writeln;readln(str); то ВЫХОДИТ ОШИБКА : необрабатываемое исключение в приложении Помогите, как сделать ввод в подпрограмме? (Использую: GraphABC, abcbuttons); Если невозможно, то как можно из подпрограммы выташить пременную(напримет no:=1;
PascalABC.NET Как скрыть или удалить кнопки с формы? Здравствуйте. У меня вопрос (PascalABC.NET) по поводу кнопок: Я создал кнопи(4), ВСЕ РАБОТАЕТ НОРМ., а вот когда закрашиваю экран белым цветом для вывода новой информации, получается так что кнопки те под этим белым слоем нажимаются при нажатие на пустоту!!! Вот код :program vhod; uses graphABC,abcbuttons; procedure OnButtonClick; var sound: system.Media.SoundPlayer; begin sound:= new... https://www.cyberforum.ru/ pascalabc-net/ thread343030.html	PascalABC.NET Создать область для ввода текста https://www.cyberforum.ru/ pascalabc-net/ thread341859.html Здравствуйте! У меня (PascalABC.NET) вопро по поводу, как можно создать область для ввода текста? Если при помощи операторов writeln(''); readln(str); , то как это поле для ввода текста расширить, сжать, переместить (например чтоб было по середине экрана программы)? uses graphabc; var str:string; begin window.IsFixedSize := true; window.Load('peg.jpg'); //Область для ввода...
PascalABC.NET Как загрузить картинку Подскажите как исправить код PascalABC на PascalABC.net? Сам код: write ('Введите Ф.И.О.: '); read (n); clrscr; y:=loadpicture(n); drawpicture(y,0,0); пишет что loadpicture и drawpicture неизвестные имена	PascalABC.NET Клик мышкой https://www.cyberforum.ru/ pascalabc-net/ thread341497.html Здравствуйте! У меня вопрос по PascalABC.NET: 1)Как, кликая на кнопку(!!!ТОЛЬКО НА КНОПКУ!!!), выполнялся выход из программы(или любое другое)?! 2)И как еще сделать так чтобы только при нажатие мыши срабатывало, а то из за процедуры OnMouseMove нужно немного курсор здвигать! (Работал на Turbo Pascal попробовал PascalABC.NET - понравилось, все понятно! Только вот такие дурацкие вопросы...:(...
PascalABC.NET Не работает readkey и keypressed https://www.cyberforum.ru/ pascalabc-net/ thread334851.html Здравствуйте. Написал программу, используя PascalABC, столкнулся с необходимостью скомпилировать ее в *.exe, для этого скачал PascalABC.NET и обнаружил, что программа не работает. Так как после запуска программы она не реагирует на клавиши (не начинается игровой процесс после нажатия 's', не двигается "платформа"), то, догадываюсь, дело в readkey и keypressed. Что с этим делать, на что заменить...	Сворачивание кода в PascalABC.Net PascalABC.NET Пользуюсь средой PascalABC.Net, подскажите, как в ней часть кода свернуть?!
PascalABC.NET PascalABC.NET - причуды модульного программирования Использую PascalABC.NET. Столкнулся с такой проблемой: имеется программа, задачей которой является объединение двух множеств, сформированных по вводимым пользователем границам (вводятся вещественные числа), в которой содержится два модуля: -Ввод границ и формирование исходных массивов. -Вычисление результата объединения исходных массивов. Проблема заключается в том, что результатом своей... https://www.cyberforum.ru/ pascalabc-net/ thread317094.html	PascalABC.NET Ошибка. Наверно, переписывается память. PascalABC.NET Использую PascalABC.Net. "База данных" аптека. Программа заносит содержимое текстового файла в список. После нескольких (случайное число) поисков (событий Click) список разрушается (также случайным образом. стираются или изменяются поля, например.) В программе много присвоений нулям и nil, они не нужны я их сделал в процессе поиска этой ошибки. По клику вызывается процедура, в ней 4... https://www.cyberforum.ru/ pascalabc-net/ thread300598.html
PascalABC.NET Вторая форма (в ABC.net) Здравствуйте, как видно из названия, мне нужно создать вторую форму.. Можно это реализовать?	PascalABC.NET Как подключить dll в PascalABC.NET? https://www.cyberforum.ru/ pascalabc-net/ thread296361.html MyDll.dll library MyDll; const PascalABCNET = 'PascalABC.NET'; type My = class private s:string;

Puporev

Почетный модератор

64304 / 47599 / 32743

Регистрация: 18.05.2008

Сообщений: 115,181

12.10.2011, 17:27

Нарисовать треугольник и залить цветом - PascalABC.NET - Ответ 2064124

12.10.2011, 17:27. Показов 13578. Ответов 2

Метки (Все метки)

Сообщение было отмечено Памирыч как решение

Решение

Вообще-то там есть неплохая справка, не грех и почитать.
Вот с полигоном.

Pascal

uses graphABC;
var t:array of Point;
    x,y:integer;
begin
setlength(t,4);
setwindowsize(500,500);
writeln('Введите координаты вершин треугольника от 50 до 450:');
repeat
writeln('x1,y1:');
read(x,y);
t[0].X:=x;t[0].Y:=y;
until(t[0].X>=50)and(t[0].X<=450)and (t[0].Y>=50)and(t[0].Y<=450);
repeat
writeln('x2,y2:');
read(x,y);
t[1].X:=x;t[1].Y:=y;
until(t[1].X>=50)and(t[1].X<=450)and (t[1].Y>=50)and(t[1].Y<=450);
repeat
writeln('x3,y3:');
read(x,y);
t[2].X:=x;t[2].Y:=y;
until(t[2].X>=50)and(t[2].X<=450)and (t[2].Y>=50)and(t[2].Y<=450);
t[3]:=t[0];
clearwindow;
setpencolor(clred);
setbrushcolor(clred);
Polygon(t);
readln
end.

Вернуться к обсуждению:
Нарисовать треугольник и залить цветом PascalABC.NET

Следующий ответ

Заказать работу у эксперта

Programming

Эксперт

94731 / 64177 / 26122

Регистрация: 12.04.2006

Сообщений: 116,782

12.10.2011, 17:27

Готовые ответы и решения:

Нарисовать прямоугольник и залить его черным цветом
написал код рисуется прямоугольник и надо залить его черным цветом но у меня почему-то не...

Как залить всё одним цветом?
Как сделать зелёный фон на всё окно? На первом скрине всё нормально. На втором я растянул на весь...

Нарисовать треугольник и залить его цветом
Ранее с Canvas не работал. Мне нужно нарисовать треугольник и залить его цветом. Делаю вот так, но...

Как залить треугольник цветом в Windows Forms?
Помогите пожалуйста залить треугольник цветом в Windows Forms graphics.DrawLine(Pens.Black, 970,...

	12.10.2011, 17:27

IT_Exp

Эксперт

87844 / 49110 / 22898

Регистрация: 17.06.2006

Сообщений: 92,604

12.10.2011, 17:27

Помогаю со студенческими работами здесь

Как создать треугольник, чтобы потом его залить цветом
Здравствуйте! Подскажите, пожалуйста, есть ли возможность в VB создать фигуру (по типу Shape)...

Нарисовать границы четырехугольника и залить цветом
Подскажите, что нужно добавить, что б нарисовать границы четырехугольника и залить цветом? ...

Нарисовать и залить чёрным цветом квадрат
приведите пример кода (рисовать <windows.h>) p.s искал, пытался вставить в свой код и чот не...

Нарисовать треугольник, линию с определенным цветом Directx 8.1
Появилась надобность нарисовать линию или треугольник. В интернете все перерыл, не могу найти...

Наверх