Отправляет email-рассылки с помощью сервиса Sendsay

Рассылка сайта Delphi coding

  Все выпуски  

Рассылка сайта Delphi coding Delphi coding


Информационный Канал Subscribe.Ru

Рассылка сайта Delphi Coding

Выпуск от 24 Ноября 2005 года. Noil.pri.ee

Приглашаються авторы статей для сотрудничества с сайтом. Подробности о том как добавить свою статью на сервер читайте здесь

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

Желаем Вам приятного чтения.


Архивы статей по различным тематикам Delphi

Коллекции статей

Коллекция статей № 1Скачать (Статей: 20)
Коллекция статей № 2Скачать (Статей: 20)
Коллекция статей № 3Скачать (Статей: 20)
Коллекция статей № 4Скачать (Статей: 20)

Последнии файлы

AOSDK v.0.8 в категории Звук

AOSDK v.0.8 это «базовые классы» основанные на библиотеке Bass.dll (Включена в архив). Предоставляет широки возможности для создание аудио-плеера.

Особенности:


  • Поддержка форматов плайлистов Pls и M3u,
  • 10 различных эквалайзеров
  • Быстрое декодирование аудио-потока
  • mp1/mp2/mp3/ogg/wav потоки
  • mod/s3m/it/umx/mo3/xm/mtm модули
  • Редактор тегов ID3 1.1
  • Поддержка Интернет потоков


Полная функциональность.
Исходный код.


Поддерживаемые версии: D2 D3 D4 D5 D6

Автор: Porzillosoft Inc

Подробнее... Скачать


ACM в категории Звук

Вы можете использовать эти компоненты для компрессии/декомпрессии аудио данных в реальном времени с использованием аудио-кодеков установленных в Windows.

Полная функциональность.
Исходный код.
Пример приложения.


Поддерживаемые версии: D4

Автор: Milos Sula

Подробнее... Скачать


AnipuskXP в категории Система

Анимация кнопки "Пуск". Рисует на этой замечательной кнопке фон и отскакивающий от стенок шарик. Занимательная вещица :)

Автор: WondeRu
сайт автора: http://www.wonderu.com

Подробнее... Скачать


Разработка баз данных в категории Электронные книги

Разработка приложений баз данных является одной из наиболее востребованных возможностей среды программирования Delphi. Эта среда программирования предоставляет разработчику поистине великолепный набор простых в использовании инструментов, позволяющих быстро разрабатывать сложные проекты. В этой книге подробно рассматриваются все наиболее распространенные серверы баз данных и приводятся примеры взаимодействия с каждым из них. Также уделено внимание вопросам проектирования эффективных баз данных, что позволит читателю, не обладающему необходимым опытом, незамедлительно приступить к работе. Книга в первую очередь ориентирована на начинающих программистов, работающих с Delphi, и на тех, кто хочет углубить свои знания в сфере разработки баз данных.

Автор: Сорокин А.В.
Формат: .djvu

Подробнее... Скачать


CardTable v.1.86 в категории Создание игр

CardTable это свободно распространяемый Delphi компонент, который облегчает создание карточных игр. Поддерживает плавное перемещение и опцию drag and drop. Также вы можете использовать несколько наборов карт.

Полная функциональность.
Исходный код.


Поддерживаемые версии: D5 D6 D7

Автор: David Mayne

Подробнее... Скачать


Библия для программиста в среде Dtlphi (Библия Delphi) в категории Электронные книги

Эта книга посвящена популярному в нашей стране и перспективному во всём мире языку программирования Delphi. Она направлена на всех программистов,
от начинающего, до профессионала. В любом случае, я советую всем прочитать её полностью. Как показывает практика, большинство людей научились программированию по книгам, но ни одна из книг, которые я видел, не объясняет принципиальных основ работы Windows и компьютера в целом. Без понимания этих вещей не возможно написать эффективный код.

Автор: Hprrific aka Фленов Михаил
Формат: .doc>

Подробнее... Скачать


Windows Messages and GlobalAtom demo в категории Система

Этот пример показывает как одно приложение (AP_1) может запустить другое (AP_2) и послать ему некоторые параметры. Также Вы не сможете запустить приложение AP_2 без AP_1, и если AP_2 уже выполняется, и Вы попробуете запустить AP_2 ещё раз, то окно AP_2 станет активным, но запуска второй копии приложения не произойдёт.

