Kommunikation zwischen zwei Delphiprogrammen

[TurboMagic]

Dazu kurz zwei Stichworte:
Named Pipe
Sockets, entweder TCP oder UDP

Für letzteres entweder Indy nehmen, ist aber synchron oder
ICS (siehe Tools/GetIt), das wäre nicht blockierend asynchron.

Grüße
TurboMagic

[Bernhard Geyer]

Zitat:

hier also das Betriebssystem zu umgehen

Ein "umgehen" des Betriebssystem ist hier nicht möglich.
Du kannst hier nur versuchen einen Weg zu finden, welcher z.B. nicht nur unter Windows verfügbar ist, sondern auch auf Linux gehen würde.

[dummzeuch]

Die einfachste und in der Regel idiotensichere Möglichkeit, Daten von einem Programm an ein anderes zu übergeben, ist via Dateien.

Beispiel: Es gibt ein Verzeichnis A mit Eingabedateien und Verzeichnis B mit Ausgabedateien.
Programm 1 schreibt seine Daten, die berechnet werden sollen, in Verzeichnis A, Programm 2 wartet darauf, dass in Verzeichnis A Dateien angelegt werden, liest sie, verarbeitet sie und schreibt das Ergebnis in Verzeichnis B. Programm 1 wartet darauf, dass seine Ergebnisse in Verzeichnis B erscheinen und liest sie dann aus.

Das ist sicherlich nicht die schnellste, eleganteste und sicherste Lösung, aber es lässt sich wunderbar debuggen und testen. Ach ja, und es funktioniert auch auf einem Share im Netzwerk.

Man darf sich nur nicht von irgendwem erwischen lassen, dass man so eine simple Lösung verwendet statt irgendeines "Frameworks" oder einer Datenbank (wobei die schon Old School sind) oder eines "Microservices".

[Mavarik]

Die einfachste Lösung wäre doch per http...

Die eine App mach einen http oder REST Server auf... Die andere kann dann einfach per JSON die Anfrage senden und so auch die Antwort erhalten.

Mavarik

PS.: Also im Prinzip das, was TurboMagic schon geschrieben hat, nur einen Layer mehr.

[TurboMagic]

Auch das sollte mit ICS gehen oder vermutlich auch mit Indy, wenn es blockieren darf.

[Rolf Frei]

Ich nutze hierfür Namend Pipes. Dafür gibt es eine Freeware Komponente, die das Ganze sehr einfach machen. Diese Freeware Komponente habe ich dir mal angehängt. Ich nutze dies schon sehr lange zum Steuern eines Windwosdienstes über ein Trayicon Programm.

[rwb]

Ich bin begeistert, herzlichen Dank an alle.
Jetzt werde ich ersteinmal alle Vorschläge überdenken und habe dann bestimmt weitere Fragen.
Ich wünsche allen ein tolles bzw besinnliches Wochenende.

RWB

[Michael II]

Zitat von Rolf Frei:

Ich nutze hierfür Namend Pipes. Dafür gibt es eine Freeware Komponente, die das Ganze sehr einfach machen. Diese Freeware Komponente habe ich dir mal angehängt. Ich nutze dies schon sehr lange zum Steuern eines Windwosdienstes über ein Trayicon Programm.

Funktioniert super - besten Dank!

Problem:
Es kann bei TPipeServer beim Beenden der Verbindung (Active := false) ein Speicherleck entstehen:
Soweit ich sehe passiert es, wenn ein TPipeClient Disconnect aufruft und TPipeServer "gleichzeitig" mittels Write diesem Client Daten D übermittelt und dann Active := false setzt.
In der Methode TPipeServer.Write wird via AllocPipeWrite für D Speicher reserviert. DisposePipeWrite wird aber für diesen Speicher dann nicht aufgerufen => Leck.
(EurekaLog 7.11.0.1)

Lösung:
Code der Komponente anpassen.

Workaround (Lösung wäre schöner ):
Bei 1-1 Verbindung: TPipeServer schliesst die Verbindung.
Bei 1-n Verbindungen: Flusskontrolle einbauen.

[Michael II]

Zitat von Rolf Frei:

Ich nutze hierfür Namend Pipes. Dafür gibt es eine Freeware Komponente, die das Ganze sehr einfach machen. Diese Freeware Komponente habe ich dir mal angehängt. Ich nutze dies schon sehr lange zum Steuern eines Windwosdienstes über ein Trayicon Programm.

Der verlinkte Code ist für Win32. Hat jemand diese beiden Files mal für Win64 übersetzt?

(Ich nutze diese Komponenten für die Kommunikation zwischen zwei Apps auf dem gleichen Gerät. Früher habe ich tcp via ICS verwendet; da gab's halt immer wieder Menschen, welche ihre Firewall o.ä. nicht bedienen konnten und sich aussperrten. => Der Support ist in diesem Bereich von mehreren Stunden pro Jahr auf 0 gefallen.)

[rwb]

Hallo,
Ihre Lösung gefällt mir, ich könnte eine Textdate mit den Daten auf jeweils einer Zeile anlegen. Die Datei hätte mehrere Zeilen. Damit wäre auch eine Batchverarbeitung möglich. Dabei geht es mir dann auch nicht um Schnelligkeit.
Aber hier liegt der Haken:
>Programm 1 schreibt seine Daten, die berechnet werden sollen, in Verzeichnis A, Programm 2 wartet darauf, dass in Verzeichnis A Dateien angelegt werden,
Es ist das warten von Programm 2, also die Überwachung eines Verzeichnisses. Ich habe einen ziemlichen Teil des Sonntags damit verbracht dafür eine praktikable Lösung zu suchen. Hier in der Delphi-Praxis gibt es eine ganze Reihe von Beiträgen zu diesem Thema. Aber sie sind ziemlich alt mit Verweisen auf Webseiten die nicht mehr existieren mit anderen gebrochenen Links und Beiträgen die Probleme aufzeigen aber keine Lösung.
In der JCVL gibt es die Komponenten JvChangeNotify und TJvFolderMonitor. Leider brach die Installation der JXVL mit einem Fehler ab.
Hiermit komme ich also zur Zeit auch nicht weiter. Es gibt eine Watch_it.exe die Verzeichnisse überwacht und Aktionen auslöst. Ich brauch aber eine Unit oder Komponente die ich einbinden kann.
Wie haben Sie das gelöst?

>Man darf sich nur nicht von irgendwem erwischen lassen, dass man so eine simple Lösung verwendet statt irgendeines "Frameworks" oder einer Datenbank (wobei die >schon Old School sind) oder eines "Microservices".
Da habe ich keine Angst
Mit besten Grüßen
RWB