AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Projekte XP Usermanagers 6.1 Open Source
Thema durchsuchen
Ansicht
Themen-Optionen

XP Usermanagers 6.1 Open Source

Ein Thema von Luckie · begonnen am 25. Okt 2004 · letzter Beitrag vom 4. Feb 2020
Antwort Antwort
Seite 90 von 120   « Erste     4080888990 9192100     Letzte »    
Benutzerbild von Luckie
Luckie
Registriert seit: 29. Mai 2002
Aktuelle Version: 6.1.0.25

Der UserManager dient dazu Benutzerkonten auf NT ff. Maschinen anzulegen, zu löschen, Benutzer Gruppen zu zuordnen und deren Konten zu verwalten. All dies kann man auch mit der Windows internen Benutzerverwaltung, nur nicht so übersichtloch, wie ich denke.
Man kann mit dem Usermanager auch lokale Benutzerkonten auf remote Computer im Netzwerk verwalten. Was allerdings nicht mit Windows XP Home funktioniert, da XP Home den remote Zugriff nicht gestattet.

Unterstütze Betriebssysteme:
  • Windows NT 4.0, vermutlich, nicht getestet.
  • Windows 2000
  • Windows XP (32-Bit), Windows XP Home wird nicht remote unterstützt.
  • Windows Vista 32-Bit
  • Windows 7 32-Bit, 64-Bit

Features:
  • Auswahl des zu bearbeitenden Computers (und ist damit netzwerktauglich)
  • Anzeige des Betriebsystems des Remotecomputers
  • Anzeigen des ausgewählten Computers und Benutzers in der Titelzeile
  • Statusanzeige beim Übertragen der Konten und Kontendaten in der Statusleiste
  • Auflistung sämtlicher Konten in einer Baumstruktur (einschließlich Systemkonten wie z.B. Hilfeassistent)
  • Hervorheben von deaktivierten Konten durch ein anderes Symbol
  • Ansicht kann zwischen Benutzern und Gruppen umgeschaltet werden
  • Details mit Angabe des Benutzer-Namens, vollständiger Name, Beschreibung, Stammverzeichnis und Script
  • Checkboxen zur schnellen Konfiguration des ausgewählten Kontos bezüglich Kennwort und anderen Daten
  • Direkte Anzeige der Zuordnung zu Gruppen sowie Anzeige aller verfügbaren Gruppen
  • Direkte Anzeige sämtlicher Parameter des Kontos
  • Benutzer können in eine CSV Datei exportiert werden
  • Es können mehrere Benutzer auf einmal über eine Vorlagendatei angelegt und wieder gelöscht werden
  • Integrierte Gruppenverwaltung
  • Toolbar mit Schaltflächen für die wichtigsten Funktionen
  • Export der Benutzer von und Import von Benutzer aus einer XML-Dateien neu
  • Modernere Icons neu
  • Ausführliche kontextsensitive Hilfe

