[ Bojann @ 25.12.2005. 11:05 ] @
kojom funkcijom mogu da doijem informacije o nkom fajlu?
[ Passwd @ 25.12.2005. 12:15 ] @
Otvoris help i lijepo ides po njemu )

GetFAttr (procedure) (Dos unit and WinDos unit)

Returns the attributes of a file.

Declaration:
procedure GetFAttr(var F; var Attr: Word);

Target:
Windows, Real, Protected

Remarks:
F must be a file variable (typed, untyped, or text file) that has been
assigned but not opened.

See Also:
GetFTime
SetFAttr
SetFTime

Sample Code:

{Getfattr.PAS}

{Sample code for the GetFAttr procedure.}

{ For Windows: }
{ uses WinDos,WinCrt; }

uses Dos;

var
F: file;
Attr: Word;
begin
{ Get file name from command line }
Assign(F, ParamStr(1));
GetFAttr(F, Attr);
Writeln(ParamStr(1));
if DosError <> 0 then
Writeln('DOS error code = ', DosError)
else
begin
Write('Attribute = ', Attr);
{ Determine attribute type using file attribute constants }
if Attr and ReadOnly <> 0 then { For Windows: faReadOnly }
Writeln('Read only file');
if Attr and Hidden <> 0 then { For Windows: faHidden }
Writeln('Hidden file');
if Attr and SysFile <> 0 then { For Windows: faSysFile }
Writeln('System file');
if Attr and VolumeID <> 0 then { For Windows: faVolumeID }
Writeln('Volume ID');
if Attr and Directory <> 0 then { For Windows: faDirectory }
Writeln('Directory name');
if Attr and Archive <> 0 then { For Windows: faArchive }
Writeln('Archive (normal file)');
end; { else }
end.


itd,itd i naci ces sve funkcije i primjere za njih

poz
[ Bojann @ 25.12.2005. 14:32 ] @
U delphiu 7 ne postoji funkcija getfattr
[ Passwd @ 25.12.2005. 14:54 ] @
Govorio sam za Pascal... evo ti mali primjercic u attachu da dobijes neke osnovne informacije u delphiu..ako ti bude trebalo jos samo reci, uglavnom nije tesko!