Четверг, 19.06.2025, 15:43
Приветствую Вас Гость | RSS
Меню сайта
fff
  • Индексация
  • Девочки
    Форма входа
    Категории раздела
    Теория алгоритмов [3]
    Теория алгоритмов
    Code Snippets [1]
    Code Snippets
    Все о PHP [20]
    Все о PHP
    Visual C++ [13]
    Visual C++
    WIN32 API [7]
    WIN32 API
    Delphi [72]
    Delphi
    ASP [2]
    ASP
    Java [67]
    Java
    VBScript [6]
    VBScript
    CGI [2]
    CGI
    VRML [2]
    VRML
    PERL [9]
    PERL
    HTML [4]
    HTML
    XML [10]
    XML
    Архив записей

    Статьи по Оптимизации

    ПРОГРАММИРОВАНИЕ! СОЗДАНИЕ САЙТОВ И ИХ ОПТИМИЗАЦИЯ

    Главная » Статьи » Программирование » Delphi

    Получение идентификатора диска
    Получение идентификатора диска
    Как получить идентификатор находящегося в CD-ROM'е аудио-компакта?
    const

    MCI_INFO_PRODUCT = $00000100;
    MCI_INFO_FILE = $00000200;
    MCI_INFO_MEDIA_UPC = $00000400;
    MCI_INFO_MEDIA_IDENTITY = $00000800;
    MCI_INFO_NAME = $00001000;
    MCI_INFO_COPYRIGHT = $00002000;

    { блок параметров для командного сообщения MCI_INFO }
    type

    PMCI_Info_ParmsA = ^TMCI_Info_ParmsA;
    PMCI_Info_ParmsW = ^TMCI_Info_ParmsW;
    PMCI_Info_Parms = PMCI_Info_ParmsA;
    TMCI_Info_ParmsA = record
    dwCallback: DWORD;
    lpstrReturn: PAnsiChar;
    dwRetSize: DWORD;
    end;
    TMCI_Info_ParmsW = record
    dwCallback: DWORD;
    lpstrReturn: PWideChar;
    dwRetSize: DWORD;
    end;
    TMCI_Info_Parms = TMCI_Info_ParmsA;

    Идентификатор возвращается функцией MCI_INFO_MEDIA_IDENTITY в виде строки с десятичным числом. Для получения дополнительной информации обратитесь к электронной справке (Win32 и компонент TMediaPlayer).

    Категория: Delphi | Добавил: Merlin (07.12.2009)
    Просмотров: 387 | Комментарии: 1 | Рейтинг: 0.0/0
    Всего комментариев: 0
    Имя *:
    Email *:
    Код *: