Файлдармен және диалогты терезелермен жұмыс

Delphi ортасында файлдармен жұмыс істеу технологиясы келесі іс-әрекетті талап етеді:

Біріншіден файл ашық болуы керек. Жұмыс жүйесі басқа қосымшалар кедергі жасамауын қадағалайды. Сол уақытта файлдың қандай мақсатта (өзгерту үшін немесе мәліметтерді оқу үшін) ашылғаның анықтайды. Мақсат анықталғаннан кейін ғана, оның идентификаторын қайтару арқылы, керек өңдеу процедураларына файл туралы тапсырма беріледі.

Дельфи тілінде файлдармен төмендегідей жұмыс түрлерін ұйымдастыруға болады: - файл құру;

-         Мәліметтерді файлға жазу;

-         Мәліметтерді файлдан оқу;

-         Файлды түрлендіру.

Файлдармен жұмыс істеуге арналған процедуралар мен функциялар

Файлдар кез келген түріне пайдалануға болатын процедуралар мен функциялар тізімін келтірейік.

1.      Procedure AssignFile(var F; FileName:String);  -F файлдың айнымалысын FileName атты файлмен байланыстырады;

2.      Function ChangeFileExt(const FileName, Extension: String):String ;- файлдың затын Extension параметрімен берілген файл затына өзгертеді;

3.      Procedure ChDir(Path: String);- Ағымдағы каталогты өзгертеді: Path-ескертусіз орнатылған каталогка баратын жолды көрсететін жолдық өрнек;

4.      Procedure CloseFile(var F);-Файлды жабады, бірақ F файлдың айнымалысымен AssignFile процедурасымен алдын-ала орнатылған байланыс сақталады. CloseFile процедурасының функциясы программа жұмысы дұрыс аяқталған жағдайды барлық ашылған файлдар автоматты түрде жабылады.

5.      Function DateTimeToFileDate(DataTime:TDataTime):Integer; - DataTime мәнін файл құру уақытының жүйелік форматына аударады.

6.      Function DiskFree(D:Byte):LongInt;-көрсетілген дискідегі бос орынның байттық көлемін береді:D-диск  номері (0 ескертусіз құрылғы;1-диск А;2- диск В және т.б.). Функция, егер жоқ дискінің номері көрсетілсе 1 деген мәнді береді.

7.      Function EOF(var F):Boolean;- файлдың соңын көрсетеді, егер файлдық көрсеткіш файлдың соңына тұрса, онда True мәнін береді.Жазуда бұл кезекті компонент файлдың соңына қосылғаның, ал оқуда файлдың жойылғанын көрсетеді.

8.      Procedure Erase(var F):-F файлын өшіреді. Процедураны орындар алдында файлды жабу қажет.

9.      Function FileAge(const FileName: String):integer;- FileName файлы үшін оның соңы жанартылған (қайта жазылған) уақытын береді.(жүйелік форматта); егер мұндай файл болмаса онда -1-ге тең.

10. Function ExcludeTrailingBakslash(const S:String):String;-S жолын тұйықтайтын «/» символын өшіреді (егер бұл символ жолды тұйықтамаса, онда S-ті өзгеріссіз қалдырады);

11. Function ExpandFileName(const FileName: String):String;-файл атын ағымдағы каталогпен толықтырады;

12. Function ExpandUncName(const FileName: String):String;-файл атын ағымдағы желілік каталогпен толықтырады;

13. Function ExtractFileDir(const FileName: String):String;-файлдың толық атауынан оған кіру маршрутын шығарады(соңғы “/” символынсыз);

14. Function ExtractFileExt(const FileName: String):String;-файлдың толық атауынан оның затын нүктесімен шығарады;

15. Function ExtractFileName(const FileName: String):String: String;-файлдың толық атауынан оның атын затымен шығарады;

16. Function ExtractFilePath (const FileName: String):String;-файлдың толық атауынан оған кіру маршрутын “/” символымен қоса шығарады;

17. Function ExtracRelativePath (const BaseName, DestName: String):String;-файлдың толық атауынан DestName –ге қатысты маршрут атын шығарады (аралық каталогтар :“/” символымен алмастырылады).

18. Function FileDateTimeToDateTime (DataTime:Integer): TDataTime; - жүйелік форматы  FileDate файылының құрылу уақытын дата-уақыт форматына түрлендіреді.

19. Function FileExists(const FileName:String):Boolean;-егер FileName атты файл бар болса, онда True мәнін береді;

20. Procedure FindClose(Var F:TSearchRec);- FindFirst/FindNext функциясымен файлды іздеуге бөлінген жадыны босатады;

21. Function FindNext(Var F:TSearchRec): integer;-F файылының каталогтағы келесі файлдың атын береді;

22.  Procedure Flash(var F);-дискідегі файлдың соңғы өзгертулерін сақтай отырып, файлдың ішкі буферін тазартады;

23. Procedure GETDir(D:Byte; var S:String);-Ағымдағы каталогты береді: D-құрылғы нөмірі; 1-А дискісі;2-В дискісі және т.б. S-String-типті айнымалы, ол көрсетілген дискідегі ағымдағы каталогқа баратын жолды көрсетеді;

24. Function IncludeTrailingBackslash(const S:String):String; - “/” символымен файлға кіретін толық маршрутты береді;

25. Function IOResult: Integer: - соңғы енгізушығару операциясының шартты белгісін береді.

26. Function ISPathDelimiter(const S:String; Index:Integer):Boolean;-егер S жолындағы  Index символында - “/” белгісі болса,онда True мәнін береді.

27. Function MatchesMask(const FileName,Mask:String):Boolean;- егер FileName атты Mask топтық атауына сәйкес келсе True мәнін береді.

28. Procedure MKDir(Dir:String);-көрсетілген дискідегі жаңа каталог құрады: Dir каталогты іздеу маршруты.Бұрын құрылған каталогтар атауы қайталанбауы тиіс.

29. Procedure Rename(var F; NewName:String);F файлының атын өзгертеді; NewName-файлдың жаңа атынан тұратын жолдық өрнек.Процедураны орындамас бұрын файлды жабу қажет;