_DiaFile

Pomocí této funkce lze vybírat soubor na disku. 'Mask' je adresář a maska pro vyhledávané soubory. Lze zde použít i název konkrétního souboru. Nezadáte-li žádnou cestu, bude doplněna standardní cesta k datům z prostředí programu. 'FName' je jméno vybraného souboru, který bude vrácen jestliže obsluha nestiskne klávesu <ESC>.

V programu Pam5 je lépe využívat nových vlastností, které poskytuje operační systém Windows pro vyhledávání souborů. Popis vyhledávání se zapisuje do parametru 'Mask' a příkazy jsou od sebe odděleny znakem pipeline '|':

cesta

jméno souboru

OPEN / SAVE

nadpis okna

popis filtru 1

filtr 1; xxx

popis filtru 2

filtr 2; xxx

V případě použití módu OPEN, musí soubor existovat!

Podívejte se na: Práce se soubory

Příklad:

dim FName : String[80];

{ jako v Pam4 }
if _DiaFile(_PathUsr+"*.Mac", FName) = cmOK then
  ...
endif

{ Pam5 - 1 }
if _DiaFile(_PathUsr+"||open|Otevři soubor|"+
            "Makra(*.Mac)|*.Mac|"+
            "Include(*.Inc)|*Inc", FName) = cmOK then
  ...
endif

{ Pam5 - 2 }
if _DiaFile(_PathUsr+"|PamAlg3.Mac|open|Otevři soubor|"+
                     "Makra a Include(*.Mac;*.Inc)|*.Mac;*.Inc|"+
                     "Makra(*.Mac)|*.Mac|"+
                     "Include(*.Inc)|*Inc", FName) = cmOK then
  ...
endif