Beiträge von autoBert

**autoBert**

Hallo TheLuBu,

ich hätte dies so behandelt:

Spoiler anzeigen

[autoit]

Func WM_NOTIFY($hWnd, $msgID, $wParam, $lParam)
Local $tagNMHDR, $event, $hwndFrom, $code, $aItems
$tagNMHDR = DllStructCreate("int;int;int", $lParam)
$code = DllStructGetData($tagNMHDR, 3)
If @error Then Return 0
;ConsoleWrite($wParam & " " & $LV_Agent[$iActiveTab] & @CRLF)
Switch $wParam
Case $LV_Agent[$iActiveTab]
Switch $code
Case $NM_CLICK
$iActiveAgent = GUICtrlRead($LV_Agent[$iActiveTab])
$aItems = _GUICtrlListView_GetSelectedIndices($LV_Agent[$iActiveTab],True)
If IsArray($aItems) Then
if $aItems[0] > 0 Then $iActiveAgent = $aItems[1]
;ConsoleWrite($iActiveAgent & " Name " & GUICtrlRead($iActiveAgent) & @CRLF)
_GUICtrlListView_EnsureVisible($LV_Kontakt[$iActiveTab], $iActiveAgent)
_GUICtrlListView_SetItemSelected($LV_Kontakt[$iActiveTab], $iActiveAgent)
EndIf
EndSwitch
Case $LV_Kontakt[$iActiveTab]
Switch $code
Case $NM_CLICK
$iActiveAgent = GUICtrlRead($LV_Kontakt[$iActiveTab])
$aItems = _GUICtrlListView_GetSelectedIndices($LV_Kontakt[$iActiveTab],True)
If IsArray($aItems) Then
if $aItems[0] > 0 Then $iActiveAgent = $aItems[1]
;ConsoleWrite($iActiveAgent & " Name " & GUICtrlRead($iActiveAgent) & @CRLF)
_GUICtrlListView_EnsureVisible($LV_Agent[$iActiveTab], $iActiveAgent)
_GUICtrlListView_SetItemSelected($LV_Agent[$iActiveTab], $iActiveAgent)
EndIf
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

[/autoit]

obwohl mir kein Fall aufgefallen ist in dem $aItems kein Array ist, erscheint mir diese Methode sicherer,

mfg autoBert

**autoBert**

Hallo,

bin aus privaten Gründen die nächsten 3-5 Wochen zeitlich sehr eingeschränkt so dass ich mich vosichtshalber aus dem Wettbewerb abmelde.

mfg autoBert

**autoBert**

Hallo TheLuBu,

hier dein abgeänertes Skript, jetzt wird bei einem Klick auf eine der beiden ListView's automatisch im anderen LV das selektierte Item auch selektiert und in den sichtbaren Bereich gescrollt:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <TabConstants.au3>
#include <WindowsConstants.au3>
#include <ListviewConstants.au3>
#include <GuiListView.au3>
#include <Date.au3>

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

Global $Kampcode[15][3], $newarray[15][15], $AgentKamp[15], $iActiveAgent, $iActiveTab

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

$Datumsplitnow = StringSplit(_NowCalcDate(), "/")
$iDay = $Datumsplitnow[3]
$iMonth = $Datumsplitnow[2]
$iYear = $Datumsplitnow[1]
$Yearsplit = StringSplit($iYear, "")
$DatumJJ = $Yearsplit[3] & $Yearsplit[4]

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

