Delphi-PRAXiS
Seite 3 von 3     123   

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Sonstige Fragen zu Delphi (https://www.delphipraxis.net/19-sonstige-fragen-zu-delphi/)
-   -   Delphi Angemeldeter Benutzer auslesen (https://www.delphipraxis.net/111201-angemeldeter-benutzer-auslesen.html)

wido 31. Mär 2008 22:34

Re: Angemeldeter Benutzer auslesen
 
Ok, I did a little bit of testing. The crash occurs in DateTimeStringSafe within the JwaWinSta unit. The problem is the DateTimeStringVista call. I am not that good at reversing but in my opinion DateTimeString inside the utildll.dll doesn't take 3 parameters on Vista SP1. I might be wrong though.

Zitat:

Zitat von Dezipaitor
Du verwendest 64bit Vista. Das hat hier so gut wie niemand :D
Daher wird es bei anderen garnicht crashen können.

Naja, stell meinen Rechner gerne zur Verfügung :P.

wido 31. Mär 2008 22:47

Re: Angemeldeter Benutzer auslesen
 
A second crash occurs within DiffTimeString within the unit JwaWinSta when calling ElapsedTimeStringSafe.

wido 31. Mär 2008 23:38

Re: Angemeldeter Benutzer auslesen
 
Gut, mit der aktuellen JEDI API und JWSCL Version aus dem SVN kann man JwsclTerminalServer jetzt auch problemlos unter Vista SP1 benutzen ;).

cherry 1. Apr 2008 08:08

Re: Angemeldeter Benutzer auslesen
 
hey super! mit diesem Code von wido hats bei mir prima geklappt!

Delphi-Quellcode:
program Project1;

{$APPTYPE CONSOLE} 

uses
  JwsclTerminalServer;

var
  TS : TJwTerminalServer;
  i : integer;
begin
  TS := TJwTerminalServer.Create;
  TS.Connect;
  TS.EnumerateSessions; // Crash

  for i := 0 to TS.Sessions.Count - 1 do
    writeln(TS.Sessions[i].Username);
  TS.Free;
end.
Vielen Dank euch allen! :thumb:

PS: In einem alten Thread von mir geht es nun darum einen Benutzer der auf diese weise ausgelesen wird abzumelden...
vielleicht könnte mal jemand einen Blick drauf werfen ;-)

http://www.delphipraxis.net/internal...952&highlight=

Remko 1. Apr 2008 10:29

Re: Angemeldeter Benutzer auslesen
 
Use TS.Sessions[i].Logoff

Maybe you should read the documentation...

procedure Logoff(bWait: Boolean);
The Logoff function logs off a specified Terminal Services session


Parameters
bWait
Indicates whether the operation is synchronous. Specify TRUE to wait for the operation to complete, or FALSE to return immediately.
Exceptions raised
EJwsclWinCallFailedException
will be raised if the call fails.


Alle Zeitangaben in WEZ +1. Es ist jetzt 17:53 Uhr.
Seite 3 von 3     123   

Powered by vBulletin® Copyright ©2000 - 2025, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024-2025 by Thomas Breitkreuz