Советы по Delphi. Версия 1.0.6 - страница 2

стр.

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

Распространение

Вы свободны в распространении Советов по Delphi на любом общественном (открытом) Web/FTP/Gopher сервере без обязательного получения разрешения автора, пока это распространение проводится АБСОЛЮТНО БЕСПЛАТНО. Если Вы хотите издать данный продукт на или совместно с любым носителем (например, на компакт диске с журналом или книгой, на любой коллекции программного обеспечения, совместно с другим программным обеспечением или любым другим дистрибутивным пакетом), требуется разрешение автора. Обычно разрешение может быть получено без проблем – свободно, за исключением некоторых особых случаев.

Помните

Валентин Озеров – единственый человек, который может дать разрешение на коммерческое использование и распространение справочной системы Советы по Delphi.

ЕСЛИ ВЫ НЕ ПОНИМАЕТЕ КАКОЙ-ЛИБО ЧАСТИ ДАННОГО ЛИЦЕНЗИОННОГО СОГЛАШЕНИЯ ИЛИ ВСЕГО СОГЛАШЕНИЯ В ЦЕЛОМ, СВЯЖИТЕСЬ СО МНОЙ ПО ЭЛЕКТРОННОЙ ПОЧТЕ ИЛИ ЛЮБЫМ ДРУГИМ СПОСОБОМ, ЧТОБЫ Я МОГ ОБЪЯСНИТЬ ИХ ВАМ.

Рассылка 

Bероятно вы хотели бы иметь у себя самую последнюю версия "Советов по Delphi"? Нет ничего проще. Выберите подходящий способ, отправьте мне письмо и не забудьте указать Ваш email, ФИО и город проживания (исключительно для статистики). Вам будет посылаться раз в месяц небольшой файл (около 150Кб), который позволит установить справочную систему через Интернет.

Вам необходимо:

Подписаться на ежемесячную рассылку? (посылается небольшой файл setup.exe, производящий инсталляцию с сервера).

Прекратить подписку?

Oпределитесь и нажмите на соответствующую ссылку.

Цены

Услуга Стоимость
Справочная система "Советы по Delphi" Бесплатно
Размещение монопольного банера на титульной странице в течение месяца На правах обмена
Прием советов Бесплатно

Ссылки

Разработчик Delphi

Русскоязычные

N Сервер Описание
1 http://www.inprise.ru Российское представительство Inprise Фирма – разработчик Delphi

Англоязычные

N Сервер Описание
1 http://www.inprise.com Inprise Фирма – разработчик Delphi

Сайты, посвященные Delphi

Англоязычные


N Сервер Описание
1 http://sunsite.icm.edu.pl/delphi Delphi Super Page Самая большая в мире коллекция компонентов для всех продуктов фирмы Borland.

Пиратские сайты

Русскоязычные

N Сервер Описание
1 http://delphi4.da.ru KiraSoft Warez Page Delphi distr, DB Aware, Communication, General, Reports, Experts, Misc, Tools, Links
2 www.audit.kharkov.com/barry/Delphi Barry's Delphi Page VCL's, VCL packs, Help Design, FAQ's, IB DataBase, Utilities, Forum

Другие

N Сервер Описание
1 http://www.netease.com/~dce Delphi Components Crack (with Dr.Dai) Как там написано, "Following components ONLY for Delphi 3.0", остальное понять трудно, как и идентифицировать родной язык автора сайта, хотя по скриншотам разобраться что и где лежит вполне можно

Домашние страницы

Русскоязычные

N Сервер Описание
1 http://www.ph.usmga.ru/lexa Delphi Russian Suite Сайт, посвященный программированию на Дельфи. Автор страницы Алексей Спицын. Можно скачать документацию по Дельфи (в том числе и на русском языке). Есть список ссылок на страницы в интернете, посвященные Дельфи, а также на адреса электронных версий компьютерных журналов.

Алгоритмы

Преобразования

HEX→Integer

Решение 1

>var

> i: integer;

> s: string;

>begin

> s:= '$' + ThatHexString;

> i:= StrToInt(a);

>end;

Решение 2

>CONST HEX: ARRAY['A'..'F'] OF INTEGER = (10,11,12,13,14,15);

>VAR str : String;

> Int, i: integer;

>BEGIN

> READLN(str);

> Int:= 0;

> FOR i:= 1 TO length(str) DO

>  IF str[i] < 'a' THEN Int:= Int * 16 + ord(str[i]) – 48

>  ELSE Int:= Int * 16 + hex[str[i]];

> WRITELN(Int);

> READLN;

>END.

Преобразование десятичного числа в шестнадцатиричное

Самое простое преобразование – через строку.

>HexString:= Format('%0x', DecValue);

Преобразование ASCII в шестнадцатиричное представление

Строка представляет собой массив байтов в виде ASCII-символов. Необходимо организовать преобразование типов по аналогии с Delphi-функциями Ord и Chr.