Delphi-PRAXiS
Seite 1 von 2  1 2      

Delphi-PRAXiS (https://www.delphipraxis.net/forum.php)
-   Win32/Win64 API (native code) (https://www.delphipraxis.net/17-win32-win64-api-native-code/)
-   -   Delphi Tray Icon, Service und Vista (https://www.delphipraxis.net/81242-tray-icon-service-und-vista.html)

mwitzsche 23. Nov 2006 09:03


Tray Icon, Service und Vista
 
Ich teste gerade Dienste (D7 + SVCom) unter Vista Final. Allerdings gibt es da jetzt ein Problem, es werden keine Tray Icons mehr angezeigt. Ich habe mit CoolTrayIcon und anderen Komponenten getestet. Auch eigener API Code greift nicht. Unter XP/NT/2003 passt alles. Muss also an Vista liegen. Hat sonst noch jemand das gleiche Problem oder schon eine Lösung?

Danke.

sakura 23. Nov 2006 09:06

Re: Tray Icon, Service und Vista
 
Zitat:

Zitat von mwitzsche
Muss also an Vista liegen. Hat sonst noch jemand das gleiche Problem oder schon eine Lösung?

Microsoft hat endlich die Lücke geschlossen und lässt eine Interaktion von NT-Diensten mit dem Desktop nicht mehr zu, da dieses eine der größten Sicherheitslücken dieser überhaupt ist. Da musst Du einen anderen Ansatz wählen: i.A.: Einen Dienst der mit einer zweiten Desktopanwendung via Hier im Forum suchenPipes kommuniziert.

...:cat:...

mwitzsche 23. Nov 2006 09:14

Re: Tray Icon, Service und Vista
 
Danke erst mal für die fixe Antwort. Ich hatte schon so eine Vermutung, es gab wohl auch mal einen Artikel dazu. Leider habe ich den verlegt. Da es aber in Vista die Einstellung für den Dienst (LocalAccount + Interaktiv) noch gibt, dachte ich, es müsste auch funktionieren :-) Schöner Mist.

SirThornberry 23. Nov 2006 10:03

Re: Tray Icon, Service und Vista
 
uj, da muss ich mir ja Vista doch noch mal installieren. Das würde ja bedeuten das SetThreadDesktop etc. nicht mehr funktioniert?! Oder kann man darüber vielleicht doch noch auf den Desktop zugreifen (also wenn man einen Thread der Anwendung auf den Userdesktop befördert)

spidergen 6. Mär 2007 08:03

Re: Tray Icon, Service und Vista
 
Ich versuche derzeit auch, einen Dienst unter Vista ans laufen zu bekommen. Mir ist bewusst, dass diese nicht mehr interaktiv sein dürfen. Jedoch bekomme ich schon beim Versuch, den Dienst zu installieren eine Fehlermeldung "Dienstname.exe funktioniert nicht mehr".

Was muss ich weiterhin bei der Erstellung von Diensten für Vista beachten?

Luckie 6. Mär 2007 09:27

Re: Tray Icon, Service und Vista
 
Guck mal hier: http://www.microsoft.com/whdc/system..._Services.mspx und hier: http://www.microsoft.com/whdc/system.../services.mspx

spidergen 6. Mär 2007 10:00

Re: Tray Icon, Service und Vista
 
Super, danke!

Leider bekomme ich es immernoch nicht ans laufen. Selbst ein noninteraktiver Dienst, der ohne jeglichen Inhalt (s.u.) kompiliert wurde, ist unter Vista bisher bei mir nicht lauffähig. Ich denke daher, dass es nicht an der Programmierung der Funktionalitäten scheitert, sondern an der "Deklaration" des Dienstes selbst.

Delphi-Quellcode:

unit Unit2;

interface

uses
  Windows, Messages, SysUtils, Classes, Graphics, Controls, SvcMgr, Dialogs;

type
  TService2 = class(TService)
  private
    { Private-Deklarationen }
  public
    function GetServiceController: TServiceController; override;
    { Public-Deklarationen }
  end;

var
  Service2: TService2;

implementation

{$R *.DFM}

procedure ServiceController(CtrlCode: DWord); stdcall;
begin
  Service2.Controller(CtrlCode);
end;

function TService2.GetServiceController: TServiceController;
begin
  Result := ServiceController;
end;

end.
Der Dienst soll Informationen mit einer anderen Anwendung austauschen. Da interaktive Dienste bei Vista ja nicht mehr gestattet sind, dachte ich also am Memory Mapped Files (MMF). Unter WinXP funktioniert das auch alles.

Sehe ich das richtig, dass MMF nicht der richtige Weg zur Interprozesskommunikation in Vista ist?

Tyrael Y. 6. Mär 2007 10:13

Re: Tray Icon, Service und Vista
 
Microsoft schlägt vor nur noch über RPC oder Pipes zwischen Programmen zu kommunizieren.

Wenn man zB komplexere Dialoge aus einem Dienst heraus anzeigen möchte, sollte man zusätzlich zum Dienst eine zweite Applikation erstellen. Diese Applikation läuft unter dem User-Desktop und erhält durch zB eine Pipe die Nachrichten, welcher Dialog jetzt angzeigt werden soll.

Der Service läuft unter Vista immer in dem sogennannten Desktop0, alle User-Desktops aufsteigend im Desktop1, 2 usw.

Zu beachten ist dabei auch die Registry.
Dort sollte man sehr drauf achten, daß beide Programme auf die Werte auch zugreifen können. Der Service wird es in der Regel können, aber wenn der Service zB einen Registrywert erstellt hat, kann es die Applikation nicht unbedingt lesen.
Es sollte darauf geachtet werden, daß solche Werte in einem Registryzweig stehen auf die beide Zugriff haben, zumindest lesend.

spidergen 6. Mär 2007 11:12

Re: Tray Icon, Service und Vista
 
Ok, die Interprozesskommunikation werde ich dann wohl mal auf Pipes umstricken.

Wisst ihr nun zufällig auch noch, warum sich der Dienst nicht starten lässt?

Dezipaitor 14. Mär 2007 18:22

Re: Tray Icon, Service und Vista
 
ich kann mich noch dunkel erinnern, wie es UltraVNC macht.

1. Service installieren (TCB) und Thread erstellen
2. Eingabedesktop suchen (OpenInputDesktop) und für Thread setzen (SetThreadDesktop)
3. GetPixel(GetDC(Null)) verwenden um Pixel zu lesen.

Problem : Funktioniert nicht mehr unter Vista, weil SystemDienste nun in einer eigenen Session 0 (nicht interaktiv) laufen.
Was kann man machen?

A. Mirror Treiber
B. Über Einschleussen von Prozessen in die interaktive Sitzung (für jeden Desktop, auch wenn er später erstellt wird)
Kommunikation über Pipes, Shared Memory, Sockets oder RPC.

Keine Gewähr zur Funktion!

P.S.
Ich frage mich gerade, ob mit Session, LogonSession gemeint ist oder WinStation oder was anderes?
Kennt jemand eine grafische Darstellung, wie Sessions (evt. LogonSessions), WinStation und Desktops in Beziehung stehen?

Zu B.
Wenn Session = LogonSession könnte man ja auch einen Thread in die Session 1 oder höher impersonieren, und damit auf den Desktop zugreifen können.
siehe diesen MSDN Artikel zu FUS


Alle Zeitangaben in WEZ +1. Es ist jetzt 10:27 Uhr.
Seite 1 von 2  1 2      

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