Der XP Usermanager ist ab sofort Freeware. Im Archiv befindet sich noch eine paf.exe zur Installation für PortableApps (http://portableapps.com/)
Miniaturansicht angehängter Grafiken
xpusermanager.jpg  
Angehängte Dateien
Dateityp: zip XPUsermanager6_1_full.zip (424,7 KB, 152x aufgerufen)
Ein Teil meines Codes würde euch verunsichern.

Geändert von Luckie (16. Jul 2017 um 02:12 Uhr)
 
Benutzerbild von Mithrandir
Mithrandir
 
#891
  Alt 8. Aug 2009, 13:01
Zitat von Luckie:
Und das mit den Symbolen hatten wir schon mal. Das sind ursprünglich mal PNGs gewesen.
Ist ja nun auch schon ewig lange her. Was spricht denn dagegen, nach passenden Vektorgrafiken zu gucken? Die kann man problemlos in der Größe anpassen und dann ins passende Format konvertieren.
米斯蘭迪爾
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#892
  Alt 8. Aug 2009, 13:16
Zitat von jaenicke:
Zitat von Luckie:
Jupp. Windows 7 wird noch nicht ausgewertet. Muss ich mal gucken, wie ich das hinbekomme, denn das läuft nicht mit der normalen GetVersion Funktion.
Wie kommst du darauf?
Siehe hier:
Delphi-Quellcode:
function GetOS(const Computer: WideString): string;
var
  res : DWORD;
  s : string;
  si : Pointer;
  Major : DWORD;
  Minor : DWORD;
resourcestring
  rsErrorOSUnknown = 'Betriebssystem unbekannt';
begin
  si := nil;
  s := '';
  res := NetServerGetInfo(PWideChar(Computer), 101, @si);
  if res = NERR_Success then
  begin
    Major := PSERVER_INFO_101(si)^.sv101_version_major;
    Minor := PSERVER_INFO_101(si)^.sv101_version_minor;
    if (Major = 4) and (Minor = 0) then
    begin
      s := 'Windows NT 4.0';
    end
    else if (Major = 5) and (Minor = 0) then
    begin
      s := 'Windows 2000';
    end
    else if (Major = 5) and (Minor = 1) then
    begin
      s := 'Windows XP';
    end
    else if (Major = 5) and (Minor = 2) then
    begin
      s := 'Windows 2003 Server Family';
    end
    else if (Major = 6) and (Minor = 0) then
      s := 'Windows Vista'
    else
      s := rsErrorOSUnknown;

    NetApiBufferFree(si);
  end
  else
    s := rsErrorOSUnknown;
  result := s;
end;
Ich müsste also nur noch Windows 7 ergänzen.

@Daniel: Weil ich bisher noch keine gescheiten Grafiken/Symbole gefunden haben, die auch von der Lizenz her verwenden darf ohne groß was dafür bezahlen zu müssen.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von RWarnecke
RWarnecke

 
Delphi XE8 Enterprise
 
#893
  Alt 8. Aug 2009, 13:46
Hallo Michael,

der API-Befehl MSDN-Library durchsuchengetproductinfo könnte da etwas für Dich sein. Der erkennt alle Versionen von VISTA oder höher und Windows Server 2008 oder höher
Rolf Warnecke
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#894
  Alt 8. Aug 2009, 13:55
Geht leider nicht:
Zitat:
Minimum supported client Windows Vista
Desweitern ist es nicht netzwerkfähig.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von jaenicke
jaenicke

 
Delphi 11 Alexandria
 
#895
  Alt 8. Aug 2009, 14:44
Zitat von Luckie:
Ich müsste also nur noch Windows 7 ergänzen.
Genau:
Delphi-Quellcode:
    else if (Major = 6) and (Minor = 0) then
      s := 'Windows Vista'
    else if (Major = 6) and (Minor = 1) then
      s := 'Windows 7'
    else
      s := rsErrorOSUnknown;
Zitat von Luckie:
@Daniel: Weil ich bisher noch keine gescheiten Grafiken/Symbole gefunden haben, die auch von der Lizenz her verwenden darf ohne groß was dafür bezahlen zu müssen.
Bei OpenClipArt müsste ich mal schauen, ob es da etwas gibt. Die könntest du ja problemlos verwenden (Public Domain).
Sebastian Jänicke
  Mit Zitat antworten Zitat
Benutzerbild von RWarnecke
RWarnecke

 
Delphi XE8 Enterprise
 
#896
  Alt 8. Aug 2009, 15:49
Zitat von Luckie:
Geht leider nicht:
Zitat:
Minimum supported client Windows Vista
Desweitern ist es nicht netzwerkfähig.
Du kannst Ihn aber trotzdem nutzen. Du liest ja die Major und Minor Version aus. Diese übergibts Du an GetProductInfo, dann sollte er doch die richtige Version ausspucken.
Rolf Warnecke
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#897
  Alt 8. Aug 2009, 15:53
Dann guck dir mal die Rückgabewerte an. Die geben mir nicht das Betriebssystem zurück.
Michael
  Mit Zitat antworten Zitat
Benutzerbild von RWarnecke
RWarnecke

 
Delphi XE8 Enterprise
 
#898
  Alt 8. Aug 2009, 16:06
Zitat von Luckie:
Dann guck dir mal die Rückgabewerte an. Die geben mir nicht das Betriebssystem zurück.
Du ermittelst doch die Major und Minor Version und durch den Rückgabewert von GetProductInfo kannst Du zwischen VISTA und Server 2008 oder 7 und Server 2008 R2.

Edit: Anderst mache ich es in meinem SystemInfo doch auch nicht.
Rolf Warnecke
  Mit Zitat antworten Zitat
Benutzerbild von Luckie
Luckie

 
Delphi 2006 Professional
 
#899
  Alt 8. Aug 2009, 18:56
Hm, könnte ich mir mal angucken.
Michael
  Mit Zitat antworten Zitat
Daniel

 
Delphi 10.4 Sydney
 
#900
  Alt 1. Mai 2010, 11:51
Zitat von Luckie:
Der XP-Usermanger bekommt eine eigene Domain: http://www.xpusermanager.de.
Daniel R. Wolf
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 90 von 120   « Erste     4080888990 9192100     Letzte »    


Forumregeln

Es ist dir nicht erlaubt, neue Themen zu verfassen.
Es ist dir nicht erlaubt, auf Beiträge zu antworten.
Es ist dir nicht erlaubt, Anhänge hochzuladen.
Es ist dir nicht erlaubt, deine Beiträge zu bearbeiten.

BB-Code ist an.
Smileys sind an.
[IMG] Code ist an.
HTML-Code ist aus.
Trackbacks are an
Pingbacks are an
Refbacks are aus

Gehe zu:

Impressum · AGB · Datenschutz · Nach oben
Alle Zeitangaben in WEZ +1. Es ist jetzt 16:22 Uhr.
Powered by vBulletin® Copyright ©2000 - 2024, Jelsoft Enterprises Ltd.
LinkBacks Enabled by vBSEO © 2011, Crawlability, Inc.
Delphi-PRAXiS (c) 2002 - 2023 by Daniel R. Wolf, 2024 by Thomas Breitkreuz