Dateinamen herausbekommen

[luckystar85]

Moin,

ich habe mit

Delphi-Quellcode:

var
  dwWaitStatus : DWORD;
begin
  hNotifity := FindFirstChangeNotification(PChar(FsDirPath), true, FILE_NOTIFY_CHANGE_FILE_NAME or
                                                                   FILE_NOTIFY_CHANGE_LAST_WRITE or
                                                                   FILE_NOTIFY_CHANGE_SIZE or
                                                                   FILE_ACTION_ADDED or
                                                                   FILE_ACTION_REMOVED or
                                                                   FILE_ACTION_MODIFIED);
  if (hNotifity = INVALID_HANDLE_VALUE) then
  begin
    RaiseLastWin32Error;
    Terminate;
  end;

  while ((FindNextChangeNotification(hNotifity)) and (not terminated)) do
  begin
    Application.ProcessMessages;
    dwWaitStatus := WaitForSingleObject(hNotifity, 1000);
    if (dwWaitStatus = WAIT_FAILED) then
    begin
      RaiseLastWin32Error;
      Terminate;
    end;
    if (dwWaitStatus = WAIT_OBJECT_0) then
    begin
      AddFileToList;
    end;
  end;

eine Verzeichnisüberwachung realisiert. Jetzt möchte ich aber herausbekommen welche Datei sich verändert hat. Ist das mit dem Code von oben möglich? Ich habe in der MSDN nichts dazu gefunden.