Dienste und Nachrichten

[nitschchedu]

Erstmal Hallo alle zusammen

Ich will von der Einen Anwendung den Dienst einen Stream schicken und der Dienst soll der Anwendung einen Stream schicken.

Habe auch was gefunden Hier bloss, wie bekommt der Service die
nachricht ?

Delphi-Quellcode:

procedure WMCopyData(var Msg: TWMCopyData); message WM_COPYDATA;  <---

:gruebel:

Ach ja das ganz will ich alls klasse schreiben Siehe Hier.

[nitschchedu]

* push * :roteyes:

[Daniel G]

Hi nitschchedu,

Das Pushen ist erst nach 24 Std. erlaubt. :warn: :wink:

[Sunlight7]

Obwohl ich bei Diensten nicht mitreden kann, aber pushen ist erst nach 24 Stunden erlaubt :zwinker:

Edit: Ich geb's auf mit den roten Kästen, die mögen mich nicht und weichen mir aus :cry:

[nitschchedu]

Wirklich ? :gruebel: Ok wusste ich nicht. Sorry Leute :oops: Wird nicht wieder vorkommen !

[nitschchedu]

In Delphi Hilfe steht das TServiceApplication Die Windows Message bekommt. Hat einer ne Ahnung wie das geht ?

[Bernhard Geyer]

Ich denke das wird nur gehen wenn der Dienst das Recht "Interaktion mit Desktop" hat. Ansonsten bekommt er eine eigenen Desktop und mit dem werden die Message nicht ausgetauscht.

Was spricht dagegen mit Named Pipes oder "puren" Sockets zu arbeiten?

[Luckie]

Da ein Service kein Fenster hat, wirst du wohl keine Fensternachrichten schicken können. Denk dir was anderes aus: Pipes oder MemoryMappedFiles.

[nitschchedu]

Biste dir ganz sicher :gruebel: denn durch die klasse (oben der Linke(Hook)) bekommt der Servic doch ein Message. Warum hat er sonst auf die WM_TIMECHANGE reagiert ?

[nitschchedu]

Hey Luckie weißt du wie ich WM_COPYDATA Hooken kann ? vom Fromular. :mrgreen: :gruebel:

[Luckie]

Warum denn so umständlich? Ich habe dir doch Alternativen genannt, wenn WM_COPYDATA nicht geht.

[nitschchedu]

Ok Wenn du mir Erklärst wie ich das im Dienst und in der Anwendung Programmiere dann mache ich das (MemoryMappedFiles Hört sich besser an)!? :mrgreen:

[nitschchedu]

Habe noch mal darüber nachgedacht und musste feststellen an einem Tut von Luckie das ich wieder Windows Message brauche.

Zitat:

Sender:
{
Author : Michael Puff - http://developer.luckie-online.de
Date : 2005-03-07
License : PUBLIC DOMAIN
}

....

const
WM_MMFNOTIFY = WM_USER + 1;

type
TTReceiver = class(TForm)
Edit1: TEdit;
CheckBox1: TCheckBox;
Edit2: TEdit;
private
{ Private declarations }
procedure WMMMFNOTIFY(var msg: TMessage); message WM_MMFNOTIFY;
public
{ Public declarations }
end;

Also geht MemoryMappedFiles auch nicht wirklich.