Registriert seit: 10. Mai 2010
155 Beiträge
Delphi 11 Alexandria
|
AW: CreateFileMapping und Admin-Mode
19. Jun 2017, 17:10
Danke.
Delphi-Quellcode:
var
aSA: TSecurityAttributes;
aSD: TSecurityDescriptor;
begin
InitializeSecurityDescriptor(@aSD, SECURITY_DESCRIPTOR_REVISION);
SetSecurityDescriptorDacl(@aSD, True, nil, False);
aSA.nLength := SizeOf(TSecurityAttributes);
aSA.bInheritHandle := true;
aSa.lpSecurityDescriptor := @aSD;
...
hmmfApplicationName := CreateFileMapping(INVALID_HANDLE_VALUE, @aSA, PAGE_READWRITE, 0, SizeOf(TmmfApplicationName), PChar('AppNameXYZ'));
...
klappt soweit. Nun gibt es noch ein weiteres Problem, ich mach dazu aber ein neues Thema auf.
Grüsse
Uli
PS: wenn ich da noch 'Global\\' dazunehme gibt es eine Exception.
Er wollte so richtig in Delphi einsteigen. Nun steckt er ganz tief drin ...
Geändert von UliBru (19. Jun 2017 um 17:12 Uhr)
|