Общие вопросы и приёмы эффективного программирования на BASIC

@Замабувараев · Регистрация: 18.12.2014

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

Вот как создать кнопку:

PureBasic
1
2
3
4
5
6
7
8
9
10
Dim hwndButton As HWND = CreateWindow( _
    WC_BUTTON,
    "Текст кнопки", _
    WS_CHILD Or BS_BITMAP Or BS_PUSHBUTTON Or WS_CLIPSIBLINGS, _
    10, 10, 100, 50, _
    hwndMainForm, _
    Cast(HMENU, 1000), _
    hInst, _
    NULL _
)

@The trick · 15.04.2021, 15:07

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

UPX распаковывается UPX, что и это тоже не очевидно?

Кому, мне? Ты не на меня смотри, а на людей которые эту тему читают и будут читать, кто вообще не знаком с пакерами. Думаешь кто-то проверяет что это пожато? Я просто на слово тебе поверил пока Замабувараев не написал что файл пожат.

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

Эта такая же аксиома, как и то, что в Бейсике, как и в большинстве языков программирования в качестве десятичного разделителя используется точка.

Где используется? Ты вероятно путаешь процесс написания кода с эксплуатацией готовой программы. Зачем ты со мной на счет этого споришь?

@Замабувараев · 15.04.2021, 15:24 **[ТС]**

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

большинстве языков программирования в качестве десятичного разделителя используется точка

Десятичные разделители в разных странах:
точка
запятая
мумаййиз
неизвестно
https://upload.wikimedia.org/w... uselang=ru

Добавлено через 43 секунды

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

большинстве языков программирования в качестве десятичного разделителя используется точка

Десятичные разделители в разных странах:
точка
запятая
мумаййиз
неизвестно
https://upload.wikimedia.org/w... uselang=ru

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

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

в большинстве

По данным педивикии, вы в меньшинстве.

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

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

как и в большинстве языков программирования в качестве десятичного разделителя используется точка

Если вы так любите точки в качестве разделителя, почему вы не поставите точку в региональных настройках? Это какой‐то анатомический нонсенс ожидать точки там, где вы сами в настройках указали запятую.

@locm · 15.04.2021, 15:41

Сообщение от Замабувараев

Осталось только исправить недочёты и вновь убедиться, что исполняемый файл не разжирел.

Это все придирки. Приложение рабочее и выполняет свои функции.
Я тоже могу придраться что ваше приложение не создает окно в центре экрана как мое.

Для поддержки ввода дробных чисел нужно заменить Val на ValD.

Сообщение от Замабувараев

Вот этот код неправильный

Он правильный. Если заменить на

