DLL'ки , Возможно ли?

@MCTEP · Регистрация: 17.02.2010

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

как именно вызывать функции из DLL?

Вот код будущей DLL:

Delphi
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
library Project1;
uses
  SysUtils,
  dialogs,
  Classes;
{$R *.res}
Procedure ExProgramm; stdcall; export;
var
  v:Integer;
Begin
 v:=MessageDlg('Вы точно хотите выйти из программы?',mtConfirmation,
                                                    mbOKCancel, 0);
if v=1 then
Close
End;
Exports ExProgramm;
begin
end.

Вот он при компиляции ругаеться...допереть немагу...помогите плис.

Build
[Error] Project1.dpr(18): '(' expected but 'END' found

ругаеться на 15 строку.

@MCTEP · 17.02.2010, 20:21 **[ТС]**

ай,заработало))

можн сразу еще спросить?)

как их листать вправо и влево (кнопками) и удалять?

@John_Pa9JIbHuK · 17.02.2010, 20:33

Сообщение от MCTEP

удалять

Delphi
1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
pagecontrol1.Pages[pagecontrol1.ActivePageIndex].Free;
end;

Добавлено через 1 минуту

Сообщение от MCTEP

как их листать

Delphi
1
2
3
4
procedure TForm1.Button1Click(Sender: TObject);
begin
pagecontrol1.SelectNextPage(true,true);
end;

Новые блоги и статьи Все статьи Все блоги /
GitHub Copilot в JetBrains: модель по умолчанию, Fix и контроль MCP and_y87 12.10.2026 10 октября 2026 года GitHub обновил Copilot для JetBrains: добавил настройки стартовой модели, исправления из диагностики и управление автозапуском MCP. Поддержка IDE 2025. 1 прекращена — требуется. . .	День 5 из 28: Codex подсказывает следующий запрос and_y87 12.10.2026 9 октября 2026 года OpenAI запустила бету Composer predictions — подсказок следующего сообщения в текущем диалоге Codex. Это помощь с формулировкой запроса, а не автоматическое продолжение задачи. . . .	Запустил конкурс "тем и промптов для текстовых квестов созданных почти чисто ИИ" Adler 06.10.2026 Всем привет! За последние три-четыре дня я создал более 16 текстовых квестовых игр используя преимущественно по одному запросу к ИИ на игру. Мне так понравилось смотреть все ветки/ сцены во всех. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO zorxor 05.10.2026 Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .	Программный домашний кинотеатр russiannick 27.09.2026 Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .	Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого zorxor 21.09.2026 Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .	Мобильное приложение ColorStep pavlinmavlin 17.09.2026 Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .

@MCTEP 7 / 7 / 1 Регистрация: 17.02.2010 Сообщений: 23
	17.02.2010, 20:21 [ТС]
	ай,заработало)) можн сразу еще спросить?) как их листать вправо и влево (кнопками) и удалять? 0