Who's logged on?

[turboPASCAL]

Solch ein Template hat Luckie in seinen Tut's. (ausserem ist das so wenig das man ihn schnel getippt hat ;) )

[Luckie]

Aktuelle Version: 1.0.0.38

Das mit der mitlafenden Zeit war nichts. :roll: Ich habe es wieder rausgenommen.

@MackHack: Gibt es doch schon auf meiner Homepage: http://www.michael-puff.de/dirindex..../Delphi/Demos/ -> Template.zip
Aber das gehört nicht hier her.

[EDatabaseError]

Ich habe was gefunden was bezüglich des Dialogproblems helfen könnte.

In dem Remotedesktopverbindungs Programm von MS die Computer Combobox aufmachen und auf <Nach weiteren Computern suchen...> klicken. Das dürfte der gesuchte Dialog sein ... oder.


Mfg

[Luckie]

Welchen Dialog meinst du? Ich will keinen Computer suchen, sondern nur eine Domain öffnen.

[EDatabaseError]

Also in diesem Dialog wird meine Workgroup und die PCs angezeigt

[Luckie]

Ich brauche aber nur die Domain: http://www.delphipraxis.net/internal...=741773#741773

[Mackhack]

Zitat:

Zitat von Luckie

@MackHack: Gibt es doch schon auf meiner Homepage: http://www.michael-puff.de/dirindex..../Delphi/Demos/ -> Template.zip
Aber das gehört nicht hier her.

Du hast doch darueber selbst hier geschrieben warum also nicht? Regelverstoss? Und ich habe auf deiner HP geschaut aber unter Template hab ich es mir einfach nicht vorgestellt zu finden. Sorry also an dieser Stelle!

[uwewo]

Hi Luckie,

habe nun die neue Version getestet aber leider tritt noch immer eine Exception auf.

Habe mir den Source nocheinmal angeschaut und mal Zeilenweise durchlauen lassen, hier ensteht der Fehler:

Datei: LoggedOn
Zeile: 294

Delphi-Quellcode:

  s := Format(rsFinishMachine, [UserList.Count]);
  SendDlgItemMessage(hApp, IDC_SB, SB_SETTEXT, 0, Integer(PChar(s)));

  FreeMemory(p);
  Result := 0;
end;

Das seltsame ist, s := Format(rsFinishMachine, [UserList.Count]); wird noch abgearbeitet danach springt er allerdings direkt auf end;

Deshalb auch die Exception, kein SendDlgItemMessage, FreeMemory, Result.

[uwewo]

Hallo Luckie,

noch ein kleiner Nachtrag. Die Version funktioniert, wenn ich aus unserem Netzwerk eine Workstation auswähle. Bei der Auswahl eines Servers habe ich allerdings besagtes Phänomen, wo alle Zeilen nach

Delphi-Quellcode:

s := Format(rsFinishMachine, [UserList.Count]);

nicht mehr abgearbeitet werden.(Nur bei Servern)

Das Problem beim scannen der Domain könnte darin liegen, dass unsere Server über VPN in ganz Europa verbunden sind.

Vielleicht hilft dir das ja weiter.

Zitat:

Zitat von Luckie

[
Aber eine Frage habe ich noch: Was ist das für ein Benutzer mit dem Rechnernamen und dem $-Zeichen am Ende?

Diesen User habe ich auch, siehe ScreenShot. Ich kann allerdings nur ein Vermutung äussern, in unserem Netzwerk ist für jeden User sowohl ein Lokales als auch ein Roaming Profile erstellt.

Siehe dazu ScreenShot2.jpg

[Luckie]

Mit welcher Schatlfläche wählst du den Server aus? Um einen einzelenen Rechner zu scannen musst du "Scan machine" nehmen.

Nein der Benutzer mit dem Rechnernamen und dem $ ist der Rechner selber. Ab Windows2000 werden auch Rechner als Benutzer angesehen.