PureBasic
1
While GetMessage_(msg.MSG, #Null, 0, 0) <> -1

процесс не завершится при закрытии окна.

@locm · 15.04.2021, 15:44

Приложение на 1 КБ меньше чем у вас.
Уменьшайте свое!

@Замабувараев · 15.04.2021, 16:38 **[ТС]**

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

Он правильный.

Неправильный конечно же. Посмотрите на код от корпорации Микрософт:

Сообщение от Могущественная транснациональная корпорация Микрософт

The possibility of a -1 return value in the case that hWnd is an invalid parameter (such as referring to a window that has already been destroyed) means that such code can lead to fatal application errors. Instead, use code like this:

Code
1
2
3
4
5
6
7
8
9
10
11
12
13
14
BOOL bRet;
 
while( (bRet = GetMessage( &msg, hWnd, 0, 0 )) != 0)
{ 
    if (bRet == -1)
    {
        // handle the error and possibly exit
    }
    else
    {
        TranslateMessage(&msg); 
        DispatchMessage(&msg); 
    }
}

https://docs.microsoft.com/en-... getmessage

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

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

Для поддержки ввода дробных чисел нужно заменить Val на ValD.

Не учитывает мои настройки ввода, переделывайте. У меня стоит запятая.

@locm · 15.04.2021, 17:15

Я задачу решил и размер файла даже меньше чем у вас. Все остальное - придирки!
Просто выкручиваетесь как уж на сковородке потому что

Сообщение от Замабувараев

Я буду публично посрамлён

@Замабувараев · 15.04.2021, 17:53 **[ТС]**

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

Я задачу решил и размер файла даже меньше чем у вас

У вас без значка и манифеста. Вот смотрите, Я тоже сделал без значка и манифеста и получил екзешник 5632 байта.
Функционал моей программы не утратил силы, только отвалились вижуальные стили и высокое DPI.

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

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

Просто выкручиваетесь как уж на сковородке потому что

Проиграли или будете пытаться дальше?

@locm · 15.04.2021, 18:49

Сообщение от Замабувараев

Вот смотрите, Я тоже сделал без значка и манифеста и получил екзешник 5632 байта.

Где смотреть?

Сообщение от Замабувараев

Проиграли или будете пытаться дальше?

Вы решили померятся размерами?

Вам это так принципиально?

Задача была на WinAPI написать приложение которое меньше 9 КБ.

Задача выполнена.

И вот ваши слова

Сообщение от Замабувараев

Я буду публично посрамлён

@Замабувараев · 15.04.2021, 18:52 **[ТС]**

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

Где смотреть?

Не прикрепилось, что ли. Ну вот:

@Pro_grammer · 15.04.2021, 21:03

Сообщение от The trick

Где используется?

По ГОСТу

Общие вопросы и приёмы эффективного программирования на BASIC

@The trick · 15.04.2021, 21:30

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

По ГОСТу

Ты вообще читал что там написано?

@Pro_grammer · 15.04.2021, 22:33

The trick, ок. Просто ответь мне однозначно на один вопрос.
Ты пишешь программу, где нужен ввод десятичных чисел для дальнейших математических с ними операций.
Творя программа тоже не умеет обрабатывать десятичную точку, а ждёт исключительно запятую?
Нужен простой ответ:
1. Да, не умеет, нужна только запятая.
2.Нет, умеет, можно вводить в качестве разделителя как точку, так и запятую.

@Замабувараев · 16.04.2021, 06:05 **[ТС]**

Отвечу за себя.
Программа должна работать как вы ей указали.
Вы ей указали работать с запятыми.
Вот и всё.

@The trick · 16.04.2021, 08:43

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

The trick, ок. Просто ответь мне однозначно на один вопрос.
Ты пишешь программу, где нужен ввод десятичных чисел для дальнейших математических с ними операций.
Творя программа тоже не умеет обрабатывать десятичную точку, а ждёт исключительно запятую?
Нужен простой ответ:
1. Да, не умеет, нужна только запятая.
2.Нет, умеет, можно вводить в качестве разделителя как точку, так и запятую.

Для интерфейса моя программа будет использовать системный разделитель, тот что установлен в системе по умолчанию (мне даже придумывать ничего не нужно для этого т.к. система по умолчанию принимает этот формат). Тут проблема в том что запятая и точка могут присутствовать одновременно при форматировании числа. И два твоих варианта которые ты предложил - оба неверны.

А тот ГОСТ что ты привел, ну реально смешно же

@Pro_grammer · 16.04.2021, 11:50

Сообщение от The trick

реально смешно же

Реально смешно видеть твои попытки отвергать очевидное.

Сообщение от The trick

Тут проблема в том что запятая и точка могут присутствовать одновременно при форматировании числа.

Для меня это не проблема. Это решается элементарно - выдаются подсказки в поле ввода, как правильно это делать.
На систему полагайся, а сам не плошай, Замабувараев яркий тому пример

Сообщение от Замабувараев

Программа должна работать как вы ей указали.

Нет. Программа работает так, как её написали. И если написана криво, то и работать будет криво.

@The trick · 16.04.2021, 12:12

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

Реально смешно видеть твои попытки отвергать очевидное.

Хм, отвергаешь как раз-таки ты. Написал программу которая вообще никакой разделитель не принимает и еще пишешь что Замабувараев написал кривую программу? Самому не смешно? Вместо того чтобы признать это стал нести бред про разделитель с точкой и сам же скинул ГОСТ где написано что разделитель может быть как и запятой так и точкой. И сейчас пытаешься какие-то свои заблуждения выдать за истину. Не знаю как другим, но мне реально смешно

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

Для меня это не проблема. Это решается элементарно - выдаются подсказки в поле ввода, как правильно это делать.

Ну костылями тебе никто не запрещает пользоваться. Что могу еще сказать?

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

На систему полагайся, а сам не плошай, Замабувараев яркий тому пример

Кто бы говорил. У него в отличии от тебя программа нормально принимает вещественные числа.

@Замабувараев · 16.04.2021, 12:13 **[ТС]**

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

Программа работает так, как её написали.

Всё правильно. Я написал программу так, чтобы она не занималась телепатией, угадыванием, гаданием, а брала ваши настройки, которые вы сами назначили.

@Pro_grammer · 16.04.2021, 12:31

Сообщение от Замабувараев

чтобы она не занималась телепатией, угадыванием, гаданием

Чего там было гадать? Есть на форуме человек, который не понимает что это за число 1.1?
Почему ваша программа не понимает, и считает что это 0? Потому, что вы криво написали конвертирование строки в число.
Ну как ещё это объяснить?

@Замабувараев · 16.04.2021, 13:18 **[ТС]**

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

Почему ваша программа не понимает, и считает что это 0?

Потому что вы прямо указали в настройках не считать это числом.

@Pro_grammer · 16.04.2021, 16:07

Сообщение от Замабувараев

вы прямо указали в настройках не считать это числом

Глупее объяснения я ещё не видел.
Да ладно, забей. Я же не твой заказчик

Все кому надо уже поняли, что на систему полагаться в этом деле не нужно. А вы с The trick можете и дальше верить что

Сообщение от The trick

даже придумывать ничего не нужно для этого т.к. система по умолчанию принимает этот формат

Новые блоги и статьи Все статьи Все блоги /
Программное добавление префикса в нумерацию документов Maks 27.10.2026 Реализация из решения ниже выполнена в самописной конфигурации на БСП (помощь начинающему коллеге). Задача: Программно добавить префикс в нумерацию документов. Решение: В модуле объекта. . .	После закрытия оутлука продолжает висеть процесс в диспетчере задач Maks 27.10.2026 С недавнего времени в продакшене возникла проблема: при закрытии оутлука в диспетчере задач продолжал висеть процесс outlook. exe. Проблема возникла после установки MS Office 2021 LTSC на машинах, под. . .	Baragoz - DPS/HPS бот для WoW 3.3.5a, многоязычный AmbA 26.10.2026 Хотите ещё ботов? У меня есть один! А я пока отдохну от него. https:/ / www. cyberforum. ru/ blog_attachment. php?attachmentid=12062&stc=1&d=1793007952 Инструкция внутри. https:/ / youtu. be/ VpfFZSUDGnQ. . .	Особенности gif сгенерированных в Си russiannick 21.10.2026 Рассмотрим генерацию gif файлов, которые в Си имеют свои особенности. Gif представляет собой графический формат популярный в интернете. Посмотрим на палитру. Gif файл сгенерированный в си отличается. . .
FPS контроллер с анимированными Y-Bot и 3D-звуком miniaudio (Box3D, Recast, BehaviorTree.CPP, ozz-animation, ImGui, OpenGL и SDL3) 8Observer8 18.10.2026 Содержание блога \| English Version Полное мультиплатформенное руководство по стартовому проекту с FPS-контроллером игрока, анимированными роботами Y-Bot с 4-слойным блендингом, 3D-физикой Box3D,. . .	Локальный http сервер Argus19 17.10.2026 Локальный http сервер На работе, на двух локальных компьютерах круглосуточно работают программы опроса приборов с записью в книги Excel,которые раз в сутки записываются на сервер компании. Т. к. . . .	Копировать Windows на новый диск на UEFI damix 17.10.2026 https:/ / uriesk. wordpress. com/ 2016/ 11/ 01/ move-window-10-to-ssd-on-a-uefi-dualboot-system-with-basic-linux-tools/ TL DR Вставляем диск, а старый подключаем через переходник, грузимся с лайва. . .	ИИ не может найти нужный язык в списке Supersumestria 05.10.2026 Я ему даю вот такое изображение и прошу найти и подчеркнуть немецкий язык. Возвращает он вот это: https:/ / i. **********/ vqBWLe2. png Нужную строчку в 3й колонке просто выдумал. . Это. . .

@locm 7229 / 3408 / 347 Регистрация: 28.10.2011 Сообщений: 13,399 Записей в блоге: 7
	15.04.2021, 15:44
	Приложение на 1 КБ меньше чем у вас. Уменьшайте свое! 0

@Pro_grammer 6807 / 2840 / 527 Регистрация: 24.04.2011 Сообщений: 5,308 Записей в блоге: 10
	15.04.2021, 22:33
	The trick, ок. Просто ответь мне однозначно на один вопрос. Ты пишешь программу, где нужен ввод десятичных чисел для дальнейших математических с ними операций. Творя программа тоже не умеет обрабатывать десятичную точку, а ждёт исключительно запятую? Нужен простой ответ: 1. Да, не умеет, нужна только запятая. 2.Нет, умеет, можно вводить в качестве разделителя как точку, так и запятую. 1

@Замабувараев COM‐пропагандист 936 / 785 / 149 Регистрация: 18.12.2014 Сообщений: 2,256 Записей в блоге: 4
	16.04.2021, 06:05 [ТС]
	Отвечу за себя. Программа должна работать как вы ей указали. Вы ей указали работать с запятыми. Вот и всё. 0