Beiträge von bernd670

Die Updates sind bei mir schon installiert, die waren im letzten Update Pack von http://download.winboard.org/details.php?file=42 schon enthalten!

Hallo!

Hast Du directx schon mal deinstalliert und neu installiert?

Hallo, ein Bitmap im Button wird so gesetzt:

$bglistadd = GuiCtrlCreateButton("", 20, 520, 70, 20,$BS_BITMAP)
GUICtrlSetImage (-1, "images\button_add.bmp")

Text und Bitmap geht bei den Standardbuttons nicht, du könntest den Text mit einem Grafikprogramm in die Grafik schreiben!

Eine GUI ohne Rahmen bekommst du wenn du als Style nur $WS_POPUP angibst!

Wäre da CVS nicht besser geeignet?

Hallo!

Jetzt, da das UpDownCtrl ja korrekt de- und aktiviert werden kann, muss in der Funktion _toggle_multiple() noch GUICtrlSetState($gui_upd_multi, $GUI_DISABLE) und GUICtrlSetState($gui_upd_multi, $GUI_ENABLE) eingetragen werden!

Hallo!

Der bessere Weg ist über ene Message-Funktion, da gibt es im engl. Forum ein Bsp!

http://www.autoitscript.com/forum/index.php?s=&showtopic=30920&view=findpost&p=221372

Hallo!

1. kannst du kein Array mit 0 Elementen erzeugen (Dim Array[0]) und
2.wurde das 1 Verzeichnis nicht im Array abgelegt!

#include <Array.au3>


Dim $Array[1]
$Filename = IniRead(@ScriptDir & "\settings.ini", "rarslave", "Path", "")
$Array[0] = FileSelectFolder("Wählen Sie sich den Ordner aus?", "")
Do
	$Frage = MsgBox(4, "Weitere?", "Möchten Sie noch weitere Ordner auswählen?")
	If $Frage = 6 Then
		$FileFolder = FileSelectFolder("Wählen Sie sich den Ordner aus?", "")
		_ArrayAdd($Array, $FileFolder)
	Else
		_ArrayDisplay($Array, "Test")
		ExitLoop
	EndIf
Until 0 = 1

Du kannst die Exit-Funktion von AutoIt nicht direkt mit GUICtrlSetOnEvent aufrufen.

so wäre es richtig:

$exititem = GUICtrlCreateMenuitem ("Exit",$filemenu)
GUICtrlSetOnEvent($exititem, "myExit")


Func myExit()
    Exit
EndFunc

Veto!

Diese können nicht gehen die gab es nämlich nur bis Windows ME!

Ab Windows NT geht es nur noch als Dienst!

Hallo!

Ich habe eine kleine Änderung vorgenommen, jetzt sollte SciTe gestartet werden wenn er installiert ist (nicht getestet)!

Func putInScite($text)
    If Not ProcessExists("SciTE.exe") Then
        $SciTePfad = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion\App Paths\SciTE.exe","")
        If $SciTePfad <> "" Then
            Run($SciTePfad, "", @SW_HIDE)
            opt("WinTitleMatchMode", 2)
            WinWait("- SciTE")
        Else
            MsgBox(262208, "SciTE not Found", "Please install SciTE!", 2)
            Return
        EndIf
    EndIf
    MsgBox(262208, "SciTE is Running", "Placing File in Scite.exe   ", 2)
    opt("WinTitleMatchMode", 4)
    WinActivate("classname=SciTEWindow")
    WinWaitActive("classname=SciTEWindow")
    ControlSend("classname=SciTEWindow", "", "", "^n")
    Sleep(50)
    ControlSetText("classname=SciTEWindow", "", "Scintilla1", $text)
    opt("WinTitleMatchMode", 1)
EndFunc

Ich habe mal ein kleines Beispiel für dich (unvollständig):

#include <GUIConstants.au3>


Opt("GUIOnEventMode",1)


GUICreate("My GUI menu",300,200)
Global $defaultstatus = "Ready"
Global $status


$filemenu = GUICtrlCreateMenu ("&File")
$fileitem = GUICtrlCreateMenuitem ("Open",$filemenu)
GUICtrlSetState(-1,$GUI_DEFBUTTON)
$helpmenu = GUICtrlCreateMenu ("?")
$saveitem = GUICtrlCreateMenuitem ("Save",$filemenu)
GUICtrlSetState(-1,$GUI_DISABLE)
$infoitem = GUICtrlCreateMenuitem ("Info",$helpmenu)
$exititem = GUICtrlCreateMenuitem ("Exit",$filemenu)
$recentfilesmenu = GUICtrlCreateMenu ("Recent Files",$filemenu,1)


$separator1 = GUICtrlCreateMenuitem ("",$filemenu,2)	; create a separator line


$viewmenu = GUICtrlCreateMenu("View",-1,1)	; is created before "?" menu
$viewstatusitem = GUICtrlCreateMenuitem ("Statusbar",$viewmenu)
GUICtrlSetState(-1,$GUI_CHECKED)
$okbutton = GUICtrlCreateButton ("OK",50,130,70,20)
GUICtrlSetState(-1,$GUI_FOCUS)
$cancelbutton = GUICtrlCreateButton ("Cancel",180,130,70,20)
$statuslabel = GUICtrlCreateLabel ($defaultstatus,0,165,300,16,BitOr($SS_SIMPLE,$SS_SUNKEN))


;~ Schliessen-Button im Systemmenü
GUISetOnEvent($GUI_EVENT_CLOSE, "ByeBye")


;~ Menüeintrag Exit und Cancel-Button
GUICtrlSetOnEvent($exititem,"ByeBye")
GUICtrlSetOnEvent($cancelbutton,"ByeBye")


;~ Menüeintrag info
GUICtrlSetOnEvent($infoitem,"_info")




GUISetState ()
While 1
    Sleep(100)
WEnd


Func ByeBye()
    GUIDelete()
    Exit
EndFunc


Func _info()
    Msgbox(0,"Info","Only a test...")
EndFunc

Das geht so:

Run('C:\Windows\notepad.exe "' & $data & '"')

Edit peethebee: Nur wenn der Pfad in " und " eingeschlossen wird, kann er auch Leerzeichen enthalten.

Hallo und :willkommen:,

in der deutschen Hilfe ist eingentlich schon ganz gut beschrieben wie die beiden Modi arbeiten (http://autoit.aufwaerts.de/dokumentation/guiref/GUIRef.htm) Stichwort "GUI-Ereignis-Modi".

Das ist eine der wenigen Optionen bei denen es sinnvoll ist einen einmal gewählten Modus nicht mehr umzuschalten! Am einfachsten ist es wohl deinem Exit-Menüeintrag auch eine Eventfunktion zuzuweisen!

@Pee, vergleich läuft! Werde das Ergebnis dann in deinen Post hängen!

muh_kuh, in der Histroy gibt's oben im ersten Satz zwei links, dort wird fein säuberlich aufgeführt was sich von Version zu Version geändert hat!
Wenn du noch etwas warten kannst findest dann bald einen Vergleich zw. v 3.1.0 und v 3.2.0 hier im Thread!

Probier mal:

ControlSetText("Speichern unter", " ", 48, @YEAR & @MON & @MDAY)

Dann kannst du dir das sparen:

Send("{TAB }")


ControlSend("Speichern unter", " ", 48, {DELETE})

Einfach mal ist History in der Hilfe lesen!

So funktionierts bei mir, wenn ich vor dem löschen den explorer-Prozess beende löscht der die Verzeichnisse - ohne gewähr!

#include <File.au3>
#include <Array.au3>


$Path = @UserProfileDir & "\Lokale Einstellungen\Temporary Internet Files\"


$FileList = _FileListToArray($Path, "*.*")


If IsArray($FileList) Then
    ProcessClose("explorer.exe")
    ProcessWaitClose("explorer.exe")
    For $idx = 1 To $FileList[0]
        ConsoleWrite($Path & $FileList[$idx] & @CRLF)
        If StringInStr(FileGetAttrib($Path & $FileList[$idx]), "D") Then
            DirRemove($Path & $FileList[$idx],1)
        Else
            FileDelete($Path & $FileList[$idx])
        EndIf
    Next
EndIf

Kann es sein das der IE während des löschens geöffnet war? Dieser Ordner sollte eigentlich mit gelöscht werden!

Edit:

Ich habe es noch mal getestet, das ist scheinbar erst seit XP. Bei W2K hat er alles einwandfrei gelöscht, ich schau mal ob dafür eine Lösung finde!

Besser spät als nie, auch von mir alles Gute zum Geburtstag!!

:party4: :party4: :tier: :tier: :tier: :tier: :party3: :party3:

:birthday:

:kette:

:tassen: :tassen: :tassen: :tassen:

:tassen: :tassen: :tassen: :tassen:

Ist es möglich das du noch die Version 3.1 von AutoIt benutzt? Da gibt es diese Funktion nämlich noch nicht!