Habe mir ein Programm geschrieben um
über einen Normalen Win Pc oder win table - LCD4linux zu zeigen
Das ganze ist mit autoit geschrieben und für viele von euch denk leicht zum verbessern.
Für die die kein Display für lcd4linux kaufen möchten und einen schwachen pc mit display über haben
finde ich ist das eine geile lösung
Viel spass damit
lcd4linux3_source.zip = die au.3 datei zum verändern des Programms ( autoit)
lcd4linux_win.zip = fertig ausgabe (kein Virus drinnen aber wegen autoit programmen kann schon mal was jammern )
settings.ini müsst ihr hald abändern !
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Icon=ico\lcd.ico
#AutoIt3Wrapper_Outfile=ausgabe/lcd4linux_win_lcd.exe
#AutoIt3Wrapper_Compression=4
#AutoIt3Wrapper_Res_ProductVersion=1.0
#AutoIt3Wrapper_Res_Field=Productname|Gratis Demo
#AutoIt3Wrapper_Res_Description=LCD4Win Anzeige
#AutoIt3Wrapper_Res_Comment=by sandmaenchen.com
#AutoIt3Wrapper_Res_Fileversion=1.0.0.24
#AutoIt3Wrapper_Res_Fileversion_AutoIncrement=y
#AutoIt3Wrapper_Res_LegalCopyright=sandmaenchen.com
#AutoIt3Wrapper_Res_Language=3079
#AutoIt3Wrapper_Run_Tidy=y
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
$breite = IniRead(@ScriptDir & "/settings.ini", "Einstellungen", "breite", "800")
$laenge = IniRead(@ScriptDir & "/settings.ini", "Einstellungen", "laenge", "600")
$port = IniRead(@ScriptDir & "/settings.ini", "Einstellungen", "port", "80")
$ip = IniRead(@ScriptDir & "/settings.ini", "Einstellungen", "ip", "10.0.0.1")
$display = IniRead(@ScriptDir & "/settings.ini", "Einstellungen", "display", "3")
HotKeySet("{ESC}", "_exit")
ConsoleWrite("http://" & $ip & "/" & $port & "/lcd4linux/?file=dpf" & $display & ".png" & @CRLF)
ConsoleWrite($breite & "/" & $laenge & @CRLF)
lcd()
Func lcd()
Local $oIE = ObjCreate("Shell.Explorer.2")
GUICreate("lcd4linux_win_lcd >>>> ESC beeendet Programm <<<< by sandmaenchen", $breite, $laenge, $WS_POPUP, 1, 1, 1)
GUISetBkColor(0x000000)
GUICtrlCreateObj($oIE, -1, -1, $breite, $laenge)
$oIE.navigate("http://" & $ip & ":" & $port & "/lcd4linux/?file=dpf3.png")
$oIE.document.body.scroll = "no"
$oIE.document.body.style.border = 0
GUISetState(@SW_SHOW)
While 1
$iMsg = GUIGetMsg()
Select
Case $iMsg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
GUIDelete()
EndFunc ;==>lcd
Func _exit()
Exit
EndFunc ;==>_exit
Alles anzeigen
Bild unten:
Linker bildschirm istn samsung 72H mit live katzen klappen cam
dann ein Perl für die aktuelle C° anzeige
und halt ein pc display auf einem win7 pc
Schade ist das man webcams nicht so wirklich live anzeigen kann.
derzeit ladet das display nur ein foto(1sec)