Overvåge mapper

kan du ikke bare læse i din config fil hvor mange mapper du vil overvåge
os så create en ShellChangeNotifier dynamisk for hver mappe du vil overvåge

Stoney

muligvis...

har du et lille kodeeksempel??

Jeg laver det i aften

Stoney

hej stoney

jeg har fundet ud af at oprette mine shellchangenotifier's dynamisk ud fra en liste...

nu får jeg så besked om at der er en af mapperne der er blevet ændret.
men hvordan læser jeg ud hvilken??

Nu ved jeg ikke lige hvordan den event ser ud. Men kunne regner med du har een fælles event til alle objecter, så ville det fx være

procedure OnChange(sender:tobject);
begin
  showmessage((sender as TShellChangeNotifier).Directory);
end;

håber du kan se pointen

Jeg bruger flg kode:

--snip--
var
  Form1: TForm1;
  notifier: array[1..999] of Tshellchangenotifier;
  x:integer;

procedure TForm1.ShellChangeNotifierChange(sender:tobject);
begin
showmessage((sender as TShellChangeNotifier).root);
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
for x := 0 to memo1.Lines.Count-1 do
begin
notifier[x] := tshellchangenotifier.Create(self);
notifier[x].Root := memo1.Lines.Strings[x];
notifier[x].NotifyFilters := [nfFileNameChange,nfDirNameChange,nfSizeChange];
notifier[x].OnChange := ShellChangeNotifierChange(notifier[x]);
end;
end;
--snip--

Det virker ikke..

Jeg får:
"Incompatible types: TThread...."

tror du skulle overveje en tobjectlist istedet.

hvad mener du?