XProfan

Source wurde al 15.07.2007 de el MMJ-Quellcodesammlung (Dietmar Horn) en el Babyklappe en XProfan.Com abgelegt:
API: SHLWAPI.DLL - Test, si una Expediente una cierto Endung ha
testet si una Expediente una cierto Endung ha, 1 = sí
Autor Dieter Zornow
free
DEF PathMatchSpec(2) ! shlwapi,PathMatchSpecA

Proc IssExt

    parámetros pfad$,ext$
    Volver PathMatchSpec(addr(pfad$),addr(ext$))

ENDPROC

cls
imprimir IssExt(c:\temp\Test.txt,*.doc)
waitinput