Jump to content

tazdevil20

Members
  • Posts

    6
  • Joined

  • Last visited

Everything posted by tazdevil20

  1. This is a limit from the listview. If I make the column a little smaller, the text ends with "...".
  2. Hello, thanks for the tip! I change my script to this #include <GUIConstants.au3> #Include <GuiListView.au3> $red = 0xff0000 $green = 0x00FF40 $Form1 = GUICreate("Form1", 630, 262, 193, 115) $b_write = GUICtrlCreateButton("Write", 100, 224, 100, 30, $BS_FLAT) $b_save = GUICtrlCreateButton("Save", 300, 224, 100, 30, $BS_FLAT) $L_Console = GUICtrlCreateListView("| |", 0, 32, 626, 182, BitOR($LVS_NOCOLUMNHEADER, $LVS_SINGLESEL, $WS_VSCROLL, $WS_HSCROLL), $LVS_EX_FLATSB) GUISetState(@SW_SHOW) _consolewrite($L_Console, "jdfölkjsf", $green) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $b_write _consolewrite($L_Console, "This is a example text that is longer as 260 characters. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- 260123456789") Case $b_save $logfile = FileSaveDialog("Log speichern", @ScriptDir, "Log-Datei (*.log)") if Not @error Then _consolesave($L_Console, $logfile) EndSwitch WEnd Func _consolewrite($console, $text, $color = 0xffffff) if $text <> "" Then If StringLen($text) > 260 then $write = GUICtrlCreateListViewItem($text & "|" & StringMid($text, 260), $console) Else $write = GUICtrlCreateListViewItem($text, $console) GUICtrlSetBkColor(-1, $color) $count = _GUICtrlListViewGetItemCount($console) _GUICtrlListViewScroll($console,0,200) EndIf EndIf _GUICtrlListViewSetColumnWidth($L_Console, 0, $LVSCW_AUTOSIZE) _GUICtrlListViewSetColumnWidth($L_Console, 1, $LVSCW_AUTOSIZE) EndFunc Func _consolesave($console, $save_file) if StringRight($save_file, 4) <> ".log" Then $save_file = $save_file & ".log" EndIf if FileExists($save_file) Then $ueberschreib = MsgBox(36, "Datei existiert", "Soll die Datei " & $save_file & " überschrieben werden?") if $ueberschreib = 6 Then $file = FileOpen($save_file, 2) $count = _GUICtrlListViewGetItemCount($console) for $i = 0 to $count -1 $line = _GUICtrlListViewGetItemText($console, $i, 0) FileWriteLine($file, $line) Next _consolewrite($L_Console, "Log wurde nach " & $save_file & " gespeichert.", $green) FileClose($file) Else _consolewrite($L_Console, "Speichern des Logs wurde abgebrochen.") EndIf Else $file = FileOpen($save_file, 2) $count = _GUICtrlListViewGetItemCount($console) for $i = 0 to $count -1 $line = _GUICtrlListViewGetItemText($console, $i, 0) FileWriteLine($file, $line) Next _consolewrite($L_Console, "Log wurde nach " & $save_file & " gespeichert.", $green) FileClose($file) EndIf EndFunc If a line is longer as 260 characters then the text is split to 2 strings and written in a new column. This is nearly perfect. There are some spaces after the first column if the text is longer as 260 characters.
  3. ok, ok Here is a example script. I need a ListView, because i need the backgroundcolor for some items. #include <GUIConstants.au3> #Include <GuiListView.au3> $red = 0xff0000 $green = 0x00FF40 $Form1 = GUICreate("Form1", 630, 262, 193, 115) $b_write = GUICtrlCreateButton("Write", 100, 224, 100, 30, $BS_FLAT) $b_save = GUICtrlCreateButton("Save", 300, 224, 100, 30, $BS_FLAT) $L_Console = GUICtrlCreateListView("|", 0, 32, 626, 182, BitOR($LVS_NOCOLUMNHEADER, $LVS_SINGLESEL, $WS_VSCROLL, $WS_HSCROLL), $LVS_EX_FLATSB) _GUICtrlListViewSetColumnWidth(-1, 0, 2500) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit case $b_write _consolewrite($L_Console, "This is a example text that is longer as 260 characters. -------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------------- 260123456789") Case $b_save $logfile = FileSaveDialog("Log speichern", @ScriptDir, "Log-Datei (*.log)") if Not @error Then _consolesave($L_Console, $logfile) EndSwitch WEnd Func _consolewrite($console, $text, $color = 0xffffff) if $text <> "" Then $write = GUICtrlCreateListViewItem($text, $console) GUICtrlSetBkColor(-1, $color) $count = _GUICtrlListViewGetItemCount($console) _GUICtrlListViewScroll($console,0,200) EndIf EndFunc Func _consolesave($console, $save_file) if StringRight($save_file, 4) <> ".log" Then $save_file = $save_file & ".log" EndIf if FileExists($save_file) Then $ueberschreib = MsgBox(36, "Datei existiert", "Soll die Datei " & $save_file & " überschrieben werden?") if $ueberschreib = 6 Then $file = FileOpen($save_file, 2) $count = _GUICtrlListViewGetItemCount($console) for $i = 0 to $count -1 $line = _GUICtrlListViewGetItemText($console, $i) FileWriteLine($file, $line) Next _consolewrite($L_Console, "Log wurde nach " & $save_file & " gespeichert.", $green) FileClose($file) Else _consolewrite($L_Console, "Speichern des Logs wurde abgebrochen.") EndIf Else $file = FileOpen($save_file, 2) $count = _GUICtrlListViewGetItemCount($console) for $i = 0 to $count -1 $line = _GUICtrlListViewGetItemText($console, $i) FileWriteLine($file, $line) Next _consolewrite($L_Console, "Log wurde nach " & $save_file & " gespeichert.", $green) FileClose($file) EndIf EndFunc
  4. Hello, I create a ListView: $L_Console = GUICtrlCreateListView("|", 2, 275, 590, 204, BitOR($LVS_NOCOLUMNHEADER, $LVS_SINGLESEL, $WS_VSCROLL, $WS_HSCROLL), $LVS_EX_FLATSB) _GUICtrlListViewSetColumnWidth(-1, 0, 2500)oÝ÷ Ù8^§îËb¢{h¸­z)⵫­¢+ÙÕ¹}½¹Í½±ÝÉ¥Ñ ÀÌØí½¹Í½±°ÀÌØíÑáаÀÌØí½±½ÈôÁá¤(%¥ÀÌØíÑáбÐìÐìÅÕ½ÐìÅÕ½ÐìQ¡¸($$ÀÌØíÝÉ¥ÑôU% Ñɱ ÉÑ1¥ÍÑY¥Ý%Ñ´ ÀÌØíÑáаÀÌØí½¹Í½±¤($%U% ÑɱMÑ ­ ½±½È ´Ä°ÀÌØí½±½È¤($$ÀÌØí½Õ¹Ðô}U% Ñɱ1¥ÍÑY¥ÝÑ%ѵ ½Õ¹Ð ÀÌØí½¹Í½±¤($%}U% Ñɱ1¥ÍÑY¥ÝMɽ±° ÀÌØí½¹Í½±°À°ÈÀÀ¤(%¹%)¹Õ¹oÝ÷ Ø Ýiû§rبÚ,j÷X­zk"+ZºÚ"µÍ[ÈØÛÛÛÛØ]J ÌÍØÛÛÛÛK ÌÍÜØ]WÙ[JBZYÝ[ÔYÚ ÌÍÜØ]WÙ[K H ÉÝÈ ][ÝËÙÉ][ÝÈ[BIÌÍÜØ]WÙ[HH ÌÍÜØ]WÙ[H [È ][ÝËÙÉ][ÝÂQ[YBZY[Q^ÝÊ ÌÍÜØ]WÙ[JH[BIÌÍÝYXØÚZXHÙÐÞ Í ][ÝÑ]ZH^ÝY ][ÝË ][ÝÔÛÛYH]ZH ][ÝÈ [È ÌÍÜØ]WÙ[H [È ][ÝÈ?ØÚYX[Ù[É][ÝÊBBZY ÌÍÝYXØÚZXH [BBYØXJ BBBIÌÍÙ[HH[SÜ[ ÌÍÜØ]WÙ[KBBBIÌÍØÛÝ[HÑÕRPÝÝY]ÑÙ]][PÛÝ[ ÌÍØÛÛÛÛJBBBYÜ ÌÍÚHHÈ ÌÍØÛÝ[LBBBBIÌÍÛ[HHÑÕRPÝÝY]ÑÙ]][U^ ÌÍØÛÛÛÛK ÌÍÚJBBBBQ[UÜ]S[J ÌÍÙ[K ÌÍÛ[JBBBS^BBWØÛÛÛÛ]Ü]J ÌÍÓÐÛÛÛÛK ][ÝÓÙÈÝHXÚ ][ÝÈ [È ÌÍÜØ]WÙ[H [È ][ÝÈÙÜZXÚ][ÝË ÌÍÙÜY[BBBQ[PÛÜÙJ ÌÍÙ[JBBQ[ÙBBBWØÛÛÛÛ]Ü]J ÌÍÓÐÛÛÛÛK ][ÝÔÜZXÚÈÙÜÈÝHXÙXØÚ[][ÝÊBBQ[YQ[ÙBBYØXJ BBIÌÍÙ[HH[SÜ[ ÌÍÜØ]WÙ[KBBIÌÍØÛÝ[HÑÕRPÝÝY]ÑÙ]][PÛÝ[ ÌÍØÛÛÛÛJBBYÜ ÌÍÚHHÈ ÌÍØÛÝ[LBBBIÌÍÛ[HHÑÕRPÝÝY]ÑÙ]][U^ ÌÍØÛÛÛÛK ÌÍÚJBBBQ[UÜ]S[J ÌÍÙ[K ÌÍÛ[JBBS^BWØÛÛÛÛ]Ü]J ÌÍÓÐÛÛÛÛK ][ÝÓÙÈÝHXÚ ][ÝÈ [È ÌÍÜØ]WÙ[H [È ][ÝÈÙÜZXÚ][ÝË ÌÍÙÜY[BBQ[PÛÜÙJ ÌÍÙ[JBQ[YY[XJ B[[ I have 1 Item that is longer as 260 characters. This is not really badly for me but a little unbeautiful.
  5. Hello, if I export any lines in the Listview all characters are displayed in the file. I hoped there is any chance to show more then the 260 characters. Thanks for the answers.
  6. Hello, I have the same problem. I can only 260 characters write in one line with guictrlcreatelistviewitem. I need as minimum 340 characters. Can anyone help me?
×
×
  • Create New...