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

Delphi для профессионалов

Delphi для профессионалов - Извлечение иконки из EXE/DLL-файла

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 14 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Извлечение иконки из EXE/DLL-файла var MyIcon: TIcon; begin MyIcon = TIcon.Create; try MyIcon.Handle = ExtractIcon(hInstance,PChar( 'MYPROG.EXE) , 0 ); //Здесь можно что-нибудь сдел...

2002-11-06 01:08:25 + Комментировать

Delphi для профессионалов - Изменение системного времени с учетом временой зоны

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Изменение системного времени с учетом временой зоны //* // Функция (раздел Public) SetPCSystemTime изменяет системную дату и время. // Параметр(ы) : tDati - Новая дата и время // Во...

2002-11-05 05:04:03 + Комментировать

Delphi для профессионалов - Декомп. звук. файла формата Wave и получение звук. данных

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Декомпилляция звукового файла формата Wave и получение звуковых данных Интересно, есть ли технология преобразования Wave-формата в обычный набор звуковых данных? К примеру, мне необ...

2002-11-04 02:42:05 + Комментировать

Delphi для профессионалов - Unix-строки (чтение и запись Unix-файлов)

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Unix-строки (чтение и запись Unix-файлов) Данный модуль позволяет читать и записывать файлы формата Unix. unit StreamFile; interface Uses SysUtils; Procedure AssignStreamFile ( var ...

2002-11-01 09:21:38 + Комментировать

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

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Преобразование ASCII в шестнадцатиричное представление Строка представляет собой массив байтов в виде ASCII-символов. Необходимо организовать преобразование типов по аналогии с Delp...

2002-10-31 02:11:12 + Комментировать

Delphi для профессионалов - 64-битное кодирование/декодирование

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям 64-битное кодирование/декодирование Хочу предложить еще одну реализацию алгоритма декодирования base64. Код проверен, работает без глюков. Евгений . Const Base64Table= 'ABCDEFGHIJKL...

2002-10-30 01:27:45 + Комментировать

Delphi для профессионалов - Проверка кредитной карты

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Выберите действие: Послать совет в рассылку Задать вопрос в рассылку Ответить на вопрос в рассылке Заглавие (одной строкой) : Содержание : От кого : Не показывать мой e-mail другим пользователям Проверка кредитной карты unit CreditС; * Модуль Delphi для проверки номера кредитной карты Версия: 1.1 Дата: Декабрь 20, 1996 Данный модуль создан на основе алгоритма ccard автора P...

2002-10-29 03:18:44 + Комментировать

Delphi для профессионалов - Управление битами

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 13 Управление битами * Параметр TheBit считается в пределах 0.31 (32 бита информации) } unit Bitwise; interface function IsBitSet ( const val: longint; const TheBit: byte: boolean; function BitOn ( const val: longint; const TheBit: byte: LongInt; function BitOff ( const val: longint; const TheBit: byte: LongInt; function BitToggle( const val: longint; const TheBit: byte: LongI...

2002-10-28 14:22:15 + Комментировать

Delphi для профессионалов

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 12 Вычисление расстояния между двуми точками, имея широту и долготу Входные данные: StartLat (начальная широта) = Градусы и сотые доли StartLong (начальная долгота) = Градусы и сотые доли EndLat (конечная широта) = Градусы и сотые доли EndLong (конечная долгота) = Градусы и сотые доли Выходные данные: Distance (расстояние) = Расстояние в метрах Bearing (смещение) = Смещение в ...

2002-10-25 17:32:09 + Комментировать

Delphi для профессионалов - Формат WAVE-файла

Информационный Канал Subscribe.Ru eServer.ru : Хостинг без ограничений! Рассылка: Delphi для профессионалов Количество подписчиков: 12 Ф о р м а т WA V E - ф а й л а TWaveHeader = record Marker1 : Array [0.3] of Char; BytesFollowing : LongInt; Marker2 : Array [0.3] of Char; Marker3 : Array [0.3] of Char; Fixed1 : LongInt; FormatTag : Word; Channels : Word; SampleRate : LongInt; BytesPerSecond : LongInt; BytesPerSample : Word; BitsPerSample : Word; Marker4 : Array [0.3] of Char; DataBytes : LongInt; end ; Д...

2002-10-24 23:21:18 + Комментировать