AGB  ·  Datenschutz  ·  Impressum  







Anmelden
Nützliche Links
Registrieren
Zurück Delphi-PRAXiS Programmierung allgemein Programmieren allgemein Maschinenstatus via LED visualisieren
Thema durchsuchen
Ansicht
Themen-Optionen

Maschinenstatus via LED visualisieren

Ein Thema von Ykcim · begonnen am 22. Mai 2023 · letzter Beitrag vom 6. Jun 2023
Antwort Antwort
Seite 1 von 3  1 23      
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
826 Beiträge
 
Delphi 10.4 Sydney
 
#1

Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 15:26
Hallo Zusammen,
ich habe schon einiges gegoogelt und auch die Suche der DP bemüht, habe aber noch keinen Ansatzpunkt gefunden.

Ich suche eine LED-Leuchte (rund oder als Bar), die ich via Delphi-Programm (welches ich schreiben möchte) steuern kann.
Der Hintergrund ist, dass ich den Maschinestatus aus einer Datenbank bekomme und diesen gerne in der Halle und in einem Büro mit unterschiedlichen Farben visualisieren möchte.
Meine Vorstellung ist, dass ich die Leuchte via Netzwerk, oder via WLAN erreichen kann.

Mein Problem: Ich programmiere zwar schon ein paar Jahre (hauptsächlich Datenbank-Anwendungen), aber ich habe überhaupt keine Ahnung von der IoT Steuerung mit Delphi.

Ich habe weder eine Idee, welche Hardware ich nehmen kann, noch welche Delphi Komponenten oder externe Komponenten ich dazu benötigen würde.

Meine Entwicklungsumgebung beschränkt sich heute auf Delphi 10 Entp und den TMS-Komponenten.

Ich vermute, dass es hier einige gibt, die solche Aufgabenstellungen schon öfter realisiert haben. Ich würde mich sehr freuen, wenn Ihr mir einen Schubs gebt.

Vielen Dank
Patrick
Patrick
  Mit Zitat antworten Zitat
TurboMagic

Registriert seit: 28. Feb 2016
Ort: Nordost Baden-Württemberg
2.942 Beiträge
 
Delphi 12 Athens
 
#2

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 15:38
Hallo,

evtl. nicht der perfekte Ansatz, aber einen den ich schon verwendet habe:
es gibt von Advantech eine USB Relaisbox, mittels der man elektrische
Verbraucher Schalten kann. Das Ding hat dann allerdings gleich 8 Relais
und 8 Digitaleingänge (die könnte man für Externe Schalter die was im Programm
bewirken sollen benutzen). Schaltleistung des Relais ist glaube ich 60W.

Erhältlich z.B. hier:
https://www.sphinxcomputer.de/zeige_...SAAEgKOyvD_BwE

Grüße

TurboMagic
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#3

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 15:39
Es gibt was von mehreren Herstellern. (eine Winzige sogar von Apple, aber die funktioniert offiziell nur an Apples)
https://www.cleware-shop.de/USB-SignalLicht-1
https://de.otennlux.com/2021-new-mul...light_p81.html


Oder einfach eine "normale" Signalleuchte und einen kleinen Arduino/ESP + Relais oder TTL-Treibermodul.
[edit] Und jupp, natürlich geht auch ein Transistor-/Relais-Box. (das Programm für Arduino/ESP zu schreiben ist aber auch nicht schwer) [/edit]

Auch einige USB-SerialTTL-Module (COMPorts) haben steuerbare aus Ein-/Ausgänge (in=CTS out=RTS/DTR), welche sich einfach manuell oder über SerialPort-Komponenten steuern lassen.
CreateFile + MSDN-Library durchsuchenEscapeCommFunction https://www.xanthium.in/Controlling-...sing-Win32-API
Und auch z.B. USB-Serial-Module mit FTDI232 und CH341 haben noch zusätzliche frei programmierbare Ports (sind aber nicht überall zu Pins gelegt), welche nicht nur Binär, sondern aus I²C, SPI und mehr können, aber dafür braucht man eine spezielle API bzw. DLL.
https://www.reichelt.de/entwicklerbo...3-p266054.html
https://www.amazon.de/Q-BAIHE-All-on.../dp/B01GRLZPKK
https://ftdichip.com/wp-content/uplo...-devices-1.pdf
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (22. Mai 2023 um 20:39 Uhr)
  Mit Zitat antworten Zitat
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
826 Beiträge
 
Delphi 10.4 Sydney
 
#4

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 18:28
Hallo Zusammen,

vielen Dank für die Anregungen. Habe eine Menge Wörter / Abkürzungen gefunden, mit denen ich mich erst einmal vertraut machen muss. Das wird eine Weile dauern, ich melde mich dann wieder

Vielen Dank
Patrick
Patrick
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#5

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 21:21
Mal eine doofe Frage:
Aus wieviel Meter Entfernung soll man so eine LED in der Produktionshalle sehen?
Schreib doch einfach ein normales Delphiprogramm, das in beliebigen Farben einen kompletten Bildschirm ausfüllt und häng einen beliebig großen oder kleinen Monitor in der Halle auf, der das anzeigt.
Wenn's sparsam sein soll, mach es mit raspberry pi oder kleiner und über ein Linux Script / Webseite.
Ein beliebiger Funkschalter könnte zumindest einen Zustand per Leuchtmittel anzeigen. Eine WLAN Lampe ala Philips Hue kann auch mehrere Zustände. Usw. usw.
Das hast Du an einem halben Tag fertig und ist bestimmt billiger als Deine Programmierarbeit.

Mag sein, dass es alles für Dein Problem nicht passt, ist nur eine Idee.
Gruß, Jo
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#6

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 22:01
@jobo brachte mich auch grad auf eine weitere Idee.

Die Lampen mit Schalter und da einen SwitchBot drankleben,
ähhhhhhh, ich meinte ...


Die Shelly gibt mit 1 bis 4 Ausgängen (für 5V, 12V-24V oder 230V)
und sie lassen sich auch ohne Cloud oder App direkt mit einer URL über WLAN ansteuern. (TCP/IP bzw. TIdHTTP oder TNetHTTPClient oder mit einer REST-Komponente)

z.B.
Shelly RGBW2 (anstatt einem LED-Streifen bis zu 4 einzelne 12V-LEDs/LEDGruppen, siehe 2. Bild)
Shelly Uni
Shelly Pro ***
Shelly Plus 2PM
oder
Shelly Duo
Shelly Bulb RGBW

https://www.shelly.cloud/de/products/shop#unfiltered
bei Mediamarkt, Amazon, ............



z.B. für Shell PlugS (bei anderen Shelly mit Relais oder digitalen Ausgängen ähnlich)
http://{ip-oder-name}/relay/0?turn=on
http://{ip-oder-name}/relay/0?turn=on&timer=30
http://{ip-oder-name}/relay/0?turn=off
http://{ip-oder-name}/relay/0?turn=toggle

Und über HTTP-GET lässt sich der Status (on/off/stromverbrauch) als JSON abfragen
https://shelly-api-docs.shelly.cloud...lly-plug-plugs
runter scrollen und siehe (via TCP/IP oder HTTP an Port 80 des {ip-oder-name} )
GET /status (ich glaub das ging immer, auch wenn der Zugriff via Name+Password gesichert ist)
GET /settings
GET /settings/relay/0
GET /relay/0
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.

Geändert von himitsu (22. Mai 2023 um 22:27 Uhr)
  Mit Zitat antworten Zitat
Ykcim

Registriert seit: 29. Dez 2006
Ort: NRW
826 Beiträge
 
Delphi 10.4 Sydney
 
#7

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 23:06
Zitat:
Die Shelly gibt mit 1 bis 4 Ausgängen (für 5V, 12V-24V oder 230V)
und sie lassen sich auch ohne Cloud oder App direkt mit einer URL über WLAN ansteuern. (TCP/IP bzw. TIdHTTP oder TNetHTTPClient oder mit einer REST-Komponente)
Das werde ich weiterverfolgen. Da sehe ich Chancen, dass ich das in absehbarer Zeit hinbekomme. Denn auch wenn die Anwendungen bei meinem Arbeitgeber zum Einsatz kommen, bin ich ein Hobby-Programmierer und habe während meiner Arbeitszeit eigentlich keine Zeit dafür...

Das ist eine coole Idee! Werde mir mal die Komponenten beschaffen und dann ein bißchen ausprobieren!

VIELEN DANK!
Patrick
Patrick
  Mit Zitat antworten Zitat
Benutzerbild von himitsu
himitsu
Online

Registriert seit: 11. Okt 2003
Ort: Elbflorenz
44.071 Beiträge
 
Delphi 12 Athens
 
#8

AW: Maschinenstatus via LED visualisieren

  Alt 22. Mai 2023, 23:31
Zum Einrichten gibt es die App (Handy),
aber es geht manuell auch einfach via Browser im PC/Handy.
Knopf lange drücken, dann starten die Module einen WLAN-AP.
Einfach dein WLAN damit verbinden und dann im Browser http://192.168.33.1 (später einfach den GeräteName nehmen oder die IP aus Explorer->Netzwerk oder siehe Router/FritzBox)

Dort kannst dann mindestens den WLAN-Zugang einrichten, damit sich die Shelly mit deinem Router verbindet, sowie Cloud und Co. deaktivieren.
Zusammen mit der Hilfe zur APIv1 sollte sich in der Oberfläche alles finden lassen. (Einrichtung per Browser und nicht über deine Anwendung ist das Einfachste)

Über die Actions kannst du dich auch vom Shelly anrufen lassen, z.B. bei Knopfdruck oder Statusänderung.
http://{ip-oder-name-deines-httpservers}:port/irgendwas kommt dann z.B. im TIdHTTPServer.OnCommandGet rein.
Neuste Erkenntnis:
Seit Pos einen dritten Parameter hat,
wird PoSex im Delphi viel seltener praktiziert.
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#9

AW: Maschinenstatus via LED visualisieren

  Alt 23. Mai 2023, 07:46
Wenn Du mit der Shelly anfängst, dann schau Dir mal an, wie man die für den lokalen Betrieb umstellen kann und nicht über die Cloud des Anbieters gehen muss.
Hier sind Hinweise:
https://www.heise.de/ratgeber/Smart-...e-6119082.html
Gruß, Jo
  Mit Zitat antworten Zitat
jobo

Registriert seit: 29. Nov 2010
3.072 Beiträge
 
Delphi 2010 Enterprise
 
#10

AW: Maschinenstatus via LED visualisieren

  Alt 23. Mai 2023, 07:49
Anbieter Cloud, das meintest Du wahrscheinlich auch:

Dort kannst dann mindestens den WLAN-Zugang einrichten, damit sich die Shelly mit deinem Router verbindet, sowie Cloud und Co. deaktivieren.
Gruß, Jo
  Mit Zitat antworten Zitat
Antwort Antwort
Seite 1 von 3  1 23      


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 10:10 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