Beiträge von BugFix

**BugFix**

Zitat

Original von skyteddy
Es geht immer nur einen Haken zu setzen, dann werden alle anderen gelöscht.

Hmm, poste doch mal deinen aktuellen Code.

Hier mal ein einfaches Beispiel, mehrfaches markieren geht hier problemlos.

Spoiler anzeigen

[autoit]

#include <guiconstants.au3>
#Include <GuiListView.au3>
GUICreate("ListView Test", 600, 400)
$lvTEST = GUICtrlCreateListView("Out|Gerätename|Herst.-SN|Info", 10, 10, 580, 385,BitOR($LVS_SHOWSELALWAYS, $LBS_MULTIPLESEL ), _
BitOR($LVS_EX_CHECKBOXES, $WS_EX_CLIENTEDGE, $LVS_EX_GRIDLINES, $LVS_EX_FULLROWSELECT))
GUICtrlSetTip(-1, "Sortieren mit Klick auf den Spaltenkopf")
_GUICtrlListViewSetColumnWidth(-1,0,40)
_GUICtrlListViewSetColumnWidth(-1,1,150)
_GUICtrlListViewSetColumnWidth(-1,2,150)
_GUICtrlListViewSetColumnWidth(-1,3,236)
_GUICtrlListViewJustifyColumn (-1, 0, 2)
_GUICtrlListViewJustifyColumn (-1, 2, 1)
_SetData()
Dim $DESCENDING[_GUICtrlListViewGetSubItemsCount ($lvTEST) ] ; notwendig für sortieren durch Klick auf Spaltenkopf

[/autoit] [autoit][/autoit] [autoit]

GUISetState()

[/autoit] [autoit][/autoit] [autoit]

While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
Exit
Case $msg = $lvTEST
; Sortierung mit Klick auf Spaltenkopf
; ACHTUNG!! Checkbox wird NICHT mitsortiert, wenn nichts weiter in der Spalte steht!!
_GUICtrlListViewSort($lvTEST, $DESCENDING, GUICtrlGetState($lvTEST))

EndSelect
WEnd

[/autoit] [autoit][/autoit] [autoit]

[/autoit]

**BugFix**

Schau mal hier rein. Da habe ich das verwendet.

**BugFix**

Zitat

jau, ich muss mich auch immer neu hier einloggen (seit gestern).

Stell mal in deinen Lesezeichen die Boardadresse auf:
"http://www.autoit.de/portal.php" um.
Noch einmal anmelden und dann bleibts gespeichert.

**BugFix**

Also Auslesen ging prima mit meinem obigen Code.
Aber ich konnte nun nicht mehr online testen, da die Mail bereits gelöscht war.
Mit dem Quellcode, den ich ausgelesen hatte, funktioniert auch die Linkselektion per Regex.

**BugFix**

Kein Wunder, dass das online nicht geht - leviathan hat inzwischen die Mail gelöscht.

**BugFix**

So,mit dem Pattern sollte es eig.funzen:
"((http://www%5c.temporaryinbox%5c.com/showmail%5C.php%5C?inbox=w00t)[^<]*)"

Edit:
Hmm, im RegEx Coach passt alles, aber wenn ich es auf die Html online anwende findet er nix. Sehr seltsam.

**BugFix**

So,hiermit lese ich den Quelltext aus. Sieht komischerweise anders aus, als der den ich im Browserfenster anschauen kann:

[autoit]

#include <IE.au3>
$oIE = _IECreate ("http://www.temporaryinbox.com/rssfeed.php?inbox=w00t")
$sHTML = _IEDocReadHTML ($oIE)
$fh = FileOpen("TESThtml.txt",1)
$var = StringSplit($sHTML, @LF)
For $i = 1 To $var[0]
FileWriteLine($fh, $var[$i])
Next

[/autoit]

Ich mach mal noch ein passendes Pattern.

**BugFix**

Wenn du den Quelltext der RSS-Seite ausliest erhältst du:

