Форум программистов, компьютерный форум, киберфорум
Delphi для начинающих
Войти
Регистрация
Восстановить пароль
Блоги Сообщество Поиск  
 
 
Рейтинг 4.57/7: Рейтинг темы: голосов - 7, средняя оценка - 4.57
0 / 0 / 0
Регистрация: 13.03.2020
Сообщений: 10

Выполнение сверх быстрых запросов

13.03.2020, 14:18. Показов 1924. Ответов 23
Метки нет (Все метки)

Студворк — интернет-сервис помощи студентам
Задача:
Сделать 4 действия в 1 миллисекунду.
Как пытался Я:
1)Получаем тестовую чистоту процессора
2)Делим ее на коэффициент
Получаем через сколько тактов нужно делать запрос
Кнопка
3)Получаем счетчик циклов процессора
4)К 3) добавляем 2)
7)Делаем перемену +1 счетчик
Открываем цикл For
3)Получаем счетчик циклов
if сравниваем 3) и 4)
делаем нужный запрос
8)Делаем перемену +1 счетчик
Повторяем пункт 4)
else
_______________________________
Делаю алгоритм как выше счетчик 7) считает количество циклов нормально
Счетчик 8) по нолям
Что тут я не правильно сделал?
Листинг программы выложу вечером как буду дома
0
Лучшие ответы (1)
IT_Exp
Эксперт
34794 / 4073 / 2104
Регистрация: 17.06.2006
Сообщений: 32,602
Блог
13.03.2020, 14:18
Ответы с готовыми решениями:

Пакетное выполнение запросов (не база данных)
Доброго времени суток! Возник такой вопрос, почитав пару дней необъятный, столкнулся с такой проблемой. Все опять же уперлось в тоже...

Хранение текста запросов в таблице. Как реализовать выполнение запросов с параметрами и Select?
День добрый! По тексту кода часто встречаются одни и те же фиксированные запросы, бывает длинные. Организовал их хранение в таблице, и по...

Выполнение запросов
Добрый Всем день. В кнопке есть шесть запросов-два на печать и 4 на добавление.Если уменьшить кол-во запросов все работает,а так...

23
0 / 0 / 0
Регистрация: 13.03.2020
Сообщений: 10
14.03.2020, 21:40  [ТС]
Студворк — интернет-сервис помощи студентам
Dedugan, вот как-то так сделал, интервал 1 мс:
Что то не могу скомпелировать ругается на все что только можно
0
пофигист широкого профиля
4770 / 3207 / 862
Регистрация: 15.07.2013
Сообщений: 18,616
15.03.2020, 01:42
Цитата Сообщение от Dedugan Посмотреть сообщение
Что то не могу скомпелировать ругается на все что только можно
Тогда лучше найти себе другую работу.
0
Модератор
4156 / 2365 / 814
Регистрация: 15.11.2015
Сообщений: 9,503
15.03.2020, 05:27
Цитата Сообщение от Dedugan Посмотреть сообщение
Что то не могу скомпелировать ругается на все что только можно
Это ответ на моё сообщение?
Конкретно на что ругается?

////
PS. Как правильно вставить цитату.
Выделить нужный фрагмент текста в сообщении. При отпускании мышки появится надпись "Цитировать", щёлкнуть по ней мышкой и выделенный текст вставится в окно сообщений с тэгом цитирования и со ссылкой на автора сообщения.
0
882 / 404 / 173
Регистрация: 20.10.2016
Сообщений: 1,828
16.03.2020, 04:15
Цитата Сообщение от Dedugan Посмотреть сообщение
А если назначить нашей программе высший приоритет??
Тут я вижу два варианта:
1) У вас все зависнет, потому что программы с более низким приоритетом (включая системные) перестанут получать процессорное время.
2) Если работают другие программы с таким же приоритетом, то см. мой предыдущий пост, так как сделать гарантированно работающую программу с неким переменным количеством сервисов/программ, которые являются конкурентами на процессорное время, не получится.
3) Если сделать sleep внутри программы, то см. п.2, так как сделать этот sleep с предсказуемым интервалом - это весьма сложная штука. Для эксперимента код:

Delphi
1
2
3
4
5
6
var i:int64;
begin
i := GetCurrentTime;
sleep(1);
ShowMessage(inttostr(GetCurrentTime - i));
end;
По теории адептов идеальной точности таймеров должны получить 1. По факту получим 4-7. Единицу можно получить, но при очень специфичных условиях.


Ну и для общего развития предлагаю написать программу с простым

Delphi
1
2
3
4
5
6
var i:int64;
begin
i := 0;
while (true) do
 i := i + 1
end;
и поставить ей приоритет TimeCritical. А потом поделиться с обществом результатами, чтобы мне было куда направлять людей, которые химичат с приоритетами.
0
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
BasicMan
Эксперт
29316 / 5623 / 2384
Регистрация: 17.02.2009
Сообщений: 30,364
Блог
16.03.2020, 04:15

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

Медленное выполнение запросов
Имеется следующая ситуация: VB-приложение обращается через DAO к БД Access на сетевом диске. Проблема: в новелловской сети с новелловскими...

Выполнение параметрических запросов
доброго времени суток всем)) вот столкнулся с непонятной проблемой при выполнении параметрического запроса ADOQuery: имеются 2...

Выполнение запросов в MySQL
static MySqlCommand ConnectToMySQL(string MySQL_host, string MySQL_uid, string MySQL_pw) { MySqlConnection...

параллельное выполнение запросов
Доброе время суток. Подскажите пожалуйста. Делаю выполнение внешней программы через shell_exec с последующим выводом в браузер. Тоесть PHP...


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

Или воспользуйтесь поиском по форуму:
24
Ответ Создать тему
Новые блоги и статьи
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й колонке просто выдумал. . Это. . .
Новая последняя моя музыка в SUNO
zorxor 05.10.2026
Здравствуйте, дорогие мои друзья! С большой радостью я хотел бы представить вам свою новую последнею музыку, которую сгенерировала мне по моей просьбе нейросеть SUNO. С уважением, zorxor. Это. . .
Программный домашний кинотеатр
russiannick 27.09.2026
Сподобился на программный домашний кинотеатр. В качестве ЯВУ по традиции выбрал js. В помощники взял Яндекс-Алису. Было создано три зала на разные интересы. исторические и ретро сериал Хичкок. . .
Беседа с ИИ о программистах, недопускающих к созданию и правке кода генеративные ИИ и причины этого
zorxor 21.09.2026
Раньше я радовался или получал некоторые эмоции, пусть небольшие, но всё же, от самого процесса написания кода, рекомпиляции и запуска, видя постепенное развитие программы и прочее. А теперь лень. . .
Мобильное приложение ColorStep
pavlinmavlin 17.09.2026
Реализовал приложение Красный, Зеленый, Синий в Unity3d + c#. Название изменил на ColorStep. Приложение прошло модерацию и теперь доступно для скачивания. Делал его сам, шаг за шагом — и вот,. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2026, CyberForum.ru