For $i = 1 To 14
For $k = 1 To 14
$newarray[$i][$k] = Random(0, 1000)
Next
Next
$newarray[8][13] = "alle abschließend bearbeiteten Agenten-Kontakte ohne falsche Nummer, Fax und Anrufbeantworter"
$newarray[12][12] = "Zeitdauer, die der Agent im Client angemeldet war (Differenz zwischen Client-Logout und Client-Login)"
$newarray[14][11] = "Abschluss mit Ergebnis ABL: Ablehnung"
$newarray[11][9] = "Abschluss mit Ergebnis OK"
$newarray[1][1] = "A"
$newarray[2][1] = "B"
$newarray[3][1] = "C"
$newarray[4][1] = "D"
$newarray[5][1] = "E"
$newarray[6][1] = "F"
$newarray[7][1] = "G"
$newarray[8][1] = "H"
$newarray[9][1] = "I"
$newarray[10][1] = "J"
$newarray[11][1] = "K"
$newarray[12][1] = "L"
$newarray[13][1] = "M"
$newarray[14][1] = "N"
$AgentKamp[1] = "|A|B|C|D|E|F|G|"
$AgentKamp[2] = "|A|B|C|D|E|F|G|H|I|J|K|L|M"
$AgentKamp[3] = "|A|B|C|D|E|F|G|"
$AgentKamp[4] = "|A|B|C|D|E|F|G|"
$AgentKamp[5] = "|A|B|C|D|E|F|G|"
$AgentKamp[6] = "|A|B|C|D|E|F|G|H|I|J|K|L|M|N|"
$AgentKamp[7] = "|A|B|C|D|E|F|G|"
$AgentKamp[8] = "|A|B|C|D|E|F|G|"
$AgentKamp[9] = "|A|B|C|D|E|F|G|"
$AgentKamp[10] = "|A|B|C|D|E|F|G|H|I|J|K|L|M|N|"
$AgentKamp[11] = "|A|B|C|D|E|F|G|"
$AgentKamp[12] = "|A|B|C|D|E|F|G|H|I|J|K|L|M|N|"
$AgentKamp[13] = "|A|B|C|D|E|F|G|"
$AgentKamp[14] = "|A|B|C|D|E|F|G|"

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

$Kampcode[1][2] = 'DE_TL_HSP_' & $iMonth & '_' & $DatumJJ
$Kampcode[2][2] = 'DE_TL_SPP_' & $iMonth & '_' & $DatumJJ
$Kampcode[3][2] = 'DE_TL_TAF_' & $iMonth & '_' & $DatumJJ
$Kampcode[4][2] = 'DE_TL_TMD_' & $iMonth & '_' & $DatumJJ
$Kampcode[5][2] = 'DE_TL_VF_' & $iMonth & '_' & $DatumJJ
$Kampcode[6][2] = 'DE_ZK_Haupt_' & $iMonth & '_' & $DatumJJ
$Kampcode[7][2] = 'DE_ZK_CC_' & $iMonth & '_' & $DatumJJ
$Kampcode[8][2] = 'DE_ZK_O2_' & $iMonth & '_' & $DatumJJ
$Kampcode[9][2] = 'DE_ZK_O2_CC_' & $iMonth & '_' & $DatumJJ
$Kampcode[10][2] = 'MC_HSP_' & $iMonth & '_' & $DatumJJ
$Kampcode[11][2] = 'MC_SPO_' & $iMonth & '_' & $DatumJJ
$Kampcode[12][2] = 'MC_TAF_' & $iMonth & '_' & $DatumJJ
$Kampcode[13][2] = 'MC_TMD_WOP_NOP_' & $iMonth & '_' & $DatumJJ
$Kampcode[14][2] = 'MC_VF_WOP_NOP_' & $iMonth & '_' & $DatumJJ

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

Dim $Tabs[UBound($Kampcode)]
Dim $LV_Kontakt[UBound($Kampcode)]
Dim $LV_Agent[UBound($Kampcode)]
Dim $hLV_Kontakt[UBound($Kampcode)]
Dim $hLV_Agent[UBound($Kampcode)]
Dim $Kampkennzahl[UBound($Kampcode)]

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

For $i = 0 To UBound($LV_Agent) - 1
$LV_Agent[$i] = -9999
$LV_Kontakt[$i] = -9999
Next

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

$Agentview = GUICreate("Tabbed Monitoring Dialog", 407, 438, 193, 85)
$PageControl1 = GUICtrlCreateTab(8, 8, 396, 384, $WS_VSCROLL)
GUICtrlSetResizing(-1, $GUI_DOCKWIDTH + $GUI_DOCKHEIGHT)
$Zeile = UBound($newarray) - 1
#region Suche
$KontaktGesamt = _Array2DSearch($newarray, "alle abschließend bearbeiteten Agenten-Kontakte ohne falsche Nummer, Fax und Anrufbeantworter", -1, UBound($newarray) - 2, 0, 0, False, True)
$s1 = StringSplit($KontaktGesamt[0], "|")

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

$Kontaktzeit = _Array2DSearch($newarray, "Zeitdauer, die der Agent im Client angemeldet war (Differenz zwischen Client-Logout und Client-Login)", -1, UBound($newarray) - 2, 0, 0, False, True)
$s2 = StringSplit($Kontaktzeit[0], "|")

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

$Kontaktdurchschnitt = _Array2DSearch($newarray, "Abschluss mit Ergebnis ABL: Ablehnung", -1, UBound($newarray) - 2, 0, 0, False, True)
$s3 = StringSplit($Kontaktdurchschnitt[0], "|")

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

