, hvordan til at kontrollere, om et godt kort er installeret eller ej.,, det tip er ikke min egen, det blev sendt til mig via e - mail,.,,, funktion issoundcardinstalled: boolean,,,,, scfunc = funktion: uint; stdcall;,, var, libinst - longint;,, entrypoint: scfunc;,, begynder, resultat: = falske,, libinst: = loadlibrary (pchar ('winmm. dll '));,,,,, hvis libinst < > 0, begynder, entrypoint: = getprocaddress (libinst, waveoutgetnumdevs'), hvis (entrypoint < > 0) og resultat: = sandt,,,,,, og endelig, hvis (libinst < > 0), så freelibrary (libinst);,,,,,,,,,,,,