Общие вопросы и приёмы эффективного программирования на 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

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

Новые блоги и статьи Все статьи Все блоги /
Нейросеть на алгоритме "эстафета хвоста" как перспектива. Hrethgir 06.05.2026 На десерт, когда запущу сервер. Статья тут https:/ / habr. com/ ru/ articles/ 1030914/ . Автор я сам, нейросеть только помогает в вопросах которые мне не известны - не знаю людей которые знали-бы. . .	Асинхронный приём данных из COM-порта Argus19 01.05.2026 Асинхронный приём данных из COM-порта Купил на aliexpress термопринтер QR701. Он оказался странным. Поключил к Arduino Nano. Был очень удивлён. Наотрез отказывается печатать русские буквы. Чтобы. . .	попытка написать игровой сервер на C++ pyirrlicht 29.04.2026 попытка написать игровой сервер на плюсах с открытым бесконечным миром. возможно получится прикрутить интерпретатор питон для кастомизации игровой логики. что есть на текущий момент:. . .	Контроль уникальности выбранного документа-основания при изменении реквизита Maks 28.04.2026 Алгоритм из решения ниже разработан на примере нетипового документа "ЗаявкаНаРемонтСпецтехники", разработанного в КА2. Задача: уведомлять пользователя, если указанная заявка (документ-основание). . .
Благородство как наказание Maks 24.04.2026 У хорошего человека отношения с женщинами всегда складываются трудно. А я человек хороший. Заявляю без тени смущения, потому что гордиться тут нечем. От хорошего человека ждут соответствующего. . .	Валидация и контроль данных табличной части документа перед записью Maks 22.04.2026 Алгоритм из решения ниже реализован на примере нетипового документа, разработанного в КА2. Задача: контроль и валидация данных табличной части документа перед записью с учетом регламента компании. . .	Отчёт о затраченных материалах за определенный период с макетом печатной формы Maks 21.04.2026 Отчёт из решения ниже размещён в конфигурации КА2. Задача: разработка отчёта по затраченным материалам за определённый период, с возможностью вывода печатной формы отчёта с шапкой и подвалом. В. . .	Отчёт о спецтехнике находящейся в ремонте Maks 20.04.2026 Отчёт из решения ниже размещен в конфигурации КА2. Задача: отобразить спецтехнику, которая на данный момент находится в ремонте. Есть нетиповой документ "Заявка на ремонт спецтехники" который. . .

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

@Pro_grammer 6807 / 2839 / 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