$Pausenzeit = _Array2DSearch($newarray, "Abschluss mit Ergebnis OK", -1, UBound($newarray) - 2, 0, 0, True, False)
#endregion Suche
For $i = 1 To UBound($Kampcode) - 1
$Tabs[$i] = GUICtrlCreateTabItem($Kampcode[$i][2])
$data = StringSplit($AgentKamp[$i], "|")
$LV_Agent[$i] = GUICtrlCreateListView("Agent ", 16, 160, 128, 224, -1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_TRACKSELECT))
$hLV_Agent[$i] = GUICtrlGetHandle($LV_Agent[$i])
GUICtrlSetBkColor($LV_Agent[$i], 0xFFFFFF)
GUICtrlSetBkColor($LV_Agent[$i], $GUI_BKCOLOR_LV_ALTERNATE)
For $k = 2 To $data[0]
GUICtrlCreateListViewItem($data[$k], $LV_Agent[$i])
GUICtrlSetBkColor(-1, 0xFFDEAD)
Next
$LV_Kontakt[$i] = GUICtrlCreateListView("Nettokontakt|Netto pro h|Annahmen|Ablehnung|Quote", 145, 160, 238, 224, -1, BitOR($LVS_EX_FULLROWSELECT, $LVS_EX_TRACKSELECT))
$hLV_Kontakt[$i] = GUICtrlGetHandle($LV_Kontakt[$i])

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

GUICtrlSetBkColor($LV_Kontakt[$i], 0xFFFFFF)
GUICtrlSetBkColor($LV_Kontakt[$i], $GUI_BKCOLOR_LV_ALTERNATE)
For $k = 2 To $data[0]
$Agent = _Array2DSearch($newarray, " " & $data[$k], -1, 0, 0, 0, False, True)
$a = StringSplit($Agent[0], "|")
If $a[1] <> -1 Then

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

$Annahme = "0"
For $e = 1 To UBound($Pausenzeit) - 1
$s4 = StringSplit($Pausenzeit[$e], "|")
$Annahme += $newarray[$a[1]][$s4[2]]
Next
$Quote = $Annahme / $newarray[$a[1]][$s1[2]] * 100
$Quote = Round($Quote, 2)
$Kontaktproh = $newarray[$a[1]][$s1[2]] / $newarray[$a[1]][$s2[2]] * 60
$Kontaktproh = Round($Kontaktproh, 2)

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

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

$Button1 = GUICtrlCreateButton("&OK", 94, 408, 75, 25, $WS_GROUP)
$Button2 = GUICtrlCreateButton("&Cancel", 174, 408, 75, 25, $WS_GROUP)
$Button3 = GUICtrlCreateButton("&Help", 256, 408, 75, 25, $WS_GROUP)
GUISetState(@SW_SHOW)
$iActiveTab = GUICtrlRead($PageControl1)
GUIRegisterMsg($WM_NOTIFY, "WM_NOTIFY")

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE)
GUIDelete($Agentview)
ExitLoop
Case $PageControl1
$iActiveTab = GUICtrlRead($PageControl1) + 1
ConsoleWrite("Aktiver Tab " & $iActiveTab & @CRLF)
Case $Button1
GUISetState(@SW_HIDE)
GUIDelete($Agentview)
ExitLoop
Case $Button2
GUISetState(@SW_HIDE)
GUIDelete($Agentview)
ExitLoop
Case $Button3
GUISetState(@SW_HIDE)
GUIDelete($Agentview)
ExitLoop

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

EndSwitch
;~ For $i = 1 To UBound($LV_Agent)
;~ if _GUICtrlListView_GetTopIndex($hLV_Kontakt[$i])<_GUICtrlListView_GetTopIndex($hLV_Agent[$i]) then
;~ _GUICtrlListView_Scroll($hLV_Agent[$i], 0, -12)
;~ elseif _GUICtrlListView_GetTopIndex($hLV_Kontakt[$i])>_GUICtrlListView_GetTopIndex($hLV_Agent[$i]) then
;~ _GUICtrlListView_Scroll($hLV_Agent[$i], 0, +12)
;~ EndIf
;~ Next
WEnd

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

