Hallo Giesing,
soo... , dass ich beispielsweise eine fläche habe wo ich name und passwort immer unterschiedlich eingeben kann, und dann auswählen kann was er schreiben soll dh. Name, Passwort und Spamtext müssen variierbar sein...
Lies dir doch bitte mal die https://autoit.de/Forenregeln durch, danach löschst du bitte deinen Beitrag und beschäftigst dich mit etwas sinnvollerem
mfg (Auto)Bert
Hallo Andy,
du hast leider das 3. Zitat (von heenzketchup) GegX zugeordnet, aber das nur am Rande.
@all wollte mir gerade das aus #1 (http://youtube.com/watch?v=1j_fxs8mUcQ) anschauen. Und jetzt wird es bedenklich, denn:
aus YouTubeStartseite: Dieses Video wurde aufgrund eines Verstoßes gegen die Nutzungsbedingungen entfernt.
GegX wenn du nicht täglich 10 Übertstunden machen willst ( siehe #7) dann sag deinem Chef, dass die Aufgabenstellung dich überfordert und er noch einen weiteren Mitarbeiter einstellen soll oder dass der Fertigstellungstermin angepasst werden muss
mfg (Auto)Bert
Hallo Apocsis,
du könntest mit WinSetTitle zum Ziel kommen. Probier dazu mal das Beispiel aus der Hilfe zu GUICtrlCreateTabItem. Am besten baust du dort die Funktionen von Chrisatack ein und schaust ob es das ist was du suchst.
mfg (Auto)Bert
Hallo Sora White Dragon,
schau dir auch zu diesen Funktionen die Hilfe an: FileOpen, FileRead, FileWrite, FileClose, GuiCtrlRead und GuiCtrlSetData. Oder durchsuch mal das Forum SKRIPTE nach BlueEditor von xXTobi93Xx, bzw. nach HastyNotes von Sen (gibt auch noch weitere Editoren, aber diese fallen mir im Moment nicht ein).
mfg (Auto)Bert
Hallo piet,
nach meinem Rechtsverständnis würdest du mit dem Entfernen des Hinweises, dass es sich um eine mit AutoIt erstellte Exe handelt, gegen die Copyright-Bedingungen von AutoIt verstossen, da ja jede Exe den AutoIt-Interpreter integriert hat.
Du kannst ja mal diesbezüglich eine EMail an support@autoitscript. com richten und das abklären bevor du dir unnötigen Ärger einhandelst.
Du kannst allerdings, wie von Xenobiologist schon gepostet deine eigene Copyright-Vermerke mit Scite setzen.
mfg (Auto)Bert
Hallo vitalik2,
schau dir mal die Hilfe zu ContinueLoop an, ist genau dass was du benötigst
mfg (Auto)Bert
Hallo BigRox,
ich kannte diese Funktion bisher nicht, kann aber dein Problem unter XP SP3 (32 bit) nicht nachvollziehen. Folgendes etwas abgeänderte Beispiel aus der deutschen Hilfe läuft bei mir problemlos
[autoit]; Author: Zedna
;auf >exists< mit 7 Ebenen (Root = Ebene 0) angepasst (Auto)Bert
#include <GUIConstantsEx.au3>
#include <TreeviewConstants.au3>
#include <WindowsConstants.au3>
$gui = GUICreate("ControlTreeview test", 212, 212)
$treeview = GUICtrlCreateTreeView(6, 6, 200, 160, BitOR($TVS_HASBUTTONS, $TVS_HASLINES, $TVS_LINESATROOT, $TVS_CHECKBOXES), $WS_EX_CLIENTEDGE)
$h_tree = ControlGetHandle($gui, "", $treeview)
$root = GUICtrlCreateTreeViewItem("Root", $treeview)
$item1 = GUICtrlCreateTreeViewItem("Item 1", $root)
$item11 = GUICtrlCreateTreeViewItem("Item 11", $item1)
$item111 = GUICtrlCreateTreeViewItem("Item 111", $item11)
$item1111 = GUICtrlCreateTreeViewItem("Item 1111", $item111)
$item11111 = GUICtrlCreateTreeViewItem("Item 11111", $item1111)
$item111111 = GUICtrlCreateTreeViewItem("Item 111111", $item11111)
$item1111111 = GUICtrlCreateTreeViewItem("Item 1111111", $item111111)
$item2 = GUICtrlCreateTreeViewItem("Item 2", $root)
GUISetState(@SW_SHOW)
[/autoit][autoit][/autoit][autoit]; some examples
;ControlTreeView ($gui, "", $h_tree, "Expand", "Root")
$bEixsts = ControlTreeView ($gui, "", $h_tree, "Exists", "Root|Item 1|Item 11|Item 111|Item 1111|Item 11111|Item 111111|Item 1111111")
if $bEixsts then
MsgBox(0,"", "Item 1111111 existiert")
Else
MsgBox(0,"", "Item 1111111 existiert nicht")
EndIf
$bEixsts = ControlTreeView ($gui, "", $h_tree, "Exists", "Root|Item 1|Item 11|Item 111|Item 1111|Item 11111|Item 111111|Item 1111112")
if $bEixsts then
MsgBox(0,"", "Item 1111112 existiert")
Else
MsgBox(0,"", "Item 1111112 existiert nicht")
EndIf
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
Zitat aus dt. Hilfe zu dieser Funktion
Da AutoIt eine 32-bit Anwendung ist, ist es möglich, dass manche Befehle nicht verfügbar sind, wenn eine 64-bit Anwendung, beispielsweise auf einem 64-bit Windows, angesprochen wird.
mit freundlichem Gruß
(Auto)Bert
Raupi ,
hast du das Skript einmal gestartet?????
die MsgBoxen dieses Skriptes zeigen die gleichen Infos wie dein Skript, also was soll die Frage?
mfg(Auto)Bert
Hallo ScripterDrîzzt
wenn du alle Columns-Texte möchtest geht es meines Erachtens nach so am einfachsten:
[autoit]#include <GuiConstantsEx.au3>
#include <GuiListView.au3>
Opt('MustDeclareVars', 1)
[/autoit][autoit][/autoit][autoit][/autoit][autoit]_Main()
[/autoit][autoit][/autoit][autoit]Func _Main()
Local $hListView, $msg, $Button, $Temp
GUICreate("ListView Get Selected Column", 400, 320)
$hListView = GUICtrlCreateListView("Column 1|Column 2|Column 3", 2, 2, 394, 268)
GUICtrlCreateListViewItem("line1|data1|more1", $hListView)
GUICtrlCreateListViewItem("line2|data2|more2", $hListView)
GUICtrlCreateListViewItem("line3|data3|more3", $hListView)
GUICtrlCreateListViewItem("line4|data4|more4", $hListView)
GUICtrlCreateListViewItem("line5|data5|more5", $hListView)
$Button = GUICtrlCreateButton("Ergebnis", 2, 290, 100, 17)
GUISetState()
_GUICtrlListView_SetItemSelected($hListView, 0)
While 1
$msg = GUIGetMsg()
Select
Case $msg = $Button
$Temp = _GUICtrlListView_GetItemTextArray($hListView)
If $Temp[0] > 0 Then ;der Arrayeintrag 0 enthält die Spaltenanzahl
MsgBox(0, "", "Column 1 :" & $Temp[1])
MsgBox(0, "", "Column 2 :" & $Temp[2])
MsgBox(0, "", "Column 3 :" & $Temp[3])
EndIf
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
EndSelect
WEnd
GUIDelete()
EndFunc ;==>_Main
mfg (Auto)Bert
Hallo anno2008,
das Skript muss so aussehen:
#include <Array.au3>
#include <Date.au3>
;Global $hours = 0, $date = _NowCalcDate(), $days = 0, $end = '2009/08/05'
Global $hours = 23.599, $date = '2008/12/31' , $days = 0, $end = '2009/12/31'
Global $month = _DateDiff('M', $date, $end), $years = _DateDiff('Y', $date, $end), $weeks = _DateDiff('w', $date, $end)
While True
$date = _DateAdd('d', 1, $date)
$split = StringSplit($date, "/")
If (Not @error) And ($split[0] = 3) Then
Switch _DateToDayOfWeek($split[1], $split[2], $split[3])
Case 2 To 6
$hours += 8
$days += 1
Case 7
$hours += 4
$days += 1
EndSwitch
EndIf
If ($date = $end) Then ExitLoop
WEnd
MsgBox(0, "", $years & @TAB & ' Jahre' & @CRLF & $month & @TAB & ' Monate' & @CRLF & $weeks & @TAB & ' Wochen' & @CRLF & '____________________' & @CRLF & @CRLF & $days & @TAB & ' Tage' & @CRLF & $hours & @TAB & ' Stunden' & @CRLF & $hours * 60 & @TAB & ' Minuten' & @CRLF & $hours * 60 * 60 & @TAB & ' Sekunden')
[/autoit]dadurch dass du die Differenz berechnest unterschlägts du einen Tag,
mfg (Auto)Bert
Hallo zusammen,
ich versuche dieses kleine Skript im OnEvent-Modus (Original von @progandy im MsgLoop-Modus)
Opt('GUIOnEventMode', 1)
[/autoit] [autoit][/autoit] [autoit]#include<GUIConstantsEx.au3>
#include<WinAPI.au3>
#include<WindowsConstants.au3>
#include<Constants.au3>
Global $Toolbar_hoehe = 130, $Toolbar_breite = 350
Global $hfrmMain, $hfrmDropTarget, $aPosDropTarget
_Main()
;_CreateDropTarget()
Func _Main()
$hfrmMain = GUICreate("Parent")
GUISetOnEvent($GUI_EVENT_CLOSE, '_Exit')
; GUISetOnEvent($GUI_EVENT_MINIMIZE, '_Minimize')
; TraySetOnEvent($TRAY_EVENT_MOUSEOVER, '_Restore')
_CreateDropTarget(True)
GUISetState()
GUISetState(@SW_SHOW, $hfrmMain)
GUISetState(@SW_SHOW, $hfrmDropTarget)
While 1
Sleep(125)
WEnd
EndFunc ;==>_Main
Func _CreateDropTarget($bFirst = True)
$hfrmDropTarget = GUICreate("Toolbar", 165, 165, -1, -1, $WS_SYSMENU + $WS_CAPTION, $WS_EX_TOOLWINDOW,$hfrmMain)
GUISetOnEvent($GUI_EVENT_CLOSE,'_ToggleButton')
$aPosDropTarget = WinGetPos($hfrmDropTarget)
GUISetBkColor(0xaabbcc)
$btnToggle = GUICtrlCreateButton("TG", 1, 1, 28, 28)
GUICtrlSetOnEvent(-1,'_ToggleButton')
GUISetState()
if $bFirst then _ToggleButton()
While 1
Sleep(125)
WEnd
EndFunc ;==>_Main
Func _ToggleButton()
If _WinAPI_GetParent($hfrmDropTarget) <> $hfrmMain Then ; wenn es kein Child-Fenster ist, dann zu einem machen
ConsoleWrite("bin wieder Kind" & @CRLF)
GUISetStyle(BitOR($WS_CHILD,$WS_BORDER),0,$hfrmDropTarget) ; den Style ändern
_WinAPI_SetParent($hfrmDropTarget, $hfrmMain) ; einbetten
WinMove($hfrmDropTarget,"",0,0,$Toolbar_breite,$Toolbar_hoehe) ; an 0,0 des Hauptfensters schieben
_WinAPI_RedrawWindow($hfrmDropTarget) ; neu zeichenen
_WinAPI_RedrawWindow($hfrmMain) ; neu zeichenen
GUISetState(@SW_SHOW,$hfrmMain)
WinSetOnTop($hfrmDropTarget, "", 0)
Else
ConsoleWrite("bin wieder selbständig" & @CRLF)
$Pos = WinGetPos("[CLASS:Shell_TrayWnd]") ; positionieren an rechter unterer Ecke der Taskbar
$aPosDropTarget = WinGetPos($hfrmDropTarget) ; alte Position speichern
_WinAPI_SetParent($hfrmDropTarget,0) ; Parent entfernen
;WinMove($hfrmDropTarget,"",$aPosDropTarget[0],$aPosDropTarget[1],$aPosDropTarget[2],$aPosDropTarget[3]) ; an alte Position schieben
WinMove($hfrmDropTarget,"", $Pos[0]+$Pos[2]-36, $Pos[1]-36, 36, 36) ; im Traybereich anzeigen
GUISetStyle($WS_SYSMENU+$WS_CAPTION,$WS_EX_TOOLWINDOW,$hfrmDropTarget) ; neuer Style
WinSetOnTop($hfrmDropTarget, "", 1)
EndIf
EndFunc
Func _Exit()
Exit
EndFunc ;==>_Exit
wenn ich die Zeile 60 so umschreibe klappt gar nichts mehr:
GUISetStyle(BitOR($WS_POPUP, $WS_BORDER), BitOR($WS_EX_ACCEPTFILES,$WS_EX_TOPMOST),$hfrmDropTarget) ; neuer Style
[/autoit]komme auf keine Lösung: Ich setze den für mich wichtigen Stil jetzt einfach bereits bei der Erstellung und habe die Zeile gelöscht,
mfg (Auto)Bert
Hallo Drop Dead,
lies mal folgenden Artikel, dann verstehst du was subzero007 gemeint hat,
mfg (Auto)Bert
Hallo smersch,
Ja, schau dir dazu die Funktionen in der Hilfe unter Zeichenketten, Strings und FileOpen und FileRead an,
mfg (Autro)Bert
Hallo Deepred,
was spricht dagegen es über den Fenstertitel zu machen,
mfg (Auto)Bert
Hallo subzero007,
ändere Zeile 70 in
[autoit]GuICtrlSetData($Edit1, GUICtrlRead($Edit1) &@CRLF & StringTrimLeft($string,1)&@CRLF)
[/autoit]
dadurch wird die neue Ini ans Ende der EditBox angehängt,
mfg (Auto)Bert
Hallo Deepred,
kann ich nicht bestätigen. Dieses kleine DemoSkript zeigt mir die Koordinaten:
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
Opt('GUIOnEventMode', 1)
Opt("OnExitFunc", "_Close")
[/autoit] [autoit][/autoit] [autoit]Local $hMainGui = GUICreate("Testaufruf für EditBox", 400, 280, 40, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
GUISetOnEvent($GUI_EVENT_CLOSE, '_End')
Local $hlblSpalte = GUICtrlCreateLabel("", 10, 10, 200, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLeft + $GUI_DOCKTOP)
GUICtrlCreateButton('&Buchstaben (a-m)', 200, 10, 150, 25)
Local $hlblZeile = GUICtrlCreateLabel("", 10, 50, 200, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLeft + $GUI_DOCKTOP)
GUICtrlCreateButton('&Zahl (1-12', 200, 50, 150, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
Local $hlblErg = GUICtrlCreateLabel("", 10, 90, 200, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKLeft + $GUI_DOCKTOP)
GUICtrlCreateButton('be&enden', 200, 130, 150, 25)
GUICtrlSetOnEvent(-1, '_End')
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
GUISetState()
While 1
Sleep(120)
WEnd
Func _End()
Exit
EndFunc ;==>_End
Func _Close()
$size = WinGetPos("[active]")
MsgBox(0, "Die Koordinaten des aktuellen Fensters lauten (x, y, Breite, Höhe):", $size[0] & " " & $size[1] & " " & $size[2] & " " & $size[3])
; _IniWrite_Setting("GUIPositions", "Fenster1", $WinPos[0], $WinPos[1])
; GUIDelete($hMainGui)
Exit
EndFunc ;==>_End
mfg (Auto)Bert
Hallo subzero007,
sollte eigentlich reichen wenn du Zeile 41 löscht. Ich hoffe, ich habe das Problem auf die Schnelle richtig erkannt. Einfach ausprobieren.
PS.: markiere deine erledigten Threads doch bitte mit [gelöst] (nähe Überschrift beimbearbeiten des 1. Beitrags)
mfg (Auto)Bert
Hallo DeepRed,
eigentlich solltest du Schnelligkeit gegen weniger Speicherbelegung abwägen. Methode 1 ist genauso sicher wie 2, warum du in dieser aber riesige Schleifen benötigen willst ist mir unklar. Ich würde allerdings nur die Hauptgui sofort erstellen und danach bei Bedarf einmalig die jeweils benötigte weitere Gui, dies kannst du damit erreichen indem du die Variablen welche die IDs aufnehmen mit 0 vorbelegst, ist bei einem Auruf die Varaible 0 dann erstellst du, ansonsten benutzt du nur GuiSetState(), den GuiSwitch vorher nicht vergessen.
mfg (Auto)Bert
