Wednesday, October 29, 2008

Delphi File Manager Commands

i think this command is useful to you guy's... because on my Last Project... i really2 need this command... for you i present this command that i get from http://mc-computing.com/languages/Delphi/DelphiFileIO.htm...

File Manager Commands

SysUtils/FileOpen and System/AssignFile have different commands for many of these

See SysUtils / File-management routines and System / I/O routines


Change Directory SetCurrentDir('c:\path')
Make Directory CreateDir('c:\path')
ForceDirectories('c:\path1\path2')
Remove Directory RemoveDir('c:\path')
RmDir(str)
Change Drive (no known function)
Rename a File RenameFile('test.txt', 'string.tst')
ChangeFileExt('test.txt', 'doc')
Delete a File DeleteFile('c:\*.tst') - Don't know if wildcards are allowed
Search for File t_str := FileSearch('readme.txt', 'c:\;c:\windows');
t_int := FindFirst ('c:\*.tst', attr, F) ;
Current Drirectory t_str := GetCurrentDir ;
Get File Attributes temp = FileGetAttr('c:\filename.tst')
Get File Mode TSearchRec.Attr (use with FindFirst or FindNext)
Set File Attributes FileSetAttr('c:\filename.tst', faReadOnly)
Get File Length TSearchRec.Size (use with FindFirst or FindNext)
FileSize(var F)
Get File Date/Time tempDate := FileGetDate(Handle) ;
Set File Date/Time FileSetDate(Handle, Age)
Test File existance if FileExists('c:\filename.tst') then
Test Directory existance if DirectoryExists('c:\temp') then
AdjustLinesBreaks(const S: string): string; - adjusts all line breaks in the string S to be true CR/LF


0 comments: