Beiträge von FireFlyer

FireFlyer

Hi,

also das mit dem Doppelklick habe ich gelöst bekommen mit dem Artikel auch aber diese Lösung ist wahrscheinlich nicht sehr gut aber ich habe gerade auch keine Möglichkeit das mit Mysql zu testen
Evtl. kannst du ja irgendwo den index der Zeile speichern und dann die Page spalte ausgeben? (keine Ahnung)

Spoiler anzeigen

[autoit]

#include<GUIConstants.au3>
#include<GUIConstantsEx.au3>
#include<WindowsConstants.au3>
#include <GUIListView.au3>

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

Dim $artikel[3][2]
$artikel [0][0] = "Hemd"
$artikel [0][1] = "www.ebay.de"

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

$artikel [1][0] = "Auto"
$artikel [1][1] = "www.google.de"

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

$artikel [2][0] = "AutoIt"
$artikel [2][1] = "www.autoit.de"

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

GUICreate("Test", 300, 300)
$hList = GUICtrlCreateList("", 10, 10)
For $i = 0 To UBound($artikel)-1
GUICtrlSetData($hList, $artikel[$i][0])
Next
GUIRegisterMsg($WM_COMMAND, "WM_COMMAND")
GUICtrlCreateInput("", 10, 280)
GUISetState()

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

While True
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd

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

Func WM_COMMAND($hWnd, $iMsg, $iwParam, $ilParam)
Local $hWndFrom, $iIDFrom, $iCode, $hWndList
If Not IsHWnd($hList) Then $hWndList = GUICtrlGetHandle($hList)
$hWndFrom = $ilParam
$iIDFrom = BitAND($iwParam, 0xFFFF) ; Low Word
$iCode = BitShift($iwParam, 16) ; Hi Word
Switch $hWndFrom
Case $hList, $hWndList ;Liste
;Console Write habe ich dazu benutzt um herauszufinden welchen $iCode der Doppelklick hat ==> 2
ConsoleWrite("$hWnd: "&$hWnd&@CRLF& _
"$iMsg: "&$iMsg&@CRLF& _
"$iwParam: "&$iwParam&@CRLF& _
"$ilParam: "&$ilParam&@CRLF& _
"$iCode: "&$iCode)
Switch $iCode
Case 2 ;Doppelklick
forwardpage()
EndSwitch
EndSwitch
EndFunc ;==>WM_NOTIFY

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

Func forwardpage()
$index = _ArraySearch($artikel, GUICtrlRead($hList))
MsgBox(0, "Res:", "Artikel: "&$artikel[$index][0]&@CRLF& _
"Seite: "&$artikel[$index][1])
EndFunc

[/autoit]

FireFlyer

Hi,

um zu prüfen ob der Cursor auf einer bestimmten Position ist benutze GUIGetCursorInfo, $array[4] gibt dir die CtrlID zurück auf dem sich der Cursor gerade befindet. Mit Hilfe dieser Abfrage kannst du bestimmt dein Script zuende schreiben (ein/ausblenden)

Ein kleines Beispiel zu GUIGetCursorInfo:

Spoiler anzeigen

[autoit]

#include<GUIConstants.au3>
GUICreate("Test", 200, 200)
GUICtrlCreateLabel("GUIGetCursorInfo Beispiel", 10, 10)
GUICtrlCreateLabel("Ctrl 1", 30, 30)
GUICtrlCreateInput("Ctrl 2", 30, 50)
$posx = GUICtrlCreateLabel("Pos X:", 10, 80, 190)
$posy = GUICtrlCreateLabel("Pos X:", 10, 100, 190)
$cli1 = GUICtrlCreateLabel("Pos X:", 10, 120, 190)
$cli2 = GUICtrlCreateLabel("Pos X:", 10, 140, 190)
$ctrl = GUICtrlCreateLabel("Pos X:", 10, 160, 190)
GUISetState()
While True
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then Exit
$mse = GUIGetCursorInfo()
If IsArray($mse) Then
GUICtrlSetData($posx, "Pos X: "&$mse[0])
GUICtrlSetData($posy, "Pos Y: "&$mse[1])
GUICtrlSetData($cli1, "Clicked M1: "&$mse[2])
GUICtrlSetData($cli2, "Clicked M2: "&$mse[3])
GUICtrlSetData($ctrl, "CtrlId: "&$mse[4])
EndIf
Sleep(50)
WEnd

[/autoit]

FireFlyer

naja im prinzip genauso
angenommen $chk[0] ist 7zip
dann machst du das bei der abfrage einfach so:

Spoiler anzeigen

[autoit]

If GUICtrlRead($chk[0]) = $GUI_CHECKED Then get_7zip()

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

Func get_7zip()
DirCreate("C:\Temp")
ShellExecute("C:\Program Files (x86)\WinSCP\WinSCP.com")
Sleep(100)
Send("open ftp://*******")
Sleep(300)
Send("{Enter}")
Sleep("500")
Send("cd Programs")
Sleep(200)
Send("{Enter}")
Sleep(200)
Send ("get 7_ZIP C:\Temp")
Sleep(200)
Send("{Enter}")
Sleep(5000)
EndFunc

[/autoit]

Desweiteren würde ich dir nicht empfehlen einen Temp Ordner zu erstellen benutze lieber @TempDir

FireFlyer

die checkboxen würde ich als array deklarieren

Spoiler anzeigen

[autoit]

Dim $chk[3]
$chk[0] = GUICtrlCreateCheckbox
$chk[1] = GUICtrlCreateCheckbox
$chk[2] = GUICtrlCreateCheckbox

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

;Und dann kannst du abfragen:

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

$chk_active = false
For $i =0 To Ubound($chk) -1
if GUICtrlRead($chk[$i]) = $GUI_CHECKED Then $chk_active = true
Next
If $chk_active = false Then MsgBox(0, "test", "es wurde keine checkbox aktiviert")

[/autoit]

FireFlyer

ja
guicreate
guictrlcreatecheckbox
guictrlcreatebutton
beim buttonklick die checkboxen abfragen und die installationsroutinen starten (am besten silent)
die installationsroutinen müssen natürlich auf das jeweilige programm angepasst werden

mfg fire

FireFlyer

[autoit]

;sowas?
$label = GUICtrlCreateLabel("Test", 0, 0)
GUICtrlSetData($label, "100")
Sleep(1000)
;rechne + 300
GUICtrlSetData($label, GUICtrlRead($label) + 300)
Sleep(1000)

[/autoit]

FireFlyer

Etwa so?

Spoiler anzeigen

[autoit]

$string = "75682E61727478652E707466"
$newstring = ""
While StringLen($string)
$newstring &= StringRight($string, 2)
$string = StringTrimRight($string, 2)
WEnd
MsgBox(0, "", $newstring)

[/autoit]

Edit: Ok blubbstar hat gewonnen er ist ne Zeile kürzer

FireFlyer

verteilt???
normalerweise von links nach rechts array index 0
und von oben nach unten array index 1

Wenn du dein Bild halt nicht in der Position der 0, 0 auf dem GUI anzeigen lässt musst du halt noch eine kleine rechnung machen so wie hier z.b.

Spoiler anzeigen

[autoit]

$pic_left = 10
$pic_top = 15
$gui = GUICreate("test", 400, 400)
$pic = GUICtrlCreatePic(@DesktopDir&"\test.jpg", $pic_left, $pic_top, 300, 280)
$label = GUICtrlCreateLabel("", 5, 285, 250, 20)
GUISetState()

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

While GUIGetMsg() <> -3
$info = GUIGetCursorInfo($gui)
if(IsArray($info) And $info[4] = $pic) Then GUICtrlSetData($label, "X: "&($info[0] - $pic_left)&" Y: "&($info[1] - $pic_top))
WEnd

[/autoit]

FireFlyer

meinst du sowas?

Spoiler anzeigen

[autoit]

$gui = GUICreate("test", 300, 300)
$pic = GUICtrlCreatePic(@DesktopDir&"\test.jpg", 0, 0, 300, 280)
$label = GUICtrlCreateLabel("", 5, 285, 250, 20)
GUISetState()

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

While GUIGetMsg() <> -3
$info = GUIGetCursorInfo($gui)
if(IsArray($info) And $info[4] = $pic) Then GUICtrlSetData($label, "X: "&$info[0]&" Y: "&$info[1])
WEnd

[/autoit]

FireFlyer

vllt auch ma die Fehlermeldung???

FireFlyer

ok aber dafür wusste ich das mit der ISO noch net... obwohls in der Hilfe noch drunter steht *kopf-->tisch* Danköööö

FireFlyer

hi die funktion die du suchst heißt _DateDayOfWeek
Als Parameter benutzt diese Funktion allerdings den Wochentag 1 (Sonntag) -7 (Samstag)
Um den Wochentag von einem Datum herauszubekommen benutze die Funktion _DateToDayOfWeek
Beide UDFs sind in der Date.au3 enthalten

FireFlyer

Spoiler anzeigen

[autoit]

Ping("www.google.de")
Switch @error
Case 1
GUICtrlSetData($STATUS, "Host is offline")
Case 2
GUICtrlSetData($STATUS, "Host is unreachable")
Case 3
GUICtrlSetData($STATUS, "Bad destination")
Case 4
GUICtrlSetData($STATUS, "Other errors")
Case Else
GuiCtrlSetData ($STATUS, "Host is online")
EndSwitch

[/autoit]

FireFlyer

[autoit]

FileInstall("C:\blabla\meinbild.jpg", @ScriptDir&"\meinbild.jpg", 1) ;wichtig 1. Parameter darf keine Wildcards und Variablen enthalten
;...
GUICtrlCreatePic(@ScriptDir&"\meinbild.jpg")

[/autoit]

Aber steht doch eig. alles in der Hilfe und nen Code wo du wenigstens was probiert hast seh ich auch net

FireFlyer

Anführungszeichen FTW

Edit: soll das was für den Wettbewerb werden?

FireFlyer

nein, das würde ich eher mit controlsend machen

MAAAN lass dir doch nicht alles aus der nase ziehen schreib doch einfach konkret was du willst

FireFlyer

[autoit]

GUISetIcon()

[/autoit]

FireFlyer

FileWrite?
FileWriteLine?

dann passiert das mit dem text reinschreiben im hintergrund...

Beispiel:

[autoit]

$text = "Das ist ein Test der über "&@CRLF&"mehrere Zeilen geht."
$hfile = FileOpen(@ScriptDir&"\test.txt", 1)
FileWrite($hfile, $text)
FileClose($hfile)
ShellExecute(@ScriptDir&"\test.txt")

[/autoit]

FireFlyer

hää?
einfach ne datei kopieren oder was meinste jetzt? <-- FileCopy

FireFlyer

Spoiler anzeigen

[autoit]

#cs ----------------------------------------------------------------------------

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

AutoIt Version: 3.3.0.0
Autor: Gun-Food
Datum: 18.02.2009

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

Skriptfunktion:
Berreinigt das TEMP Verzeichnis
#ce ----------------------------------------------------------------------------

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

; Skript Start
FileChangeDir("c:\Temp")
$suche = FileFindFirstFile("c:\Temp\*")
While 1
$datei = FileFindNextFile($suche)
If @error Then ExitLoop
$datum = FileGetTime("c:\temp\" & $datei, 1)
$yyyymd = $datum[0] & "/" & $datum[1] & "/" & $datum[2]

$ref_datum = _DateAdd('d', -7, _NowCalcDate())

if $yyyymd <= $ref_datum Then
MsgBox(0, "Datei gefunden", "Datei " & $datei & " koennte gelöscht werden")
;FileDelete("c:\Temp" & $datei)
Else
MsgBox(0, "Datei nicht gefunden","Datum aus Datei " & $yyyymd & " zu " & $ref_datum)
EndIf
WEnd
FileClose($suche)

[/autoit]

Hmm muss ma versuchen, ich kanns leider net testen und weiss net ob DateAdd auch abziehen kann

Beiträge von FireFlyer

Mysql Abfragen in Listview

MausPosition bei ComboListe

Kleines Installationsprogramm...n paar Fragen

Kleines Installationsprogramm...n paar Fragen

Auswahlfenster ertellen mittels AutoIT 3

Label , Veränderbare Daten Plus Rechnen

String umdrehen...

Bild X,Y

Bild X,Y

Input Syntaxfehler

Tag von einem Datum herausfinden

Tag von einem Datum herausfinden

Ping errorlevel 0

Bilder im Gui

Variable Umdeklarieren

Copy & Paste ?!

Gui Icon ändern

Copy & Paste ?!

Copy & Paste ?!

Dateien nach Alter löschen