Is a sound card available/de

From Lazarus wiki
Revision as of 08:30, 2 August 2013 by Olaf (talk | contribs)
Jump to navigationJump to search

│ Deutsch (de) │


Dieser Artikel beschäftigt sich mit der Windowsprogrammierung.
Die Funktion prüft, ob sich eine Soundkarte im Rechner befindet.

uses
  ...;

// Aufruf der Windowsfunktion IsSoundkarte aus der Windows-DLL winmm.dll
function IsSoundKarte: longint; stdcall; external 'winmm.dll'
  Name 'waveOutGetNumDevs';

// Funktion um den Aufruf der Windows-Dll zu demonstrieren
function funTest: string;
begin

  if IsSoundKarte = 0 then
    Result := 'Keine Soundkarte vorhanden'
  else
    Result := 'Soundkarte vorhanden';
end;



--Olaf 08:29, 2 August 2013 (CEST)

Retrieved from "http://wiki.freepascal.org/index.php?title=Is_a_sound_card_available/de&oldid=71669"