Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 4 208 • TDictionary Custom Sort 6 259 • Fast Watermark Sources 6 060 • 3D Designer 8 958 • Sik Screen Capture 6 381 • Patch Maker 6 802 • Айболит (remote control) 6 783 • ListBox Drag & Drop 5 658 • Доска для игры Реверси 96 324 • Графические эффекты 7 001 • Рисование по маске 6 284 • Перетаскивание изображений 5 175 • Canvas Drawing 5 544 • Рисование Луны 5 245 • Поворот изображения 4 794 • Рисование стержней 3 390 • Paint on Shape 2 650 • Генератор кроссвордов 3 534 • Головоломка Paletto 2 822 • Теорема Монжа об окружностях 3 633 • Пазл Numbrix 2 376 • Заборы и коммивояжеры 3 060 • Игра HIP 2 014 • Игра Go (Го) 1 939 • Симулятор лифта 2 299 • Программа укладки плитки 2 003 • Генератор лабиринта 2 456 • Проверка числового ввода 2 141 • HEX View 2 475 • Физический маятник 2 091

Главная

Исходники (более 1 300 примеров)

Компоненты

Форум

Поиск звуковой платы

Hа уроке литературы в компьютерном лицее: - Герасим был это... этим... Hу, звуковой карты у него не было.

uses MMsystem;

begin
  if WaveOutGetNumDevs>0 then
    Result:='Yes'
  else
    Result:='No';
end;