1 578
editací
Změny
Založena nová stránka: Rozšíří jméno souboru na plně určené jméno souboru. ;Deklarace function FExpand (Path: PathStr): PathStr; ;Režim :Reálný, Chráněný ;Poznámky :Typ Pat…
Rozšíří jméno souboru na plně určené jméno souboru.
;Deklarace
function FExpand (Path: PathStr): PathStr;
;Režim
:Reálný, Chráněný
;Poznámky
:Typ PathStr je definován v jednotce Dos.
;Viz také
:[[FindFirst]]
:[[FindNext]]
:[[FSplit]]
Vzorový příklad
{ FExpand.PAS }
{ Příklad pro FExpand a FSearch }
uses Dos;
var
S: PathStr;
begin
S := FSearch('TURBO.EXE',GetEnv('PATH'));
if S = '' then
Writeln('TURBO.EXE nenalezeno')
else
Writeln('Nalezeno jako ', FExpand(S));
end.
[[Category:DOS]]
[[Category:Funkce DOS]]
[[Category:Procedury a funkce správy souborů]]
;Deklarace
function FExpand (Path: PathStr): PathStr;
;Režim
:Reálný, Chráněný
;Poznámky
:Typ PathStr je definován v jednotce Dos.
;Viz také
:[[FindFirst]]
:[[FindNext]]
:[[FSplit]]
Vzorový příklad
{ FExpand.PAS }
{ Příklad pro FExpand a FSearch }
uses Dos;
var
S: PathStr;
begin
S := FSearch('TURBO.EXE',GetEnv('PATH'));
if S = '' then
Writeln('TURBO.EXE nenalezeno')
else
Writeln('Nalezeno jako ', FExpand(S));
end.
[[Category:DOS]]
[[Category:Funkce DOS]]
[[Category:Procedury a funkce správy souborů]]