Полная функциональность.
Исходный код.


Поддерживаемые версии: В2 D3 D4

Автор: Alexey Novosselov

Подробнее... Скачать


System Investigation 2 v.2.3.1 в категории Система

Получает достаточно много информации об окружении Windows.

Полная функциональность.
Исходный код.


Поддерживаемые версии: D3 D4 D5

Автор: Riccardo Pareschi

Подробнее... Скачать


Registry Date/Time Demo v.1.0 в категории Система

Вы знаете, что при каждом создании или модификации каждого ключа в Реестре сохраняется дата и время этих изменений? Программа Registry Date/Time Demo была написана для того, что показать эту возможность, а также продемонстрировать, как одна программа может управлять другой посредством сообщений Windows.

Полная функциональность.
Исходный код.


Поддерживаемые версии: D5 D6

Автор: Object Vision Associates, Inc

Подробнее... Скачать


FreeDB reader v.1.1 в категории Pабота с Internet

Этот компонент позволит твоему приложению получить информацию о audioCD диске с бесплатных баз данных (таких как freedb.freedb.org). Пример приложения включён. Для того чтобы использовать у Вас должны быть установлены компоненты Indy.

В версии 1.1

  • Исправлены баги
  • Добавлена возможность получения года и стиля произведения.
Полная функциональность.
Исходный код.


Поддерживаемые версии: D5 D7 D2005

Автор: Benedikt Maettig

Подробнее... Скачать


Статья

Распознавание кодировки

Алгоритм распознования кодировки нужен для автоматического декодирования текста. Этот алгоритм основан на том, что некоторые буквы русского алфавита встречается очень часто, а некоторые редко. Поскольку этот способ статистический, то лучше всего он работает с большими текстами.

Листинг 1. Распознавание кодировки
type
TCode = (win, koi, iso, dos);

const
CodeStrings: array [TCode] of String = ('‌win'‌,'‌koi'‌,'‌iso'‌,'‌dos'‌);

procedure TForm1.Button1Click(Sender: TObject);
var
str: array [TCode] of string;
norm: array ['‌А'‌..'‌я'‌] of single;
code1, code2: TCode;
min1, min2: TCode;
count: array [char] of integer;
d, min: single;
s, so: string;
chars: array [char] of char;
c: char;
i: integer;
begin
so := Memo1.Text;

norm['‌А'‌] := 0.001;
norm['‌Б'‌] := 0;
norm['‌В'‌] := 0.002;
norm['‌Г'‌] := 0;
norm['‌Д'‌] := 0.001;
norm['‌Е'‌] := 0.001;
norm['‌Ж'‌] := 0;
norm['‌З'‌] := 0;
norm['‌И'‌] := 0.001;
norm['‌Й'‌] := 0;
norm['‌К'‌] := 0.001;
norm['‌Л'‌] := 0;
norm['‌М'‌] := 0.001;
norm['‌Н'‌] := 0.001;
norm['‌О'‌] := 0.001;
norm['‌П'‌] := 0.002;
norm['‌Р'‌] := 0.002;
norm['‌С'‌] := 0.001;
norm['‌Т'‌] := 0.001;
norm['‌У'‌] := 0;
norm['‌Ф'‌] := 0;
norm['‌Х'‌] := 0;
norm['‌Ц'‌] := 0;
norm['‌Ч'‌] := 0.001;
norm['‌Ш'‌] := 0.001;
norm['‌Щ'‌] := 0;
norm['‌Ъ'‌] := 0;
norm['‌Ы'‌] := 0;
norm['‌Ь'‌] := 0;
norm['‌Э'‌] := 0.001;
norm['‌Ю'‌] := 0;
norm['‌Я'‌] := 0;
norm['‌а'‌] := 0.057;
norm['‌б'‌] := 0.01;
norm['‌в'‌] := 0.031;
norm['‌г'‌] := 0.011;
norm['‌д'‌] := 0.021;
norm['‌е'‌] := 0.067;
norm['‌ж'‌] := 0.007;
norm['‌з'‌] := 0.013;
norm['‌и'‌] := 0.052;
norm['‌й'‌] := 0.011;
norm['‌к'‌] := 0.023;
norm['‌л'‌] := 0.03;
norm['‌м'‌] := 0.024;
norm['‌н'‌] := 0.043;
norm['‌о'‌] := 0.075;
norm['‌п'‌] := 0.026;
norm['‌р'‌] := 0.038;
norm['‌с'‌] := 0.034;
norm['‌т'‌] := 0.046;
norm['‌у'‌] := 0.016;
norm['‌ф'‌] := 0.001;
norm['‌х'‌] := 0.006;
norm['‌ц'‌] := 0.002;
norm['‌ч'‌] := 0.011;
norm['‌ш'‌] := 0.004;
norm['‌щ'‌] := 0.004;
norm['‌ъ'‌] := 0;
norm['‌ы'‌] := 0.012;
norm['‌ь'‌] := 0.012;
norm['‌э'‌] := 0.003;
norm['‌ю'‌] := 0.005;
norm['‌я'‌] := 0.015;

