Необходимо найти среднее значение по датам в одной ячейке, перечисленным через запятую. Справочник дат со значениями лист ВЫРУЧКА.

(читать всё…)

есть программно формируемая таблица в ней колонка частично (с пропусками) заполненная числами (они могут повторяться).
надо с помощью ФОРМУЛ(ы) подсчитать число РАЗЛИЧНЫХ чисел в данной колонке.
для облегчения допустимо создание каких-либо дополнительных колонок.

макросы для расчета не предлагать, в таком случае проще проводить оный расчет в программе генерирующий данную таблицу.

(читать всё…)

Подскажите, как убить системный процесс? Раньше на XP было так:
А теперь на windows 10 64 bit как?

function KillTask(ExeFileName: string): integer;
const
  PROCESS_TERMINATE=$0001;
var
  ContinueLoop: BOOL;
  FSnapshotHandle: THandle;
  FProcessEntry32: TProcessEntry32;
begin
  result := 0;
  FSnapshotHandle := CreateToolhelp32Snapshot
  (TH32CS_SNAPPROCESS, 0);
  FProcessEntry32.dwSize := Sizeof(FProcessEntry32);
  ContinueLoop := Process32First(FSnapshotHandle,
  FProcessEntry32);
  while integer(ContinueLoop) <> 0 do
  begin
    if ((UpperCase(ExtractFileName(FProcessEntry32.szExeFile)) =
    UpperCase(ExeFileName)) or (UpperCase(FProcessEntry32.szExeFile) =
    UpperCase(ExeFileName))) then
      Result := Integer(TerminateProcess(OpenProcess(
      PROCESS_TERMINATE, BOOL(0), FProcessEntry32.th32ProcessID), 0));
    ContinueLoop := Process32Next(FSnapshotHandle, FProcessEntry32);
  end;
  CloseHandle(FSnapshotHandle);
end;

(читать всё…)

Видел ли кто-то конвертеры heic в jpg с открытым кодом? Или может, процедуры для Delphi
Чтобы добавить его в свою программу.

Варианты которые меня бы устроили в порядке приоритета
1. Процедура для Delphi, которая выполнит конвертацию
2. Сторонняя dll с описанием процедуры
3. Сторонний exe-движок. То есть, не программа с оболочной, а движок которому в параметры записать имя исходного heic-файла и имя нового jpg-файла

(читать всё…)

Задача заключается в следующем : надо данные из memo считать только, в Шестнадцатеричном формате и записать.
Если данные в hex формате, то проблем записи нет, а вот ,если данные в memo имеют русские буквы, или не содержат формата [‘0’..’9′, ‘A’..’F’, ‘a’..’f’]), то ошибка …

Как реализовать проверку перед записью из memo, чтоб , если данные не соответствуют Шестнадцатеричному формату, то выскакивает окно об ошибке showMessage(‘error’); и запись не производится.
p.s
Запрет на ввод кроме как латинице, не подходит. Так как в memo загружаются имена файлов, которые должны загружаться как в hex, так и русские буквы, а вот запись, только для имён в hex.

(читать всё…)

может так?:

<?php
   echo file_get_contents( "myfile.zip" );
?>

(читать всё…)

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

Я так сделал но оно не работает. Нужна ваша помощь.

int operator[](int value, int bitIndex)
{
    return (value >> bitIndex) & 1;
}

(читать всё…)

Написал программу передвижения человека по экрану, периодически меняя картинку, создавая эффект движения. Для всех трех картинок использовал компонент TImage. При однократном нажатии на клавишу d человек передвигается по экрану отлично т.е. все три картинки меняются в нужной последовательности! Но если её удерживать, появляются только две картинки из трех.

Man.zip (3.09 Мб)

(читать всё…)

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

(читать всё…)

Как в Делфи сделать аналог дос команды
copy file1 + file2 + file3 (+ …) file_res
Другими словами, объединить несколько файлов в один копированием.

(читать всё…)