То же самое.

Да бл... А теперь?

На файл, который создаётся во время записи видео в папке для мониторинга.
Он создаётся с нулевым размером, таким и остаётся до нажатия стоп.
Его реальный размер можно узнать только нажав на его Properties.
Конечно же после окончания записи, msgbox показывает реальный размер этого файла

А так?(исправил код в посте 12)

Не подходит этот скрипт.
Я прописал в него

   FileGetSize NewFileSize, %FileName% ; получаем новый размер
msgbox, %FileSize%
msgbox, %NewFileSize%
   if (NewFileSize = FileSize) ; если они равны

И во время записи он выдаёт, что у первого, что у второго нули.

только на этих файлах или на любых?

   FileGetSize NewFileSize, %FileName% ; получаем новый размер
msgbox, %FileSize%
msgbox, %NewFileSize%
   if (NewFileSize = FileSize) ; если они равны

И во время записи он выдаёт, что у первого, что у второго нули.

Вроде такой вариант проходит

Только если на винчере больше никто ничего не делает.

Ясно, значит программа пишет не закрывая хендл и это печально(для нас, не для программы). Тогда, если новый файл создаётся редко(раз в час, например ), то алгоритм такой:

Path := A_ScriptDir
FileName := GetLastModifiedFileName(Path)
hFile := CreateFile(FileName, 0, 7, 0, 3, 0x80, 0)
FileSize := MyGetFileSize(hFile)
NewFileSize := FileSize
NewFileName := ""
loop
{
   Sleep 2000
   NewFileSize:=MyGetFileSize(hFile)
   if (NewFileSize = FileSize)
   {
      NewFileName := GetLastModifiedFileName(Path)
	  if(NewFileName=FileName)
	  {
	     SoundBeep 750, 500
	  }
	  else
	  {
         FileName := NewFileName
		 CloseHandle(hFile)
		 hFile := CreateFile(FileName, 0, 7, 0, 3, 0x80, 0)
		 FileSize := MyGetFileSize(hFile)
         NewFileSize := FileSize
	  }
   }
   else
   {
      FileSize := NewFileSize
   }
}
return

CreateFile(lpFileName, dwDesiredAccess, dwShareMode, lpSecurityAttributes, dwCreationDisposition, dwFlagsAndAttributes, hTemplateFile)
{
   return DllCall("CreateFile", "str", lpFileName, "uint", dwDesiredAccess, "uint", dwShareMode, "uint", lpSecurityAttributes, "uint", dwCreationDisposition, "uint", dwFlagsAndAttributes, "uint", hTemplateFile, "uint")
}

CloseHandle(Handle)
{
   return DllCall("CloseHandle", "uint", Handle)
}

GetFileInformationByHandle(hFile, lpFileInformation)
{
   return DllCall("GetFileInformationByHandle", "uint", hFile, "uint", lpFileInformation, "uint")
}

MyGetFileSize(hFile)
{
   VarSetCapacity(FileInformation, 52)
   GetFileInformationByHandle(hFile, &FileInformation)
   ret := NumGet(&FileInformation, 36)
   VarSetCapacity(FileInformation, 0)
   return ret
}

GetLastModifiedFileName(Path)
{
   FileTimeModified := 0
   FileName := ""
   Loop %Path%\*.*, , 1
   {
      if(A_LoopFileTimeModified>FileTimeModified)
      {
         FileTimeModified := A_LoopFileTimeModified
		 FileName := A_LoopFileLongPath
      }
   }
   return FileName
}

Esc::ExitApp

Тогда почему тут вся папка мониторится?

Каждый час создаётся новый файл.
То есть мониторить надо последний файл из созданных.
Что-то не могу продумать алгоритм.
Это получается, что мы вначале находим последний созданный файл, потом в цикле его сравниваем размер, если размер одинаковый то пибикаем и возвращаемся к поиску последнему созданному файлу так?

Лучше ничего не искать, а получать уведомления об изменениях в этой папке, указав тип изменений FILE_NOTIFY_CHANGE_SIZE(изменился размер) или FILE_NOTIFY_CHANGE_LAST_WRITE(изменилась дата последней записи). Далее два варианта:
"точный"- при получении уведомления ставим(изменяем, если он уже поставлен) таймер.
"безтаймерный"- сохраняем время получения уведомления в переменную и в цикле со sleep'ом сравниваем его с текущим временем.

Тогда почему тут вся папка мониторится?

Каждый час создаётся новый файл.
То есть мониторить надо последний файл из созданных.
Что-то не могу продумать алгоритм.
Это получается, что мы вначале находим последний созданный файл, потом в цикле его сравниваем размер, если размер одинаковый то пибикаем и возвращаемся к поиску последнему созданному файлу так?

Александр_, твой код наверное не подойдёт, потому что это всё мне надо для проверки не прекратилась ли запись.
Я с камеры практически безостановочно (с перерывом на 5 секунд в час) одним файлом записываю видео в директорию.

Тогда почему тут вся папка мониторится? Самое медленно место в программе- это обращения к винчестеру, поэтому их нужно сводить к минимуму.

Угу, но таймер надо ставить один раз, а в конце удалять. Если следовать этой рекомендации, то лучше всего, наверно так:

loop
{
   ...
   sleep 2000
}

#Persistent
FolderPath := "E:\TEST"
  FolderSize = 0
  Loop, %FolderPath%\*.*, , 1
  FolderSize += %A_LoopFileSize%
DoThis:
   Folder2Size = 0
   Loop, %FolderPath%\*.*, , 1
   Folder2Size += %A_LoopFileSize%
if (Folder2Size = FolderSize)
   {
      SoundBeep, 750, 500
       }
else
{
   FolderSize := Folder2Size
}
sleep, 2000
Goto, DoThis
return

А чем Goto лучше чем SetTimer?
В хэлпе написано - "The use of Goto is discouraged because it generally makes scripts less readable and harder to maintain. Consider using Else, Blocks, Break, and Continue as substitutes for Goto. "

Для числовых значений не важно "=" или "==".

Сейчас проверил, действительно.