Func _Array2DSearch($avArray, $vWhat2Find, $iDim = -1, $iStart = 0, $iEnd = 0, $iCaseSense = 0, $fPartialSearch = False, $1stFound = False)
Local $error = 0, $1D, $arFound[1] = [0]
If $1stFound Then $arFound[0] = -1
If (Not IsArray($avArray)) Then
SetError(1)
Return 0
EndIf
Local $UBound2nd = UBound($avArray, 2)
If @error = 2 Then $1D = True
If ($iEnd = 0) Or ($iEnd = -1) Then $iEnd = UBound($avArray) - 1
If $iStart = -1 Then $iStart = 0
If $iCaseSense = -1 Then $iCaseSense = 0
If $iCaseSense <> 0 Then $iCaseSense = 1
Select
Case ($iDim > $UBound2nd) Or ($iDim < -1)
$error += 2
Case ($iStart < 0) Or ($iStart > UBound($avArray) - 1)
$error += 4
Case ($iEnd < $iStart) Or ($iEnd > UBound($avArray) - 1)
$error += 8
EndSelect
If $error <> 0 Then
SetError($error)
Return 0
EndIf
If $fPartialSearch <> True Then $fPartialSearch = False
If $1D Then
For $i = $iStart To $iEnd
Select
Case $iCaseSense = 0 And (Not $fPartialSearch)
If $avArray[$i] = $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 1 And (Not $fPartialSearch)
If $avArray[$i] == $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 0 And $fPartialSearch
If StringInStr($avArray[$i], $vWhat2Find) Then
If $1stFound Then
$arFound[0] = $i
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 1 And $fPartialSearch
If StringInStr($avArray[$i], $vWhat2Find, 1) Then
If $1stFound Then
$arFound[0] = $i
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i
$arFound[0] += 1
EndIf
EndIf
EndSelect
Next
Else
For $i = $iStart To $iEnd
If $iDim = -1 Then
Select
Case $iCaseSense = 0 And (Not $fPartialSearch)
For $k = 0 To $UBound2nd - 1
If $avArray[$i][$k] = $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i & '|' & $k
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $k
$arFound[0] += 1
EndIf
EndIf
Next
Case $iCaseSense = 1 And (Not $fPartialSearch)
For $k = 0 To $UBound2nd - 1
If $avArray[$i][$k] == $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i & '|' & $k
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $k
$arFound[0] += 1
EndIf
EndIf
Next
Case $iCaseSense = 0 And $fPartialSearch
For $k = 0 To $UBound2nd - 1
If StringInStr($avArray[$i][$k], $vWhat2Find) Then
If $1stFound Then
$arFound[0] = $i & '|' & $k
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $k
$arFound[0] += 1
EndIf
EndIf
Next
Case $iCaseSense = 1 And $fPartialSearch
For $k = 0 To $UBound2nd - 1
If StringInStr($avArray[$i][$k], $vWhat2Find, 1) Then
If $1stFound Then
$arFound[0] = $i & '|' & $k
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $k
$arFound[0] += 1
EndIf
EndIf
Next
EndSelect
Else
Select
Case $iCaseSense = 0 And (Not $fPartialSearch)
If $avArray[$i][$iDim] = $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i & '|' & $iDim
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $iDim
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 1 And (Not $fPartialSearch)
If $avArray[$i][$iDim] == $vWhat2Find Then
If $1stFound Then
$arFound[0] = $i & '|' & $iDim
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $iDim
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 0 And $fPartialSearch
If StringInStr($avArray[$i][$iDim], $vWhat2Find) Then
If $1stFound Then
$arFound[0] = $i & '|' & $iDim
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $iDim
$arFound[0] += 1
EndIf
EndIf
Case $iCaseSense = 1 And $fPartialSearch
If StringInStr($avArray[$i][$iDim], $vWhat2Find, 1) Then
If $1stFound Then
$arFound[0] = $i & '|' & $iDim
Return $arFound
Else
ReDim $arFound[UBound($arFound) + 1]
$arFound[UBound($arFound) - 1] = $i & '|' & $iDim
$arFound[0] += 1
EndIf
EndIf
EndSelect
EndIf
Next
EndIf
Return $arFound
EndFunc ;==>_Array2DSearch

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

