Danke, hab ich gelöst.
Gruß
Wuff
Danke, hab ich gelöst.
Gruß
Wuff
Moin,
mit der Listview war eine gute Idee.
Habe aber noch ein Problem.
In der offeneZeiten.ini (am Anhang) steht der Schlüssel [hans] sowie der name=hans mit tag=9 und tag=13.
Es wir aber nur der tag=9 in die Listview übernommen.
Wie kann ich es in der INI oder imProgramm lösen, daß auch der tag=13 übernommen wird?
Gruß
Wuff
Anhang: offeneZeiten.ini
[hugo]
name=hugo
tag=12
[hugoline]
name=hugoline
tag=11
[ulla]
name=ulla
tag=10
[hans]
name=hans
tag=9
tag=13
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <GuiListView.au3>
$GUI = GUICreate('test', 800, 550, -1, -1)
$ListView = GUICtrlCreateListView("", 56, 208, 433, 201)
GUISetState(@SW_SHOW)
; Fügt die Spalten hinzu
_GUICtrlListView_InsertColumn($ListView, 0, "Monteur", 100)
_GUICtrlListView_InsertColumn($ListView, 1, "1", 24)
_GUICtrlListView_InsertColumn($ListView, 2, "2", 24)
_GUICtrlListView_InsertColumn($ListView, 3, "3", 24)
_GUICtrlListView_InsertColumn($ListView, 4, "4", 24)
_GUICtrlListView_InsertColumn($ListView, 5, "5", 24)
_GUICtrlListView_InsertColumn($ListView, 6, "6", 24)
_GUICtrlListView_InsertColumn($ListView, 7, "7", 24)
_GUICtrlListView_InsertColumn($ListView, 8, "8", 24)
_GUICtrlListView_InsertColumn($ListView, 9, "9", 24)
_GUICtrlListView_InsertColumn($ListView, 10, "10", 28)
_GUICtrlListView_InsertColumn($ListView, 11, "11", 28)
_GUICtrlListView_InsertColumn($ListView, 12, "12", 28)
_GUICtrlListView_InsertColumn($ListView, 13, "13", 28)
_GUICtrlListView_InsertColumn($ListView, 14, "14", 28)
_GUICtrlListView_InsertColumn($ListView, 15, "15", 28)
_GUICtrlListView_InsertColumn($ListView, 16, "16", 28)
_GUICtrlListView_InsertColumn($ListView, 17, "17", 28)
_GUICtrlListView_InsertColumn($ListView, 18, "18", 28)
_GUICtrlListView_InsertColumn($ListView, 19, "19", 28)
_GUICtrlListView_InsertColumn($ListView, 20, "20", 28)
_GUICtrlListView_InsertColumn($ListView, 21, "21", 28)
_GUICtrlListView_InsertColumn($ListView, 22, "22", 28)
_GUICtrlListView_InsertColumn($ListView, 23, "23", 28)
_GUICtrlListView_InsertColumn($ListView, 24, "24", 28)
_GUICtrlListView_InsertColumn($ListView, 25, "25", 28)
_GUICtrlListView_InsertColumn($ListView, 26, "26", 28)
_GUICtrlListView_InsertColumn($ListView, 27, "27", 28)
_GUICtrlListView_InsertColumn($ListView, 28, "28", 28)
_GUICtrlListView_InsertColumn($ListView, 29, "29", 28)
_GUICtrlListView_InsertColumn($ListView, 30, "30", 28)
_GUICtrlListView_InsertColumn($ListView, 31, "31", 28)
$monteurname = IniReadSectionNames(@ScriptDir & "\ini\offeneZeiten.ini"); Alle Sektionen aus Monteur.ini auslesen!
;~ _Arraydisplay($monteurname)
_ArraySort($monteurname, 0, 1, 0)
_ArrayDisplay($monteurname)
For $i = 1 To $monteurname[0]
$nameR = IniRead(@ScriptDir & "\ini\offeneZeiten.ini", $monteurname[$i], "name", "")
MsgBox(0, "", $nameR)
$monteurnameR = IniReadSection(@ScriptDir & "\ini\offeneZeiten.ini", $monteurname[$i])
$tagR = IniRead(@ScriptDir & "\ini\offeneZeiten.ini", $monteurname[$i], "tag", "")
MsgBox(0, "", $tagR)
$index = _GUICtrlListView_AddItem($ListView, $nameR, $monteurname[$i])
_GUICtrlListView_AddSubItem($ListView, $index, $tagR, $tagR)
Next
[/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit][/autoit][autoit]While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Moin,
hat keiner eine Lösung oder einen Ansatz? ![]()
Gruß
Wuff
In der Listbox steht jetzt.
hugo:08
wilma:08
wilma:14
Ich möchte das z.B der Name wilma erkannt wird, da er schon mit "wilma:08" in der listbox steht und dann "wilma:14" dahinter geschrieben wird.
So soll es dann aussehen.
hugo:08
wilma:08,14
Müsste jetzt klar sein.
Gruß
Wuff
#include <Date.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <Array.au3>
#include <GuiListBox.au3>
#region ### START Koda GUI section ### Form=
$Form3 = GUICreate("test", 800, 550, -1, -1)
$List1 = GUICtrlCreateList("", 56, 208, 433, 201)
GUISetState(@SW_SHOW)
Func Tag_version()
Return (@MDAY)
EndFunc ;==>Tag_version
Sleep(100)
$vartag = Tag_version()
Func Monat_version()
Return (@MON)
EndFunc ;==>Monat_version
Sleep(100)
$varmonat = Monat_version()
Local $Readname
Local $firma1
$offeneZeitenINI = @ScriptDir & "\ini\offeneZeiten.ini"
[/autoit][autoit][/autoit][autoit]$sData_offeneZeiten = "name=" & $Readname & @LF & "tag=" & $vartag & @LF & "monat=" & $varmonat & @LF & "firma1=" & $firma1
$monteurname = IniReadSectionNames($offeneZeitenINI); Alle Sektionen aus Monteur.ini auslesen!
_ArrayDisplay($monteurname)
_ArraySort($monteurname, 0, 2, 0)
_ArrayDisplay($monteurname)
For $i = 2 To $monteurname[0]
;~
$array = IniReadSection($offeneZeitenINI, $monteurname[$i])
_ArrayDisplay($array)
$nameR = IniRead($offeneZeitenINI, $monteurname[$i], "name", "")
;~ Msgbox(0,"",$nameR)
$tagList = IniRead($offeneZeitenINI, $monteurname[$i], "tag", "")
;~ Msgbox(0,"",$tagList)
$firma1List = IniRead($offeneZeitenINI, $monteurname[$i], "firma1", "")
;~ Msgbox(0,"",$firma1List)
If $firma1List = "" Then
_GUICtrlListBox_AddString($List1, $nameR & ":" & $tagList)
EndIf
Next
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
EndSwitch
WEnd
Die offeneZeiten.ini:
[hugo 08]
name=hugo
tag=08
monat=09
firma1=
[wilma 08]
name=wilma
tag=08
monat=09
firma1=
[hugo 15]
name=hugo
tag=15
monat=09
firma1=5
[wilma 14]
name=wilma
tag=14
monat=09
firma1=
montage1=
fahrer1=
Gruß
Wuff
Ich will ja nicht hetzen.
Aber hat keiner eine Lösung für mich.
Ist doch oben beschrieben.
Ich lese eine ini Datei aus und erkenne wann ein Wert vorhanden ist oder nicht.
Diese Werte werden von einer Schleife übergeben.
Moin,
ich habe in einer Listbox folgendes stehen.
Hallo,08
Hallo,21
Ich möchte, daß "Hallo" erkannt wird weil es schon drin steht und die Zahlen hinter dem "Hallo" dann hintereinander stehen.
Hallo,08,21
wie kann ich das lösen?
Gruß
Wuff
Moin,
hab es lösen können.
Gruß
Wuff
Das war klar. Es soll aber entweder der 1. oder der 2. Rechenschritt erfolgen.
So jetzt nochmal erklärt. Ich habe mehrere Rechenaufgaben. Die Resultate stehen immer im gleichen Feld "$Input3". Wie kann ich es lösen, damit jeder Rechenschritt für sich abgearbeitet wird?
#include <GUIConstants.au3>
#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("Form1", 633, 451, 193, 115)
$Input1 = GUICtrlCreateInput("", 40, 32, 193, 21)
$Input2 = GUICtrlCreateInput("", 40, 64, 193, 21)
$Input3 = GUICtrlCreateInput("", 40, 88, 193, 21)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $nMsg = $Input1
GUICtrlSetData($Input3, GUICtrlRead($Input1) * GUICtrlRead($Input2))
GUICtrlSetData($Input3, GUICtrlRead($Input1) -2)
EndSwitch
WEnd
Ihr seht es sind mehrere Functionen die mit AdlibRegister("_Samstag_Firma_Montage",150) usw. automatisch rechnen.
Nur die IF Abfrage ist immer gleich. Die daten werden in InputBox Feldern eingegeben.
Func _Samstag_Firma_Montage()
_eingaben_auslesen()
IF $varWochentagText = "Sonnabend" Then
$erstenzwei = IniRead(@ScriptDir & "\ini\daten.ini","stunden","erstenzwei","")
$Summe = $Rfirma1 + $Rmontage1 - $erstenzwei
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
GUICtrlSetData($p25_1,$erstenzwei)
IF $Summe >0 Then
GUICtrlSetData($p40_1,$Summe)
ELSE
GUICtrlSetData($p40_1,"")
GUICtrlSetData($p25_1,"")
endif
Endif
EndFunc
Func _Samstag_Probefahrt()
_eingaben_auslesen()
IF $varWochentagText = "Sonnabend" Then
$Summe = $Rprobefahrt1
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
IF $Summe >0 Then
GUICtrlSetData($p0_1,$Summe)
ELSE
GUICtrlSetData($p0_1,"")
endif
$Summe = $Rprobefahrt2
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
IF $Summe >0 Then
GUICtrlSetData($p0_2,$Summe)
ELSE
GUICtrlSetData($p0_2,"")
endif
$Summe = $Rprobefahrt3
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
IF $Summe >0 Then
GUICtrlSetData($p0_3,$Summe)
ELSE
GUICtrlSetData($p0_3,"")
endif
$Summe = $Rprobefahrt4
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
IF $Summe >0 Then
GUICtrlSetData($p0_4,$Summe)
ELSE
GUICtrlSetData($p0_4,"")
endif
Endif
Endfunc
Func _Samstag_Probefahrt_Fahrer()
_eingaben_auslesen()
IF $varWochentagText = "Sonnabend" Then
$erstenzwei = IniRead(@ScriptDir & "\ini\daten.ini","stunden","erstenzwei","")
$Summe = $Rprobefahrt1
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
IF $Summe >0 Then
GUICtrlSetData($p0_1,$Summe)
ELSE
GUICtrlSetData($p0_1,"")
endif
$Summe = $Rfahrer1 - $erstenzwei
$SummeRound = Round($Summe,2)
$Summe= StringReplace($SummeRound, ".", ",")
GUICtrlSetData($p25_1,$erstenzwei)
IF $Summe >0 Then
GUICtrlSetData($p40_1,$Summe)
ELSE
GUICtrlSetData($p40_1,"")
GUICtrlSetData($p25_1,"")
endif
endif
EndFunc
Gruß
Wuff
Moin,
ich habe mehrerer Funktionen mit der selben IF Afrage.
Wie kann ich es deklarieren, das die richtige Funktion verwendet wird.
Beispiel:
Func
If Tag = Sanstag dann
EndFunc
Func
If Tag = Sanstag dann
EndFunc
usw.
Gruß
Wuff
Danke, das wars. ![]()
Gruß
Wuff
Moin,
ich möchte eine Inputbox auf einen Eingabewert begrenzen.
Z.B darf nur ein Wert bis "24" eingegeben werden.
Gibt es dafür irgendetwas? Kann so nichts finden.
Vielen Dank
Wuff
Danke, AutoBert
Gruß
Wuff
Wäre sehr schön!
Gruß
Wuff
Moin,
ich möchte in einer ini-Datei den Schlüssel/Key numerisch sortieren.
Beispiel: Vor der Sortierung.
[name]
name2=hallo
name1=hallo
name4=hallo
Beispiel: So sollte es nachher aussehen.
[name]
name1=hallo
name2=hallo
name3=hallo
Könnt ihr mir helfen?
Gruß
Wuff
Hi bastel123,
das wars!
Vielen Dank.
Wuff