Servus liebe AutoIt's
nachdem ich Probleme mit dem Ausdrucken eine ListView hatte und mir Blume(User) geholfen hatte, sah ich etwas merkwürdiges:
>"C:\Program Files (x86).\Test.au3"
>Exit code: 0 Time: 1.611
Das Seltsame daran war eigentlich, dass der Code laut Console schon beendet, die GUI aber noch sichtbar und teilweise verwendbar war....
Könnt ihr euch diesen Vorgang erklären?
Hier der Code:
C
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
#include <File.au3>
#include <GUiListview.au3>
#RequireAdmin
$Form1_1 = GUICreate("Rechner", 450, 446, 355, 157)
$Berechnen = GUICtrlCreateButton("Berechnen", 216, 152, 225, 33)
$Drucken = GUICtrlCreateButton("Drucken", 216, 8, 65, 41)
$Mensur = GUICtrlCreateInput("z.B.: 650", 376, 16, 57, 21)
$Buende = GUICtrlCreateInput("z.B.: 21", 376, 40, 57, 21)
$Edit = GUICtrlCreateListView("Bund|Abstand zum Sattel", 8, 0, 202, 422)
Dim $inhalt[1]
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
GUISetState()
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Berechnen
For $Bundzahl = 1 To GUICtrlRead($Buende)
Next
Local $a = GUICtrlRead($Mensur), $b
For $i = 1 To GUICtrlRead($Buende)
If $i == 1 Then
$b = ($a / (2 ^ (1 / 12)))
Else
$b = ($b / (2 ^ (1 / 12)))
EndIf
ReDim $inhalt[UBound($inhalt) + 1]
$inhalt[$i - 1] = GUICtrlCreateListViewItem($i & "|" & Round($a - $b, 2), $Edit)
Next
Case $Drucken
FileWrite(@ScriptDir & "\Output.html", StringFormat("<html>\n<head>\n\t<title>Druckausgabe</title>\n</head>\n<body>\n<table border=""1"">\n<tr>\n\t<td>Bund</td>\n\t<td>Abstand zum Sattel</td>\n</tr>\n"))
For $iX = 0 To _GUICtrlListView_GetItemCount($Edit) - 1
FileWrite(@ScriptDir & "\Output.html", StringFormat("<tr>\n\t<td>%s</td>\n\t<td>%s</td>\n</tr>\n", _GUICtrlListView_GetItemText($Edit, $iX, 0), _GUICtrlListView_GetItemText($Edit, $iX, 1)))
Next
FileWrite(@ScriptDir & "\Output.html", StringFormat("</table>\n</body>\n</html>"))
_FilePrint(@ScriptDir & "\Output.html") ;Datei drucken (Funktion aus <File.au3>)
EndSwitch
WEnd
Alles anzeigen
Grüße aus Oberösterreich
Stoani
Ps.: Danke nochmals an Blume!