Func WM_NOTIFY($hWnd, $msgID, $wParam, $lParam)
Local $tagNMHDR, $event, $hwndFrom, $code, $aItems
$tagNMHDR = DllStructCreate("int;int;int", $lParam)
$code = DllStructGetData($tagNMHDR, 3)
If @error Then Return 0
;ConsoleWrite($wParam & " " & $LV_Agent[$iActiveTab] & @CRLF)
Switch $wParam
Case $LV_Agent[$iActiveTab]
Switch $code
Case $NM_CLICK
$iActiveAgent = GUICtrlRead($LV_Agent[$iActiveTab])
$aItems = _GUICtrlListView_GetSelectedIndices($LV_Agent[$iActiveTab],True)
If IsArray($aItems) Then
$iActiveAgent = $aItems[1]
;ConsoleWrite($iActiveAgent & " Name " & GUICtrlRead($iActiveAgent) & @CRLF)
_GUICtrlListView_EnsureVisible($LV_Kontakt[$iActiveTab], $iActiveAgent)
_GUICtrlListView_SetItemSelected($LV_Kontakt[$iActiveTab], $iActiveAgent)
EndIf
EndSwitch
Case $LV_Kontakt[$iActiveTab]
Switch $code
Case $NM_CLICK
$iActiveAgent = GUICtrlRead($LV_Kontakt[$iActiveTab])
$aItems = _GUICtrlListView_GetSelectedIndices($LV_Kontakt[$iActiveTab],True)
If IsArray($aItems) Then
$iActiveAgent = $aItems[1]
;ConsoleWrite($iActiveAgent & " Name " & GUICtrlRead($iActiveAgent) & @CRLF)
_GUICtrlListView_EnsureVisible($LV_Agent[$iActiveTab], $iActiveAgent)
_GUICtrlListView_SetItemSelected($LV_Agent[$iActiveTab], $iActiveAgent)
EndIf
EndSwitch
EndSwitch
Return $GUI_RUNDEFMSG
EndFunc ;==>WM_NOTIFY

[/autoit]

mfg autoBert

**autoBert**

Hallo wuff,

schön, dann ist dein Problem ja gelöst, schön wäre es allerdings auch wenn du den Thread auf gelöst setzt. Einfach 1. Beitrag bearbeiten, Präfix (nähe Überschrift) ändern und speichern (absenden)

mfg autoBert

**autoBert**

Hallo TheLubU,

dann poste ein lauffähiges (Beispiel-)Skript mit den dazugehörigen (Beispiel-)Daten zum einlesen,

mfg autoBert

**autoBert**

Zitat von Hilfe

GUICtrlRead

Liest den Status oder die Daten eines Controls.
...
Typ Wert
ListView Control-ID des ausgewählten Listeneintrags. 0 bedeutet, dass kein Eintrag ausgewählt ist.

mfg autoBert

**autoBert**

Mit dieser INI kann es nicht klappen, da identische KEYS in einer Section,

mfg autoBert

**autoBert**

Hallo Snakey,

poste doch bitte die dazugehörige INI

mfg autoBert

**autoBert**

Case ListView bzw. Case Listview2

mfg autoBert

**autoBert**

So wie sonst auch, die üblichen Funktionen:

[autoit]

GuiCtrlCreateLabel; etc.
GuiCtrlSetData

[/autoit]

mfg autoBert

**autoBert**

Das Problem ist auch nicht grösser als bei einer festen Anzahl. Du liest die Fragen + Antwortmöglichkeiten mit IniReadSection in ein Array. Dieses kannst du dann mit einer For...Next Schleife (mit Hilfe UBound) durchlaufen.

mfg autoBert

**autoBert**

Hallo Oscar,

du führst das Skript auf Win-7 aus? Denn bei mir XP SP3 funktionierts tadellos,

mfg autoBert

**autoBert**

Hallo TheDude,

bei mir erhalte ich folgende Ergebnis für eine EXE die ich über das Contextmenü Compiled habe:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

Compile ich sie jedoch aus Scite, dieses:
Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist.

mfg autoBert

**autoBert**

Zitat von Totti68305

Das Programm ist für ein kostenloses flashgame bei icq

Lies dir die Forenregeln durch.

mfg autoBert

**autoBert**

Hallo ,

herzlich willkommen im Forum und viel Spass mit AutoIt.

Hier kannst du dir die Hilfe herunterladen.
Hier gibt es ein AutoIt-Tutorial: http://wiki.autoit.de/wiki/index.php/TutorialSehr hilfreich ist auch das Buch von peethebee

und jetzt zu deiner Frage:

Zitat von Prickel

Wenn ich aber ein Script compiliere und anschließend ausführen möchte, vergehen etwa 10 - 12 Sekunden, bis das Programm startet.

Ist das normal

Meine mit AutoIt erstellten EXEn laden deutlich schneller. Selbst eine von mir erstellte Adressenverwaltung (Grösse der EXE 1,9 MB) lädt in 2-3 Sekunden und zeigt dann auch schon den zuletzt aktiven Datensatz inklusive 4 verknüpften Tabellen.

