Переделать код GraphABC на System.Windows.Forms

14.08.2017, 17:22. Показов 1012. Ответов 0

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

Студворк — интернет-сервис помощи студентам

Нужно переделать данный код на System.Windows.Forms и System.Drawing, то есть чисто с ними:

Кликните здесь для просмотра всего текста

Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
uses GraphABC, ABCObjects;
var
 c1: color;
begin
 var p1,p2: Picture;
 p1.Load('путь1');
 p1.Draw(0,0);
 p1.Clear;
 p1.Transparent:=false;
 p1.TransparentColor:=clWhite;
 p1.FlipHorizontal;
 p1.FlipVertical;
 c1:=p1.GetPixel(1,1);
 if p1.Intersect(p2) then
   //..
 p1.Save('путь2');
 
 var p3,p4: PictureABC;
 p3.Transparent:=false;
 p3.TransparentColor:=clBlack;
 p3.Visible:=true;
 p3.ChangePicture('путь3');
 p3.Destroy;
 p3.FlipHorizontal;
 p3.FlipVertical;
  if p3.Intersect(p4) then
  //..
 p3.MoveTo(1,1);
 if p3.PtInside(1,1) then
 //..
 p3.Redraw;
 p3.Save('путь4');
 p3.Scale(2);
 p3.ToBack;
 p3.ToFront;
end.

Между строчками в коде в принципе нет никаких связей, я просто хочу знать как это должно выглядеть на других модулях(Windows.Forms и Drawing).

cpp_developer

Эксперт

20123 / 5690 / 1417

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

Сообщений: 22,546

Блог

14.08.2017, 17:22

Ответы с готовыми решениями:

System.Windows.Forms+GraphABC в одном окне
Здравствуйте, есть графическая программа написанная в обычном pascal abc с использованием модуля graphabc. очень нужно graphabc встроить в...

Что за классы System, System.Drawing, System.Windows.Forms
Народ, объясните пожалуйста что за классы: System, System.Drawing, System.Windows.Forms. В справке как-то ничего не нашел. Если там есть,...

Windows.Forms вместо GraphABC
Здравствуйте. Решил написать программу. Так как я ещё новичок использовал только известные мне "вещи" и естественно столкнулся с...

Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.

raxper

Эксперт

30234 / 6612 / 1498

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

Сообщений: 21,154

Блог

14.08.2017, 17:22

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

Windows.Forms - Процедуры, цикл for и System.Windows.Forms.Button
Доброго времени суток. Есть WinForms программа: ... private ClickedButtonId, ClickedButtonX, ClickedButtonY:Integer; ...

System.Drawing и System.Windows.Forms -- как их соединить в одно окно
Вопрос следующий: есть программа, она делится на две части - одна графика, другая текстовое окно. В окно вводится код, который...

System.Drawing и System.Windows.Forms
Гуглил команды для модулей System.Drawing и System.Windows.Forms, но ничего не нашёл. Дадите пж ссылку на список и ли можете сами написать,...

Как нарисовать прямоугольник в System.Windows.Forms?
Вот код, который сделан неумелым пользователем на System.Windows.Forms и System.Drawing: {$reference System.Drawing.dll} {$reference...

Новые функции для System.Windows.Forms
Делаю модуль для упрощения работы с Windows.Forms То, что уже создал, написал ниже в спойлере. Методы наследованных классов учтены ...

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

Или воспользуйтесь поиском по форуму:

Новые блоги и статьи Все статьи Все блоги /
Midnight Chicago Blues kumehtar 24.03.2026 Такой Midnight Chicago Blues, знаешь?. . Когда вечерние улицы становятся ночными, а ты не можешь уснуть. Ты идёшь в любимый старый бар, и бармен наливает тебе виски. Ты смотришь на пролетающие. . .	Контроль уникальности заводского номера - вариант №2 Maks 24.03.2026 В отличие от предыдущего варианта добавлено прерывание циклов, также добавлены новые переменные для сохранения контекста ошибки перед прерыванием цикла: Процедура ПередЗаписью(Отказ, РежимЗаписи,. . .	SDL3 для Desktop (MinGW): Вывод текста со шрифтом TTF с помощью библиотеки SDL3_ttf на Си и C++ 8Observer8 24.03.2026 Содержание блога Финальные проекты на Си и на C++: finish-text-sdl3-c. zip finish-text-sdl3-cpp. zip	Жизнь в неопределённости kumehtar 23.03.2026 Жизнь — это постоянное существование в неопределённости. Например, даже если у тебя есть список дел, невозможно дойти до точки, где всё окончательно завершено и больше ничего не осталось. В принципе,. . .
Модель здравоСохранения: работники работают быстрее после её введения. anaschu 23.03.2026 geJalZw1fLo Корпорация до введения программа здравоохранения имела много невыполненных работниками заданий, после введения программы количество заданий выросло. Но на выплатах по больничным это. . .	Контроль уникальности заводского номера - вариант №1 Maks 23.03.2026 Алгоритм контроля уникальности заводского (или серийного) номера на примере документа выдачи шин для спецтехники с табличной частью в КА2. Данные берутся из регистра сведений, по которому настроено. . .	Хочу заставить корпорации вкладываться в здоровье сотрудников: делаю мат модель здравосохранения anaschu 22.03.2026 e7EYtONaj8Y Z4Tv2zpXVVo https:/ / github. com/ shumilovas/ med2. git	Программный отбор элементов справочника по группе Maks 22.03.2026 Установка программного отбора элементов справочника "Номенклатура" из модуля формы документа в КА2. В качестве фильтра для отбора справочника служит группа номенклатуры. Отбор по наименованию. . .

Наверх