Str[win] := '‌АаБбВвГгДдЕеЖжЗзИиЙйКкЛлМмНнОоПпРрСсТтУуФфХхЦцЧчШшЩщЪъЫыЬьЭэЮюЯя'‌;
Str[koi] := '‌юЮаАбБцЦдДеЕфФгГхХиИйЙкКлЛмМнНоОпПяЯрРсСтТуУжЖвВьЬыЫзЗшШэЭщЩчЧъЪ'‌;
Str[iso] := '‌РрСсТтУуФфХхЦцЧчШшЩщЪъЫыЬьЭэЮюЯяа№бёв?гѓдєеѕжізїијйљкњлћм?н§оўпџ'‌;
Str[dos] := ´‌Ђ ?Ў‚ўѓЈ„¤…Ґ†¦‡§€Ё‰ЉЄ‹"Њ¬?Ћ®?Ї?а'‌б'‌в“г”д∙е–ж—з�и™йљк›лњм?нћоџп´‌;
for c := #0 to #255 do
Chars[c] := c;

min1 := win;
min2 := win;
min := 0;
s := so;
fillchar(count, sizeof(count), 0);
for i := 1 to Length(s) do
inc(count[s[i]]);
for c := '‌А'to '‌я' do
min := min + sqr(count[c] / Length(s) - norm[c]);
for code1 := low(TCode) to high(TCode) do begin
for code2 := low(TCode) to high(TCode) do begin
if code1 = code2 then continue;

s := so;
for i := 1 to Length(Str[win]) do
Chars[Str[code2][i]] := Str[code1][i];
for i := 1 to Length(s) do
s[i] := Chars[s[i]];
fillchar(count, sizeof(count), 0);
for i := 1 to Length(s) do
inc(count[s[i]]);
d := 0;
for c := '‌А'to '‌я' do
d := d + sqr(count[c] / Length(s) - norm[c]);
if d < min then begin
min1 := code1;
min2 := code2;
min := d;
end;
end;
end;

s := Memo1.Text;
if min1 <> min2 then begin
for c := #0 to #255 do
Chars[c] := c;
for i := 1 to Length(Str[win]) do
Chars[Str[min2][i]] := Str[min1][i];
for i := 1 to Length(s) do
s[i] := Chars[s[i]];
end;
Form1.Caption := CodeStrings[min2] + '‌ '‌ + CodeStrings[min1];

Memo2.Text := s;
end;

Посетите наши форумы:

Delphi, Kylix, Pascal
Delphi - общие вопросы | WinAPI | Работа с сетью | Delphi и Multimedia | Базы данных | Работа с oc Windows | Курилка | Паскаль | Delphi.Net | Kylix

Языки программирования
C++ | Java | .NET | Ассемблер

Web Технологии
Php | Perl | Asp | Html

Програмное обеспечение
Софт для Windows | Oc Windows | Linux | BSD

Разное
Железо | Взлом и защита | Периферия | Внекомпьютерная жизнь | Объявления

Дружественные рассылки

Рассылки Subscribe.Ru
Интернет для Delphi-программиста

На этом позвольте проститься с Вами и пожелать удачи. Свои замечания и предложения отправляйте на е-майл, указанный ниже. С уважением, Виталий (NoilTeam@gmail.com)

Subscribe.Ru
Поддержка подписчиков
Другие рассылки этой тематики
Другие рассылки этого автора
Подписан адрес:
Код этой рассылки: comp.soft.prog.delphicoding
Архив рассылки
Отписаться
Вспомнить пароль

В избранное