Hallo Sarah,
verstehe die Frage nicht wenn der Tabbereich nicht ausreicht wird doch automatisch eine Scrollbar für die Tabs eingeblendet.
Falls du innerhalb eines TabItems einen Scrollbereich haben willst, musst du dort eine HilfsGui erstellen, siehe dazu:
[ gelöst ] Gruppe oder Bereich in GUI scrollen
mfg autoBert
Hallo mipez,
wenn du deine INI so umstellst:
[Vok]
Brot=bred
Leben=live
Wasser=waterhast du es insgeamt keichter:
[autoit]Global $Frage, $Antwort
[/autoit][autoit][/autoit][autoit]_new()
For $j = 1 To 100
_randomTest()
Next
Func _randomTest()
$aVok = IniReadSection("Vok.ini", "Vok")
$i = Random(1, $aVok[0][0], 1)
ConsoleWrite($i & @TAB)
$Frage = $aVok[$i][0]
ConsoleWrite($Frage & @TAB)
$Antwort = $aVok[$i][1]
ConsoleWrite($Antwort & @CRLF)
EndFunc ;==>_randomTest
Func _new()
$Frage = InputBox("Vokabel", "Bitte die Vokabel in Deutsch eingeben")
$Antwort = InputBox("Vokabel", "Übersetzung")
IniWrite("Vok.ini", "Vok", $Frage, $Antwort)
EndFunc ;==>_new
Am besten nimmst du
[autoit]$aVokabeln=IniReadSection(@scriptdir & "Vokabeln.ini","Vok")
$i=random(0,$aVokabeln[0],1)
$Frage = $aVokabeln[$i][0]
$Antwort = $aVokabeln[$i][1]
MsgBox(0,$Frage,$Antwort)
mfg autoBert
dann solltest du nach einem besseren Treiber für deine GraKa suchen, aber du hast ja schon einen Workaround
mfg autoBert
Hallo _peter_,
ich mache es bei meinem YT-Downlaoder (Link siehe Signatur) über Rechtsklick | Linkadresse kopieren. Hier ein Skriptauszg davon:
; *** Start added by AutoIt3Wrapper ***
#include <GUIConstantsEx.au3>
#include <ListViewConstants.au3>
#include <StaticConstants.au3>
#include <WindowsConstants.au3>
; *** End added by AutoIt3Wrapper ***
#Region ;**** Directives created by AutoIt3Wrapper_GUI ****
#AutoIt3Wrapper_Add_Constants=n
#EndRegion ;**** Directives created by AutoIt3Wrapper_GUI ****
Global $iWidht = 575, $iHeight = 300, $sURL
Global $idfrmMain = GUICreate("ins ClipBoard kopierte Links einfügen", $iWidht, $iHeight)
Global $origHWND = DllCall("user32.dll", "hwnd", "SetClipboardViewer", "hwnd", $idfrmMain), $sjpgBckgrnd
$origHWND = $origHWND[0]
Local $idLV_Down = GUICtrlCreateListView("Ur-Link: |Titel |Erfolg|DL-Link|Size|Titellänge", 10, 25, $iWidht - 20, $iHeight - 105, BitOR($LVS_SHOWSELALWAYS, $LVS_REPORT))
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
GUICtrlSetFont(-1, 9, 800)
GUICtrlSetResizing(-1, $GUI_DOCKBORDERS)
GUIRegisterMsg($WM_DRAWCLIPBOARD, "OnClipBoardChange")
GUIRegisterMsg($WM_CHANGECBCHAIN, "OnClipBoardViewerChange")
GUISetState()
while 1
$nMsgg = GuiGetMsg()
switch $nMsgg
case -3
Exit
EndSwitch
WEnd
#region Clipboard
[/autoit] [autoit][/autoit] [autoit]Func OnClipBoardChange($hWnd, $Msg, $wParam, $lParam) ;funkey Spoiler-Reader
; send notification about clipboard change to next clipviewer
DllCall("user32.dll", "int", "SendMessage", "hWnd", $origHWND, "int", $WM_DRAWCLIPBOARD, "int", $wParam, "int", $lParam)
If ClipGet() <> $sURL Then
$sURL = ClipGet()
GUICtrlCreateListViewItem($sURL & "| |", $idLV_Down)
EndIf
EndFunc ;==>OnClipBoardChange
Func OnClipBoardViewerChange($hWnd, $Msg, $wParam, $lParam) ;funkey Spoiler-Reader
; if our remembered previous clipviewer is removed then we must remember new next clipviewer
; else send notification about clipviewer change to next clipviewer
If $wParam = $origHWND Then
$origHWND = $lParam
Else
DllCall("user32.dll", "int", "SendMessage", "hWnd", $origHWND, "int", $WM_CHANGECBCHAIN, "hwnd", $wParam, "hwnd", $lParam)
EndIf
EndFunc ;==>OnClipBoardViewerChange
#endregion Clipboard
Func OnAutoitExit() ;funkey Spoiler-Reader
; send notification that we no longer will be in clipboard hook queue
DllCall("user32.dll", "int", "ChangeClipboardChain", "hwnd", $idfrmMain, "hwnd", $origHWND)
EndFunc ;==>OnAutoitExit
als Vorlage hatte ich den Spoilerreader von funkey genommen,
mfg autoBert
Thx aber mein Problem war das ich die Webcam.au3 nicht hatte,weswegen es den Snapshot Befehl nicht hab ^^'
die Datei ist doch im 1. Post im Anhang
mfg autoBert
Hallo Oscar,
danke das Umrechnen klappt, nur ist dadurch bewiesen dass meine Vermutung es handele sich um Sekundenwerte seit Epoch wiederlegt denn _DateAdd gibt darauf genauso 0 zurück wie beim Originalwert.
diesen Wert EndTime=01cb448214cfa1a0 wollte ich umrechnen Ergebnis sollte 2010/08/25 18:19:39 entsprechen, ich komme aber nicht dahinter wie er kodiert ist. Da das Erstellungsdatum der Datei meistens nur minimal von dem erwarteteten Wert abweicht, werde ich diesen nehmen
mfg autoBert
Hallo
bekomme über IniRead folgenden Wert 01cb457148063b20 (entspricht Sekunden seit epocheiner Zeitangabe ungefähr 2010/08/26 22:55:06), wie kann ich diesen in dezimal umwandeln (da _DateAdd damit nicht zurechtkommt)?
mfg autoBert
Hallo WillyWu,
läuft diese Skript (GUI nicht beachten):
#include <StaticConstants.au3>
#include <date.au3>
#include <DateTimeConstants.au3>
#include <EditConstants.au3>
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include<WindowsConstants.au3>
#include<File.au3>
#include<Array.au3>
Opt('GUIOnEventMode', 1)
;Opt('MouseCoordMode', 2)
Global $dtLU, $sAVCenter, $sReportDir, $sTitel ="Avira AntiVir Personal - Free Antivirus"
Global $iCor = 7200 ;Korekturfaktorzeit in Seknden 2Stunden da Sommerzeit
Global $sTitel = 'Beispiel zur Nutzung der _Contol-Befehle anhand Avira'
Local $hMainGui = GUICreate($sTitel, 400, 280, 140, 150, BitOR($WS_MINIMIZEBOX, $WS_MAXIMIZEBOX, $WS_SIZEBOX))
;erzeugt eine GUI die zurückgebebene ID wird in der Variablen $hMainGui gespeichert
;die GUI hat BOXen für Mininmieren, Maximieren und ist in der Größe frei änderbar
GUISetOnEvent($GUI_EVENT_CLOSE, '_End')
;Verknüpft dem Event $Gui_Event_Close mit der Funktion _End
;Menübar anzeigen
Global $menu_help = GUICtrlCreateMenu("?", -1, 1)
Global $item_help_auto = GUICtrlCreateMenuItem("Autor: (Auto)Bert", $menu_help)
Global $item_help_exit = GUICtrlCreateMenuItem("Beenden", $menu_help)
GUICtrlSetOnEvent(-1, '_End')
Local $hedtFrom = GUICtrlCreateLabel("Letztes Update", 20, 10, 170, 40)
;erzeugt ein From Steuerelement die zurückgegebene ID wird in der Variablen $hedtFrom gespeichert
;GUICtrlSetState(-1,$GUI_DISABLE)
GUICtrlSetFont(-1, 12)
GUICtrlSetResizing(-1, $GUI_DOCKLEFT + $GUI_DOCKRIGHT + $GUI_DOCKTOP + $GUI_DOCKHEIGHT)
;verankert das From Steuerelement Links, rechts, oben und fixiert die Höhe
;beim Resizen bleibt es dadurch auf seiner Position und ändert nur die Breite
GUICtrlCreateButton('&prüfen', 220, 10, 150, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "Prüfen" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
;GUICtrlSetOnEvent(-1, '_CheckReg')
;Beim Klicken des Buttons wird die Funktion _CheckReg aufgerufen
GUICtrlCreateButton('&nähere Infos', 220, 40, 150, 25)
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
;verankert den Button "Prüfen" rechts und oben und fixiert die Größe
;beim Resizen bleibt es dadurch auf seiner Position am rechten Rand
;GUICtrlSetOnEvent(-1, '_CheckAvira')
;Beim Klicken des Buttons wird die Funktion _CheckReg aufgerufen
GUICtrlCreateButton('Be&enden', 220, 115, 150, 25)
GUICtrlSetOnEvent(-1, '_END')
GUICtrlSetResizing(-1, $GUI_DOCKSIZE + $GUI_DOCKRIGHT + $GUI_DOCKTOP)
GUICtrlCreateGraphic(0, 210, 400, 2, $SS_BLACKRECT)
GUICtrlSetResizing(-1, $GUI_DOCKHEIGHT + $GUI_DOCKRIGHT + $GUI_DOCKLEFT + $GUI_DOCKBOTTOM)
Global $hStatus = GUICtrlCreateLabel("Statuus", 5, 215, 400, 25)
GUICtrlSetResizing(-1, $GUI_DOCKHEIGHT + $GUI_DOCKRIGHT + $GUI_DOCKLEFT + $GUI_DOCKBOTTOM)
;verankert das Label Links, rechts und unten; fixiert die Höhe
;beim Resizen bleibt es dadurch auf seiner Position und ändert nur die Breite wird angepasst
GUISetState()
_CheckReg()
_CheckAvira()
While 1
Sleep(120)
WEnd
Func _End()
GUIDelete($hMainGui)
Exit
EndFunc ;==>_End
Func _CheckReg()
$dtLU = _DateAdd("s",RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Avira\AntiVir Desktop","LastUpdate")+$iCor,"1970/01/01 00:00:00")
$sAVCenter = RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Avira\AntiVir Desktop","Path")
$sReportDir = StringReplace(RegRead("HKEY_LOCAL_MACHINE\SOFTWARE\Avira\AntiVir Desktop","AppDataDirectory"),"\\","\") & "Reports"
ConsoleWrite($dtLU & @CRLF)
ConsoleWrite($sAVCenter & @CRLF)
GUICtrlSetData($hedtFrom, "Letztes Update" &@CRLF & $dtLU)
EndFunc ;==>_CheckDate
Func _CheckAvira()
$aFiles = _FileListToArray($sReportDir)
dim $aReports[$aFiles[0]+1][5]
;_ArrayDisplay($aFiles)
for $i = 1 to $aFiles[0]
$sFileName = $sReportDir & "\" & $aFiles[$i]
$dtFile = FileGetTime($sFileName,1,1)
LOCAL $dtFileTime = _FormatedTime($dtFile)
;if $aFiles[$i] = "202b1e09.avl" Then consoleWrite("Treffer ")
;ConsoleWrite($sFileName & " " & $dtFile & " " & $dtFileTime & " " & StringLeft($dtLU,16) & @CRLF)
$aReports[$i][0] = $aFiles[$i]
if IniRead($sFileName,"REPORT","ReportType","") = 1 Then
$aInfo = IniReadSection($sFileName,"UPDATE")
if IsArray($aInfo) Then
$aReports[$i][1] = "Update"
$aReports[$i][2] = $aInfo[7][1]
$aReports[$i][3] = $aInfo[10][1]
$aReports[$i][4] = $aInfo[11][1]
;_ArrayDisplay($aInfo)
EndIf
Else
$aReports[$i][1] = "SCAN"
$aReports[$i][3] = IniRead($sFileName,"REPORT","Result","")
EndIf
Next
$aReports[0][0]="Dateiname"
$aReports[0][2]="UnixTime"
$aReports[0][3]="erfolgreich (1=Ja)"
$aReports[0][4]="upgedatete Dateien"
_ArrayDisplay($aReports)
EndFunc
Func _FormatedTime($dt)
Local $ret = StringLeft($dt,4) & "/" & STRINGMID($dt,5,2) & "/" & StringMid($dt,7,2) & " " & StringMid($dt,9,2) & ":" & StringMid($dt,11,2) & ":" & StringMid($dt,13,2)
Return $ret
EndFunc
bei dir durch und erscheint am Ende ein Array-Listviewdisplay ähnlich wie dieses?
mfg autoBert
Hallo MasterFire,
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 wenn du die Hilfe installiert hast findest du auch:
_FTP_ListToArray
Listet Dateinamen und/oder Verzeichnisse des aktuellen Remoteverzeichnisses.
#Include <FTPEx.au3>
_Ftp_ListToArray($l_FTPSession [, $Return_Type = 0 [, $l_Flags = 0 [, $l_Context]]])
mfg autoBert
$hFile =FileOpen("deinBild.jpg",16)
$var = FileRead($hFile)
FileClose($hFile)
mfg autoBert
na so z.B.:
[autoit]$text ="dein Text"
for $i = 1 to 4
ConsoleWrite($text & $i & @CRLF)
Next
schau dir in der Hilfe dazu die Schleifen-Befehle und Operatoren an,
mfg autoBert
Shellexecute("engine.exe /load /config debug")
[/autoit]sollte funktionieren
WinList gibt dir doch für jedes gefundene Fenster das Handle mit und wenn du statt einer Combo eine Listview nimmst kannst du jedem Fenster das entsprechene Handle zuordnen. Wie du allerdings bei 4 gleichen Fensternamen dann an das richtige die richtigen Befehle senden willst ist mir ein Rätsel, nach den bisher von dir preisgegenen Infos halte ich das Projekt für nicht durchführbar egal ob über Handle (was sich ja immerhin unterscheidet) oder über Fenstertitel (= Lotteriespiel)
mfg autoBert
Ich würde aber gerne die Do Until Schleife abrechen können, dazu habe ich ein Cancel Button
auf meiner GUI und bisher
kann keine Gui in deinem Skript finden, poste also dein komplettes Skript
mfg autoBert
Hallo substyle,
schau dir [Beispiel] MiniUrl-Manager (kleiner Webseitenverwalter) an, die Technik die ich dort verwende überträgst du dann auf dein Skript,
PS.: du solltest deinen Beitrag richtig formatieren (Zeilenumbrüche fehlen), dadurch ist dein Skript unleserlich)
mfg autoBert
Hier werden nur Threads von Admins/Mods "dicht gemacht" die den Forenregeln widersprechen.
Du kannst das aber selbst machen, indem du deinen Eröffnungspost bearbeitest, dort den Präfix (nähe Überschrift) auf gelöst stellst und danach speicherst,
mfg autoBert
Dann nenne halt das richtige Programm, oder schau di das Beispiel zu
[autoit]_WinAPI_SetParent
[/autoit]an,
mfg autoBert
also ich habe ne mediaplayer auf und diese lichtspiele das möchte ich in 200x200 in meiner gui drinne haben
für den Windowsmediaplayer gibt es AFAIK eine UDF einfach einmal die SuchFunktionbenutzen,
mfg autoBert
entsprechende Zeile(n) sind doch bereits auskommentiert, da ich diesen Error auch hatte,
mfg autoBert
das wars...
