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

Мастера DELPHI. Новости мира компонент, FAQ, статьи...


Служба Рассылок Subscribe.Ru
Ежедневная рассылка сайта Мастера DELPHI

DELPHI.mastak.ru

Выпуск от 11.12.01 09:04

Новые компоненты   |x|
  • KeyLed v.1.0 (4kb) (10.12.01 14:39)
    Delphi-компонент для получения и установки состояния клавиатурных индикаторов CapsLock, NumLock и ScrollLock.

    С исходными текстами
    Компонента из раздела: System: Keys and Keyboard
    Источник: www.torry.net   Автор: Winsoft Ltd http://www.cybermagic.co.nz/winsoft
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]

  • RsRuler v.2.0 (299kb) (10.12.01 14:38)
    TRsRuler - линейка с 4-мя расположениями шкал, автоматически масштабирует числа (не перекрывающийся текст), масштаб 1-1000, линия показа положения на линейке, плоский или 3D вид.
    TRsRulerCorner изображает соединяющий элемент между горизотнальной и вертикальной линейками.
    Дополнения в v.2.0: можно использовать пиксельные единицы измерения.

    Новая версия компоненты
    С исходными текстами
    Компонента из раздела: Sizers, Scrollers, etc.: Rulers
    Источник: www.torry.net   Автор: Hans Roos http://www.roossoftware.nl
    -= · VCL · Samples · =- [Перевел: Сергей Касаткин]

  • Полный список компонент смотрите на сайте...
Кое-что из нашей кладовки   |x|
Лучшее из нашего FAQ   |x|
Как узнать серийный номер аудио CD?
CD может иметь или не иметь серийный номер и/или универсальный код продукта (Universal Product Code). MCI-расширение Windows предоставляет эту информации с помощью комманды MCI_INFO_MEDIA_IDENTITY command. Эта команда возвращает уникальную ID-строку.
Пример:

uses MMSystem, MPlayer;

procedure TForm1.Button1Click(Sender: TObject);
var
   mp : TMediaPlayer;
   msp : TMCI_INFO_PARMS;
   MediaString : array[0..255] of char;
   ret : longint;
begin
   mp := TMediaPlayer.Create(nil);
   mp.Visible := false;
   mp.Parent := Application.MainForm;
   mp.Shareable := true;
   mp.DeviceType := dtCDAudio;
   mp.FileName := 'D:';
   mp.Open;
   Application.ProcessMessages;
   FillChar(MediaString, sizeof(MediaString), #0);
   FillChar(msp, sizeof(msp), #0);
   msp.lpstrReturn := @MediaString;
   msp.dwRetSize := 255;
   ret := mciSendCommand(Mp.DeviceId, MCI_INFO, MCI_INFO_MEDIA_IDENTITY,
           longint(@msp));
   if Ret <> 0 then
       begin
           MciGetErrorString(ret, @MediaString, sizeof(MediaString));
           Memo1.Lines.Add(StrPas(MediaString));
       end
   else
       Memo1.Lines.Add(StrPas(MediaString));
   mp.Close;
   Application.ProcessMessages;
   mp.free;
end;
end.

»»» Прислать свои комментарии

Обсуждается в конференциях   |x|
У нас большой выбор статей   |x|
Сохранение и загрузка данных в объекты на примере коллекций.
Если в Вашей программе используются классы для описания объектов некоторой предметной области, то данные, их инициализирующие, можно хранить и в базе данных. Но можно выбрать гораздо более продуктивный подход, который доступен в Delphi.
Новинки книжного рынка   |x|
Delphi 5: учебный курс
В книге рассмотрены возможности системы программирования Delphi 5, описан язык программирования Object Pascal, рассмотрены визуальные компоненты системы и методы их создания. Особое внимание уделено принципам и практическим приемам создания сетевых приложений для разных архитектур и разработке программ, поддерживающих основные протоколы Интернета.Не требует специальной подготовки, может быть использована как пособие для изучающих основы программирования и сетевые технологии, а также как справочник по компонентам Delphi и пособие для самообразования.
Автор: С. Бобровский
Другие сайты о DELPHI   |x|
Программы, компоненты, статьи, FAQ'и по Delphi
Программы, компоненты, статьи, FAQ'и по Delphi
Опрос населения :)
Что мешает плохому танцору?
»»» Эти штуки... ;)
»»» Танцовщица
»»» Крылья
»»» Оппозиция
»»» Что и хорошему
»»» Ничего мне не мешает!
Журнал "Мастера DELPHI"  |x|
Давно витающая в воздухе нашего сайта идея создания журнала, посвященного всеми нами любимой среде разработки Delphi, похоже, обретает зримую форму. Несомненно, ваше мнение о необходимости такого журнала, содержании рубрик и темах отдельных статей поможет сделать журнал более полезным и интересным. Высказать свое мнение, проголосовать или же подписаться вы можете на сайте. Без вашего участия, нам будет трудно сделать правильный журнал!
Для души

Хокку дня
зима пришла
вода
остолбенела

Афоризмы
Лучший путь к счастью - не искать его... (Монтефиоре)

Фраза дня
Когда обои клеишь, главное, чтобы пузырей не было. Вот взяли мы как-то 2 пузыря...

И на закуску коротенький анекдот
Последняя запись из чёрного ящика упавшего самолёта:
- Пап, а пап, дай порулить!

Фотоприколы.
Начните день с хорошего настроения!
http://delphi.mastak.ru/cgi-bin/prikol.pl?id=1130


На этом позвольте откланяться и пожелать вам удачного дня.
Искренне ваш, Алексей (delphi@mastak.com)

Добро пожаловать на сайт -= Мастера DELPHI =- 


http://subscribe.ru/
E-mail: ask@subscribe.ru
Отписаться
Убрать рекламу

В избранное