Недавно добавленные исходники
• DeLiKaTeS Tetris (Тетрис) 3 935 • TDictionary Custom Sort 6 040 • Fast Watermark Sources 5 842 • 3D Designer 8 658 • Sik Screen Capture 6 165 • Patch Maker 6 600 • Айболит (remote control) 6 593 • ListBox Drag & Drop 5 453 • Доска для игры Реверси 95 408 • Графические эффекты 6 804 • Рисование по маске 5 989 • Перетаскивание изображений 4 980 • Canvas Drawing 5 349 • Рисование Луны 5 073 • Поворот изображения 4 615 • Рисование стержней 3 272 • Paint on Shape 2 513 • Генератор кроссвордов 3 404 • Головоломка Paletto 2 714 • Теорема Монжа об окружностях 3 503 • Пазл Numbrix 2 301 • Заборы и коммивояжеры 2 991 • Игра HIP 1 946 • Игра Go (Го) 1 863 • Симулятор лифта 2 216 • Программа укладки плитки 1 933 • Генератор лабиринта 2 371 • Проверка числового ввода 2 058 • HEX View 2 379 • Физический маятник 2 015

Главная

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

Компоненты

Форум

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

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

uses MMsystem;

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