Difference between revisions of "ATFileNotif"
From Lazarus wiki
Jump to navigationJump to search (added category) |
m (Fixed syntax highlighting) |
||
Line 7: | Line 7: | ||
Example of function which starts file watch: | Example of function which starts file watch: | ||
− | <syntaxhighlight> | + | <syntaxhighlight lang="pascal"> |
procedure TfmMain.NotifyFile; | procedure TfmMain.NotifyFile; | ||
begin | begin |
Latest revision as of 10:00, 9 February 2020
About
ATFileNotif is simple component which detects file change. It uses timer, timer checks are file props (file exists; file size; file age) changed or not. It calls OnChanged.
Example
Example of function which starts file watch:
procedure TfmMain.NotifyFile;
begin
with ATFileNotif1 do
begin
Timer.Enabled:= False;
Timer.Interval:= 1000;
FileName:= edFileName.Text;
Timer.Enabled:= True;
end;
end;
Download
Github: https://github.com/Alexey-T/ATFileNotif-Lazarus
License
MPL 2.0 or LGPL.