
Последние записи
- PostgreSQL — чтение файла
- Обязательное прикрепление изображений
- Игра «Крестики-Нолики» на чистом HTML (без скриптов)
- Динамическое создание массива TScrollBar
- Как разместить форму в панель задач?
- CMD скрипт, запустить из memo
- Как проверить работу сессий на PHP
- Как узнать дату окончания сертификата
- Как передать значение во внешний JS-скрипт?
- Определить количество знаков после запятой

Интенсив по Python: Работа с API и фреймворками 24-26 ИЮНЯ 2022. Знаете Python, но хотите расширить свои навыки?
Slurm подготовили для вас особенный продукт! Оставить заявку по ссылке - https://slurm.club/3MeqNEk

Online-курс Java с оплатой после трудоустройства. Каждый выпускник получает предложение о работе
И зарплату на 30% выше ожидаемой, подробнее на сайте академии, ссылка - ttps://clck.ru/fCrQw
21st
Ноя
Datetostr в Windows 10 выводит день недели
Есть программа и пользователи Windows 10 (не все, зависимости пока не нашел) сталкиваются с множественными ошибками в работе этой программы. Опытным путем выяснилось, что при инструкции записи в базу данных и даже просто отображения текущий даты с помощью «DateToStr(now)» результат получается не совсем ожидаемым. А именно, к примеру: «Пт 12.01.00». Соответственно, при попытке обратного преобразования «StrToDate» возникает ошибка: «Пт 12.01.00 is not a valid date».
Может, кто сталкивался с подобным и знает как можно с этим бороться? Не хотелось бы пилить костыль преобразования строки в нужную дату путем удаления лишних «Пт «, «Чт » и так далее.
20th
Ноя
Использование OpenCL в Delphi-коде под Win64
Для ускорения расчётов в программе, написанной на Delphi XE2 (…XE6), ранее использовались потоки (объект TThread) на CPU. Сейчас возникла идея использовать возможности GPU. Простой, как казалось, путь — подключить модули (заголовочные файлы к OpenCL.dll по сути) — и использовать возможности OpenCL от Khronos Groupe.
Работает всё это, но…только при компиляции дельфового проекта под Win32. А мне нужны большие массивы, динамические: компиляция всей научной программы под Win64 просто необходима (используем иногда до 12 Гбайт оперативки CPU).
При компиляции под Win32 работает, а под Win64 — нет!!
16th
Ноя
Нарисовать синусоиду или огибающую на PaintBbox с использованием BASS.DLL
мне нужно нарисовать синусоиду или огибающую на paintbox , не могу найти ,как сделать это на bass.dll , есть примеры с WAV форматом , через звуковую карту непосредственно , а мне так не надо.Типа этого.Спасибо.
15th
Ноя
Сделать неактивными часть элементов в RadioGroup
Хотелка: после считывания базы данных те месяцы, которых еще нет в базе, в subj сделать невозможно-выбранными или вообще невидимыми.
RadioGroup1.Buttons[0].Enabled:= false;
RadioGroup1.Buttons[6].Enabled:= false;
RadioGroup1.Buttons[7].Enabled:= false;
RadioGroup1.Buttons[5].Enabled:= false;
RadioGroup1.Buttons[11].Enabled:= false;
14th
Ноя
Установить RadioButton в соответствии со значением в таблице базы данных
На форме 2 RadioButton. при вызове этой формы должно быть условие: если в БД в определенном поле значение 0, то активен RadioButton1, если в БД в этом поле 1, то активен RadioButton2.
28th
Окт
Нужно ли чистить память локальных переменных, используемых в функциях?
Нужно ли чистить память локальных переменных, используемых в функциях?
Особенно интересует нужно ли освобождать объекты, типа TStringList.
Нужно. Исключение строки и динамическские массивы.
26th
Окт
Узнать имя компонента зная его координаты на форме
Как узнать имя компонента зная его координаты на форме? (читать всё…)
23rd
Окт
Команды Cmd в консоли Delphi
Насчёт запуска какого нить файла понятно:
ShellExecute или WinExec
А как выполнять другие команды cmd с параметрами?
Например:
del /S/F/Q %USERPROFILE%\AppData\Local\Temp\*.*
Или
copy /y file1.txt file2.txt
или
MKDIR Newfolder
или
XCOPY /E/G/H/Y 'D:\myfiles\*.*' 'j:\backup\myfiles\*.*'
или
ATTRIB -R-A-S-H C:\folder /D
Ну и т.д.
Если можно конкретные примеры.
20th
Окт
Выбор случайных вопросов без повторений
К примеру есть 57 вопросов из которых должны отобразится всего 15 у пользователя на экране.
Каждый следующий вопрос должен появляться при нажатии кнопки.
Но как показала практика из за генерации случайных чисел вопросы могут выпадать по два раза подряд одни и те же. Или за все время прохождения теста.
Вопрос, как сделать проверку чисел чтобы не выводить значения которые уже были?
7th
Окт
Распаковка определённых файлов/папок из 7zip (sevenzip.pas)
Использую код:
Код:
uses
...sevenzip, ...
function ProgressCallback(sender: Pointer; total: boolean; value: int64): HRESULT; stdcall;
begin
if total then
Form1.sprgrsbr1.Max:= value
else
Form1.sprgrsbr1.Position:= value;
Result:= S_OK;
end;
function Decompress(FileName, DestDir, ArcFname: String; ArcDir: Boolean ): Boolean;
var
i: Integer;
ItP: string;
items: array[1..11] of Cardinal;
sprgrsbr1: TsProgressBar;
begin
Result:= False;
Application.ProcessMessages;
try
with CreateInArchive(CLSID_CFormat7z) do
begin
OpenFile(FileName);
SetProgressCallback(sprgrsbr1, ProgressCallback);
for i:= 1 to NumberOfItems - 1 do
if not ItemIsFolder then
//ExtractItem(items, Steam, False); - как ей пользоваться в душе не понимаю...
ExtractTo(DestDir);
end;
finally
Result:= True;
end;
end;
Как распаковать только нужные, кто знает подскажите..?
Вот файлы 7zip
Облако меток
реестр css timer ассемблер SaveToFile ShellExecute массив советы word программы random pos SQL MySQL ListView дата компоненты form LoadFromFile база данных сеть RichEdit html php indy строки Win Api tstringlist Image мысли макросы Edit ListBox office C/C++ memo графика StringGrid canvas поиск файл Pascal форма Файлы интернет excel Microsoft Office Excel winapi журнал ПРОграммист DelphiКупить рекламу на сайте за 1000 руб
пишите сюда - alarforum@yandex.ru
Да и по любым другим вопросам пишите на почту

пеллетные котлы

Пеллетный котел Emtas

Наши форумы по программированию:
- Форум Web программирование (веб)
- Delphi форумы
- Форумы C (Си)
- Форум .NET Frameworks (точка нет фреймворки)
- Форум Java (джава)
- Форум низкоуровневое программирование
- Форум VBA (вба)
- Форум OpenGL
- Форум DirectX
- Форум CAD проектирование
- Форум по операционным системам
- Форум Software (Софт)
- Форум Hardware (Компьютерное железо)