Pascal abc net как сделать exe

У всех кто писал программы на Pascal, когда-нибудь возникал вопрос:
Как передать своё творение другому человеку без компилятора весом около 40 мегабайт и без исходного кода?

Конечно, можно объяснить получателю, как и каким образом нужно скомпилировать ваш проект, но не все на это пойдут.
Потому, что у людей могут быть более важные дела или те, которые приносят им радость и удовольствия, например посиделки Вконтакте или игры…

Поэтому, все разработчики, пускающие свою программу в свет, создают исполняемый файл «.exe», а не кидаются исходным кодом.

Как из кода на Pascal ABC.net сделать исполняемый файл .exe?

Откройте ваш код в «PascalABC.NET»

 

В верхнем меню окна выберите «Сервис» -> «Настройки…»
2_PascalABC.NET как сделать exe
В открывшимся окне настройки, выберите раздел «Функции компилятора»
3_PascalABC.NET как сделать exe
В разделе «Опции компилятора»:
Отключите галку с надписи: «Удалять EXE-файл после выполнения»
Поставьте галку в поле «Выходные файлы генерировать в папку»
Щелкнув на кнопку  «Обзор…» выберите место, где будет создаваться exe файл(это можн сделать на рабочем столе или в папке с программой)
Не забудьте нажать кнопку «ОК», чтобы применить новые настройки.
4_PascalABC.NET как сделать exe
На этом настройки закончились. 
 
Теперь запустите вашу программу и посмотрите в то место, которое вы указали щелкнув по кнопке «Обзор…».
В этой папке будет находиться исполняемый файл вашей программы, имеющий такое же имя, как у файла «.pas». 
Результат:
5_PascalABC.NET как сделать exe

Оставлено комментариев: 13

  • Привет, guest
  • 1.Сохраняю .exe файл с uses graphabc.net. 2.Открываю его,появляется окно консоли вместе с graph. 3.Как убрать окно консоли?
  • еще вопрос: а как сделать так чтобы после завершения программы я мог не закрывая программу смог выполнить ее еще раз ну например я написал калькулятор uses crt; var c :string; a ,d ,g : real; begin writeln('Напишите первое число'); readln(a); writeln('Напишите знак операции'); readln(c); writeln('Напишите второе число'); readln(d); if c=('+') then g:=a+d; if c=('-') then g:= a-d; if c=('*') then g:= a*d; if c=('/') then g:= a/d; writeln('Сумма=',g); readln; end. и сложил два числа потом программа пишет "Программа завершена нажми любую клавишу " а как сделать так чтобы я смог решать примеры не выходя каждый раз из программы????
    • Можно использовать бесконечный цикл: uses crt; var c :char; a ,d ,g : real; begin repeat writeln('Напишите первое число'); readln(a); writeln('Напишите знак операции'); readln(c); writeln('Напишите второе число'); readln(d); if c=('+') then g:=a+d; if c=('-') then g:= a-d; if c=('*') then g:= a*d; if c=('/') then g:= a/d; writeln('Сумма=',g); until false; end. Но тогда программа зациклится и пользователь будет вводить данные вечно, пока не догадается нажать на крестик:) Лучше будет написать вот так: uses crt; var c :char; a ,d ,g : real; begin repeat writeln('Напишите первое число ( q - выход из программы )'); readln(c); if c = 'q' then exit; writeln('Напишите знак операции'); readln(a); writeln('Напишите второе число'); readln(d); if c=('+') then g:=a+d; if c=('-') then g:= a-d; if c=('*') then g:= a*d; if c=('/') then g:= a/d; writeln('Сумма=',g); until false; end. Сначала мы вводим символ, если узнаём что он буква q - завершаем программу.
      • uses crt; var c :char; a ,d ,g : real; begin repeat; writeln('Напишите первое число(q — выход из программы)'); readln(a); if c = 'q' then exit; writeln('Напишите знак операции'); readln(c); writeln('Напишите второе число'); readln(d); if c=('+') then g:=a+d; if c=('-') then g:= a-d; if c=('*') then g:= a*d; if c=('/') then g:= a/d; writeln('Сумма=',g); until false; end. я подкорректировал прогу!!! :)
  • Блин капец я когда компилирую в структуре программы все в поряде а когда создаю отдельный exe шник после завершения программы она сразу вырубается не успеваешь результат посмотреть. Что делать