Hi folks,
wenn die Indexerstellung für das Dateisystem abgeschaltet werden soll, dann gibt es da verschiedene Methoden. Hier ein Beispiel, bei dem alle Einstellungen erhalten bleiben, aber das Befüllen des zugehörigen Katalogs angehalten wird:
Delphi-Quellcode:
const
CICAT_STOPPED = 1;
function SetCatalogState(catalog: PWideChar; machine: PWideChar;
newState: Cardinal;
var OldState: Cardinal): Cardinal;
stdcall;
external '
query.dll';
procedure TMainForm.StopButtonClick(Sender: TObject);
var
wsCatalog, wsMachine: WideString;
dwResult, oldState: Cardinal;
begin
wsCatalog := '
system';
wsMachine := '
.';
dwResult := SetCatalogState(PWideChar(wsCatalog), PWideChar(wsMachine), CICAT_STOPPED, oldState);
if dwResult = 0
then ShowMessage('
angehalten')
else ShowMessage(IntToHex(dwResult, 8));
end;
Wer mehr will, der sollte die Automationsobjekte aus der ciodm.dll importieren und sich ein wenig mit der
query.dll (beide %windir%\system32) beschäftigen.
Grüße vom marabu