Spoiler anzeigen

XML

<?xml version="1.0" encoding="ISO-8859-1"?>
<rss version="2.0">
<channel>
<title>temporaryinbox.com | free temporary email and disposable email address service</title>
<link>http://www.temporaryinbox.com</link>
<description>Get your free disposable email address now and avoid spam in your private email account. Temporary email addresses are the best way to avoid spam.</description>
<language>en</language>
<generator>temporaryinbox.com</generator>
<managingEditor>admin@put2.net</managingEditor>
<webMaster>admin@put2.net</webMaster>


<ttl>15</ttl>
<copyright>2006 temporaryinbox.com</copyright>
	<item>
		<title><![CDATA[fdasfsadf]]></title>
		<link><![CDATA[http://www.temporaryinbox.com/showmail.php?inbox=w00t&mail=MjAxNzU4OTg=]]></link>
		<description><![CDATA[]]></description>
		<pubDate>Tue, 8 May 2007 17:18:04 +0200</pubDate>
	</item>


	
</channel>
</rss>

Alles anzeigen

Es können ja mehrere Mails enthalten sein. Ich hab dir mal ein Pattern für Regex gemacht um die Links zu selektieren:
"((http://www%5c.temporaryinbox%5c.com/showmail%5C.ph…x=w00t&mail).+(?=]]></link>))"

**BugFix**

Wähle einfach den RSSFeed-Link:
http://www.temporaryinbox.com/rssfeed.php?inbox=w00t

Lies den Seiteninhalt dort steht der direkte Link zur Post:
<link>
http://www.temporaryinbox.com/showmail.php?inbox=w00t&mail=MjAxNzU4OTg=
</link>

Wenn du den Link aufrufst hast du deine Mail.

**BugFix**

Getestet. läuft.
Die Randomzahlen werden in eigenes Array geschrieben. Es wird verglichen ob Randomzahl schon mal gewählt wurde, wenn nicht wird sie im Array erfaßt und die Textzeile mit dieser Zufallsnummer in die Ausgabedatei geschrieben. Fortlaufend bis alle Textzeilen per Random ermittelt wurden.

Spoiler anzeigen

[autoit]

#include <file.au3>
Global $arFile, $arCount[1]
Dim $filePath = @ScriptDir & "\blabla.txt"
Dim $outFile = "blabla_out.txt"
Dim $fh, $random, $match

[/autoit] [autoit][/autoit] [autoit]

If Not _FileReadToArray($filePath, $arFile) Then
MsgBox(0, '', @error)
Exit
EndIf
ReDim $arCount[UBound($arFile)]
$arCount[0] = 0
$fh = FileOpen($outFile, 1)
Do
$random = Random(1, UBound($arFile)-1, 1)
$match = 0
For $i = 1 To UBound($arCount)-1
If $arCount[$i] = $random Then ; prüft ob Random-Zahl schon verwendet wurde
$match = 1
ExitLoop
EndIf
Next
If $match = 0 Then
$arCount[$random] = $random
$arCount[0] += 1
FileWriteLine($fh, $arFile[$random])
EndIf
Until $arCount[0] = $arFile[0]
FileClose($fh)

[/autoit]

**BugFix**

ExitLoop reicht nicht. Die GUI existiert ja unabhängig von der Schleife. Lösche sie einfach mit GUIDelete().

Allerdings sehr komplizierter Aufbau

**BugFix**

Ich verstehe eins nicht:
Warum lagerst du den Vorgang des Scriptschreibens nicht in ein völlig separates Programm aus, das du dann jeweils mit den erforderlichen Parametern aufrufst ?
Dann ist es völlig egal welcher User da sein Log generiert.

**BugFix**

Ich denke mal, dass Probleme Autoit betreffend wohl weniger aufkommen.
Das Hauptproblem bei Sudoku ist, einen effektiven mathematischen Ansatz zu finden, der alle Bedingungen dieses Spiels berücksichtigt. Da gibt es sicher Unmengen an Varianten. Das ist ziemlich komplex. Wenn man das hat, ist die Umsetzung in den Programmcode sicher das wenigste.

Alina, da du Formeln magst, ist das genau das richtige für dich. Viel Spaß!

**BugFix**

Schön, wenns klappt. :]

Du kannst die Tabellenblätter auch mit Namen ansprechen. Ist sinnvoll, wenn mehrere vorhanden sind und die Reihenfolge nicht bekannt ist.

[autoit]

$sSheetName = "Tabelle3"
$oWBook1.Sheets($sSheetName).Move($oWBook2.Sheets(1))

[/autoit]

**BugFix**

Hi Alina,

hab zwar nicht die Zeit dabei mitzumachen, aber mal ein Vorschlag.
Verwende OnEvent Mode, dann kannst du bereits während der Eingabe prüfen und z.B. farblich markieren.
Für die grafische Darstellung würde ich quadratische Inputs empfehlen, Style: zentriert und immer in 9-er Blöcken etwas gruppiert.
Mal mein Vorschlag:

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
; erster 9-er Block oben links: Input 1-9
; Blöcke von oben li. nach rechts, dann mitte li.nach rechts, dann unten links nach rechts
Opt("GUIOnEventMode", 1)
$Form1 = GUICreate("AForm1", 267, 283, 193, 115)
GUISetOnEvent($GUI_EVENT_CLOSE, "AForm1Close")
$Input1 = GUICtrlCreateInput("", 30, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput1Change")
$Input2 = GUICtrlCreateInput("", 51, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput2Change")
$Input3 = GUICtrlCreateInput("", 72, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput3Change")
$Input4 = GUICtrlCreateInput("", 30, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput4Change")
$Input5 = GUICtrlCreateInput("", 51, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput5Change")
$Input6 = GUICtrlCreateInput("", 72, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput6Change")
$Input7 = GUICtrlCreateInput("", 30, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput7Change")
$Input8 = GUICtrlCreateInput("", 51, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput8Change")
$Input9 = GUICtrlCreateInput("", 72, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput9Change")
$Input10 = GUICtrlCreateInput("", 100, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput10Change")
$Input11 = GUICtrlCreateInput("", 121, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput11Change")
$Input12 = GUICtrlCreateInput("", 142, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput12Change")
$Input13 = GUICtrlCreateInput("", 100, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput13Change")
$Input14 = GUICtrlCreateInput("", 121, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput14Change")
$Input15 = GUICtrlCreateInput("", 142, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput15Change")
$Input16 = GUICtrlCreateInput("", 100, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput16Change")
$Input17 = GUICtrlCreateInput("", 121, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput17Change")
$Input18 = GUICtrlCreateInput("", 142, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput18Change")
$Input19 = GUICtrlCreateInput("", 170, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput19Change")
$Input20 = GUICtrlCreateInput("", 191, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput20Change")
$Input21 = GUICtrlCreateInput("", 212, 50, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput21Change")
$Input22 = GUICtrlCreateInput("", 170, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput22Change")
$Input23 = GUICtrlCreateInput("", 191, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput23Change")
$Input24 = GUICtrlCreateInput("", 212, 71, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput24Change")
$Input25 = GUICtrlCreateInput("", 170, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput25Change")
$Input26 = GUICtrlCreateInput("", 191, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput26Change")
$Input27 = GUICtrlCreateInput("", 212, 92, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput27Change")
$Input28 = GUICtrlCreateInput("", 30, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput28Change")
$Input29 = GUICtrlCreateInput("", 51, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput29Change")
$Input30 = GUICtrlCreateInput("", 72, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput30Change")
$Input31 = GUICtrlCreateInput("", 30, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput31Change")
$Input32 = GUICtrlCreateInput("", 51, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput32Change")
$Input33 = GUICtrlCreateInput("", 72, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput33Change")
$Input34 = GUICtrlCreateInput("", 30, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput34Change")
$Input35 = GUICtrlCreateInput("", 51, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput35Change")
$Input36 = GUICtrlCreateInput("", 72, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput36Change")
$Input37 = GUICtrlCreateInput("", 100, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput37Change")
$Input38 = GUICtrlCreateInput("", 121, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput38Change")
$Input39 = GUICtrlCreateInput("", 142, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput39Change")
$Input40 = GUICtrlCreateInput("", 100, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput40Change")
$Input41 = GUICtrlCreateInput("", 121, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput41Change")
$Input42 = GUICtrlCreateInput("", 142, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput42Change")
$Input43 = GUICtrlCreateInput("", 100, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput43Change")
$Input44 = GUICtrlCreateInput("", 121, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput44Change")
$Input45 = GUICtrlCreateInput("", 142, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput45Change")
$Input46 = GUICtrlCreateInput("", 170, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput46Change")
$Input47 = GUICtrlCreateInput("", 191, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput47Change")
$Input48 = GUICtrlCreateInput("", 212, 120, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput48Change")
$Input49 = GUICtrlCreateInput("", 170, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput49Change")
$Input50 = GUICtrlCreateInput("", 191, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput50Change")
$Input51 = GUICtrlCreateInput("", 212, 141, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput51Change")
$Input52 = GUICtrlCreateInput("", 170, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput52Change")
$Input53 = GUICtrlCreateInput("", 191, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput53Change")
$Input54 = GUICtrlCreateInput("", 212, 162, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput54Change")
$Input55 = GUICtrlCreateInput("", 30, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput55Change")
$Input56 = GUICtrlCreateInput("", 51, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput56Change")
$Input57 = GUICtrlCreateInput("", 72, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput57Change")
$Input58 = GUICtrlCreateInput("", 30, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput58Change")
$Input59 = GUICtrlCreateInput("", 51, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput59Change")
$Input60 = GUICtrlCreateInput("", 72, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput60Change")
$Input61 = GUICtrlCreateInput("", 30, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput61Change")
$Input62 = GUICtrlCreateInput("", 51, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput62Change")
$Input63 = GUICtrlCreateInput("", 72, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput63Change")
$Input64 = GUICtrlCreateInput("", 100, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput64Change")
$Input65 = GUICtrlCreateInput("", 121, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput65Change")
$Input66 = GUICtrlCreateInput("", 142, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput66Change")
$Input67 = GUICtrlCreateInput("", 100, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput67Change")
$Input68 = GUICtrlCreateInput("", 121, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput68Change")
$Input69 = GUICtrlCreateInput("", 142, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput69Change")
$Input70 = GUICtrlCreateInput("", 100, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput70Change")
$Input71 = GUICtrlCreateInput("", 121, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput71Change")
$Input72 = GUICtrlCreateInput("", 142, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput72Change")
$Input73 = GUICtrlCreateInput("", 170, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput73Change")
$Input74 = GUICtrlCreateInput("", 191, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput74Change")
$Input75 = GUICtrlCreateInput("", 212, 190, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput75Change")
$Input76 = GUICtrlCreateInput("", 170, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput76Change")
$Input77 = GUICtrlCreateInput("", 191, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput77Change")
$Input78 = GUICtrlCreateInput("", 212, 211, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput78Change")
$Input79 = GUICtrlCreateInput("", 170, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput79Change")
$Input80 = GUICtrlCreateInput("", 191, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput80Change")
$Input81 = GUICtrlCreateInput("", 212, 232, 21, 21, BitOR($ES_NUMBER, $ES_CENTER))
GUICtrlSetOnEvent(-1, "AInput81Change")
GUISetState(@SW_SHOW)

[/autoit] [autoit][/autoit] [autoit]

While 1
Sleep(100)
WEnd

Func AForm1Close()
Exit
EndFunc

[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]

Func AInput10Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput11Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput12Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput13Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput14Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput15Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput16Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput17Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput18Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput19Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput1Change()
MsgBox(0, '', "Hat sich was geändert")
EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput20Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput21Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput22Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput23Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput24Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput25Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput26Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput27Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput28Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput29Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput2Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput30Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput31Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput32Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput33Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput34Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput35Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput36Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput37Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput38Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput39Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput3Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput40Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput41Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput42Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput43Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput44Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput45Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput46Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput47Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput48Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput49Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput4Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput50Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput51Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput52Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput53Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput54Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput55Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput56Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput57Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput58Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput59Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput5Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput60Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput61Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput62Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput63Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput64Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput65Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput66Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput67Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput68Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput69Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput6Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput70Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput71Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput72Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput73Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput74Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput75Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput76Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput77Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput78Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput79Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput7Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput80Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput81Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput8Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit] [autoit][/autoit] [autoit]

Func AInput9Change()

[/autoit] [autoit][/autoit] [autoit]

EndFunc

[/autoit]

**BugFix**

So, habs nun doch noch gemacht. Ist ja nicht so viel.
Habe keine Sicherheitsabfragen drin (z.B. ob $Anzahl > Anzahl der vorhandenen Sheets). Ging mir nur drum zu zeigen wie ( und dass ) es geht.

Spoiler anzeigen

[autoit]

$sFilePath1 = "D:\Mappe1.xls" ; Quelle
$sFilePath2 = "D:\Mappe2.xls" ; Ziel
$Anzahl = 5 ; Anzahl der zu verschiebenden Sheets
$oExcel = ObjCreate("Excel.Application")
$oWBook1 = $oExcel.Workbooks.Open($sFilePath1)
$oWBook2 = $oExcel.Workbooks.Open($sFilePath2)
For $i = 1 To $Anzahl
$oWBook1.Sheets(1).Move($oWBook2.Sheets(1))
Next
$oExcel.DisplayAlerts = False
$oExcel.Save
$oExcel.Application.Quit
$oExcel = ''

[/autoit]

$oWBook1.Sheets(1) : Es wird immer von vorn verschoben (Index 1).
$oWBook2.Sheets(1) : Es wird immer vorn angefügt (Index 1).
Die Indexe sind 1-basiert. Du kannst natürlich auch einen Zähler setzen und dann an bestimmter Position einfügen.

In dieser Einstellung läuft alles 'Hide' ab. Die Aufforderung zum Speichern habe ich unterdrückt.

Viel Spaß!

**BugFix**

Welches Icon soll denn nun wohin?

**BugFix**

OK, dann werd ich mich mal hinsetzen und versuchen eine Lösung zu finden.
Aber ob das heute noch was wird.....
Hab gerade 1300 Zeilen Quellcode geschrieben - mir rauchen schon Kopf und Finger

**BugFix**

[autoit]

$start = TimerInit()
$diff = TimerDiff($start)

[/autoit]

**BugFix**

*voll zustimm*
Da sinnvollerweise sowieso jeder Nutzereingabe eine Fehlerroutine folgen sollte, kann dabei natürlich auch der Gültigkeitsbereich geprüft werden. Insofern ist die Verwendung von $ES_NUMBER nur ein Mittel dem User WÄHREND der Eingabe zu zeigen: Stop - Nur Ziffern!

Beiträge von BugFix

Anfängerfragen zu Listen in GUIs

Anfängerfragen zu Listen in GUIs

Puhh.... Passwort wieder gefunden / Keine e-Mail bei Passwortanfrage?

temporaryinbox.com email öffnen

temporaryinbox.com email öffnen

temporaryinbox.com email öffnen

temporaryinbox.com email öffnen

temporaryinbox.com email öffnen

temporaryinbox.com email öffnen

Textdatei zufällig auslesen

GUI bleibt offen - trotz ExitLoop oO

Variablen skript-übergreifend nutzen ?

Sudoku

Mehrere Exceldateien zu einer zusammenfassen

Sudoku

Mehrere Exceldateien zu einer zusammenfassen

Icon von EXE in TreeView???

Mehrere Exceldateien zu einer zusammenfassen

Temp Ordner leeren...

nur zahlen zulassen