Русификатор на Delphi

скачать

any:  Выкладываю полезные книги и свои наработки за два дня (на FASM). Можете использовать мой код (там совсем не много, но может оказаться полезным, там почти доделанный первый загрузчик).
Ещё выкладываю исходники пары малёньких ОСей.
Тестить лучше на виртуальной машине.

Скачать 1 файл

Скачать 2 файл

Скачать 3 файл

Скачать 4 файл

Скачать 5 файл

Ссылка на форум

FastReports 4

Скачать

ссылка на форум

ссылка на форум

vampik: Вот я нарисовал доску, загрузил изображения.
Помогите расставить их на доску ,я вообще без понятия, единственное, что мне приходит в голову это рисовать по отдельности квадратики то есть 64 штуки без цикла и на них по отдельности налаживать текстуры. Покажите как это можно сделать по легче ,если можно кодом.

Скачать

Сапёр на Delphi 2010

Скачать

Компоненты и очень много различных примеров их использования.

скачать

ссылка на форум

Максимально возможный размер файла XLSX,

некоторые из ограничений указаны в этой книге:

Скачать книгу — Excel 2007

ссылка на форум

Саундтрек из игры Шерлок Холмс «Загадка серебряной сережки»

скачать

ссылка на форум

Есть массив данных, который считывается из бинарного файла с помощью TBinaryReader.

Вот полный код

скачать

ради примера выкладываю 2 файла типовых данных (структура с отметками времени и без цвета). Файл With_thinpoints — содержит сдвоенные данные (кусок), файл Without_thinpoints — каждая точка уникальная.

Скачать 1 файл

Скачать 2 файл

ссылка на форум

Проблема решена следующим образом:

procedure TFormMain.StartWME;
var
h, h2: HWND;
begin
  h:=findwindow(nil, 'Кодировщик Windows Media');
  SendMessage(h, WM_SYSCOMMAND, SC_HOTKEY, h);
  SendMessage(h, WM_SYSCOMMAND, SC_RESTORE, h);
  h2:=findwindowex(h, 0, 'TEdit' ,nil);
  caption:=format('%d - %d', [h,h2]);
  SetForegroundWindow(h);
  Windows.SetFocus(h2);
  keybd_event(VK_CONTROL, 0, 0, 0);
  keybd_event(VK_SHIFT, 0, 0, 0);
  keybd_event(ord('E'), 0, 0, 0);
  keybd_event(VK_CONTROL, 0, KEYEVENTF_KEYUP, 0);
  keybd_event(VK_SHIFT, 0, KEYEVENTF_KEYUP, 0);
  keybd_event(ord('E'), 0, KEYEVENTF_KEYUP, 0);
sleep(250);
if (IsWindowVisible(h) and (GetWindow (h, GW_OWNER) = 0) and (GetParent(h) = 0))
then PostMessage(h, WM_SYSCOMMAND, SC_MINIMIZE, 0);
end;

ссылка на форум

Скачать