mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-05 14:48:18 +02:00
16 lines
680 B
ObjectPascal
16 lines
680 B
ObjectPascal
{$mode Delphi}
|
|
type
|
|
ISensLogon = interface (IDispatch)
|
|
['{d597bab3-5b9f-11d1-8dd2-00aa004abd5e}']
|
|
function Logon(bstrUserName: WideString): HRESULT; stdcall; dispid 1;
|
|
function Logoff(bstrUserName: WideString): HRESULT; stdcall; dispid 2;
|
|
function StartShell(bstrUserName: WideString): HRESULT; stdcall; dispid 3;
|
|
function DisplayLock(bstrUserName: WideString): HRESULT; stdcall; dispid 4;
|
|
function DisplayUnlock(bstrUserName: WideString): HRESULT; stdcall; dispid 5;
|
|
function StartScreenSaver(bstrUserName: WideString): HRESULT; stdcall; dispid 6;
|
|
function StopScreenSaver(bstrUserName: WideString): HRESULT; stdcall; dispid 7;
|
|
end;
|
|
|
|
begin
|
|
end.
|