Zitat von Prickel

oder wo könnte der Fehler liegen ?

ohne den Skriptcode kann man da schlecht etwas dazu sagen,

mfg autoBert

**autoBert**

Direkt in der Hauptübersicht in der dann alle Funktionen der Crypt.au3 mit Kurzbeschreibung aufgelistet sind,

mfg autoBert

**autoBert**

Hallo Nakroma,

du solltest zuerst einmal den Ablauf eines BlackJack-Spiels (sorry, ich kenne die Regeln nicht) auf dem Papier lösen. Dazu hilfreich ist z.B.: das Erstellen eines Struktogrammes

mfg autoBert

**autoBert**

Hallo Petter2,

bei den Nebenskripten scheint es sich ja um Programminstallationen zu handeln. Du müsstest also in deinem Hauptskript z.B. über INI dafür sorgen, dass das richtige Nebenskript gestartet wird. Falls ein Nebenskript auch noch fertiggestellt werden muss, darin natürlich auch den Fortschritt in einer INI vermerken.

mfg autoBert

**autoBert**

Hallo Parray Hotter,

was soll das 1 und das selbe Problem in 2 Threads abzufragen: [ offen ] _pathSplit Leerzeichen Problem im Dateinamen
und nur weil dir die Antworten (=Lösungen) nicht gefallen wieder zurück zum 1. Thread zu wechseln.

Dann entferne halt die Anführungszeichen:

[autoit]

StringTrimLeft
StringTrimRight

[/autoit]

@Mod/Admin evtl. zusammenlegen, sollte klappen da sie sich zeitlich bis Post #11 nicht überlappen, danke

mfg autoBert

**autoBert**

Wenn es unbeddingt der Stop-Button sein muss, kannst du es so machen:

Spoiler anzeigen

[autoit]

#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>

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

Opt("GUIOnEventMode", 1)

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

Global $WMP , $Button2 , $channel = "http://blackbeats.fm/listen.asx" , $Label

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

$Form1 = GUICreate("Loop-Stop", 247, 109, 426, 173)
GUISetOnEvent(-3, "_Exit")
$WMP = ObjCreate("WMPlayer.OCX")
$Button1 = GUICtrlCreateButton("Play", 24, 56, 81, 41, 0)
GUICtrlSetOnEvent(-1,"_play")
$Button2 = GUICtrlCreateButton("Stop", 128, 56, 81, 41, 0)
GUICtrlSetOnEvent(-1,"_stop")
$Label = GUICtrlCreateLabel("Label", 32, 16, 80, 20)
GUICtrlSetFont(-1, 10, 800, 0, "MS Sans Serif")
GUISetState(@SW_SHOW)

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

While Sleep(50)
WEnd

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

Func _Exit()
Exit
EndFunc

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

Func _play()
$WMP.URL = $channel
$WMP.controls.play()
GUICtrlSetData($Label,"Loading...")
$oldOneEvent = Opt("GUIOnEventMode", 0)
While $WMP.playstate <> 3
;Falls stop geklickt , soll _stop() aufgerufen werden
if GUIGetMsg($Button2) Then ExitLoop
Sleep(20)
WEnd
GUICtrlSetData($Label,"Playing")
Opt("GUIOnEventMode", $oldOneEvent)
EndFunc

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

Func _stop()
$WMP.controls.stop()
GUICtrlSetData($Label,"Stopped")
EndFunc

[/autoit]

mfg autoBert

Beiträge von autoBert

2 Listviews "verbinden"

[Läuft] µitLight Dezember '10/Januar '11

2 Listviews "verbinden"

Daten von 2-dimensionales Array in 1-dimensionales Array

2 Listviews "verbinden"

2 Listviews "verbinden"

Quiz erstellen mit einer Varriablen Anzahl von Fragen

Quiz erstellen mit einer Varriablen Anzahl von Fragen

2 Listviews "verbinden"

Quiz erstellen mit einer Varriablen Anzahl von Fragen

Quiz erstellen mit einer Varriablen Anzahl von Fragen

Refresh beim resizen einer Rebar

Datei infos ändern oder definieren

Autoscript läuft auf langsamen Pc langsamer ?

lange Ausführzeiten der exe-Dateien

Fehler in der deutschen Hilfe bitte hier melden (Hilfedatei 3.3.6.1 2011.05.27)

Funktionen werden übersprungen

Skript nach Neustart fortsetzen

Kontextmenü erkennt den Dateipfad

Schleife auf Knopfdruck verlassen?