Nö, die muss man dann im Internet suchen^^
Kann man auch mit dem Programm machen 
Allerdings findet der auch nicht immer das was man braucht:-(
Und wie man es in AutoIt machen kann steht da meist auch nicht:-(
Weiß einer eine seite wo bekannte DLL von Windows, gut beschreiben sind?
Beiträge von Jam00
-
-
Es gibt da auch ein Programm für!
-
Und wie geht das mit dem InternetExplorer?
THX für die Links! -
Ja, wie man ein Gif macht weiß ich auch!
Aber wie ich es in eine RichEdit bekomme weiß ich nicht!
Oder irgendwie anders! -
Ja, das steht in der Hilfe, aber wenn du GuiCreate machst gibt das den Handel zurück! Das ist nur für Fenster die du nich selber erstellt hast!
-
Ähm, da musst du denke ich eine Gui machen!
-
Kannst du das? Kannst du mir vieleicht ein ganz leichtes kurzes Beispiel geben?
Ich probier mal ob ich per Suche was finde, würde mich aber Trozdem freuen, danke! -
Ähm bei mir ist die nie Transpaaren! Und ausedem bruachst du das nicht: $hWnd = WinGetHandle("Sonne")
Ich mach dir das mal in ein Beispiel:Spoiler anzeigen
[autoit]#NoTrayIcon
[/autoit] [autoit][/autoit] [autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>HotKeySet ( "{ESC}", "_ende" )
[/autoit] [autoit][/autoit] [autoit]_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit]$hwnd =GUICreate ( "Sonne", @DesktopWidth, @DesktopHeight, 0, 0, $WS_POPUP, $WS_EX_TRANSPARENT )
[/autoit] [autoit][/autoit] [autoit]
GUISetState ()WinSetTrans ($hwnd,"",100) ;So machst du das Fentser transparent
[/autoit] [autoit][/autoit] [autoit]$hGraphic=_GDIPlus_GraphicsCreateFromHWND( $hwnd )
[/autoit] [autoit][/autoit] [autoit]
$Pinsel=_GDIPlus_PenCreate ( 0xFFFFFF00, 10, 2 )
_GDIPlus_GraphicsDrawArc ( $hGraphic, @DesktopWidth/1.1, -5, 170, 170, 0, 260, $Pinsel )While 1
[/autoit] [autoit][/autoit] [autoit]
Sleep (100)
WEndFunc _ende()
[/autoit]
_GDIPlus_PenDispose ( $Pinsel )
_GDIPlus_GraphicsDispose ($hGraphic)
_GDIPlus_Shutdown()
Exit
EndFunc -
Ich weiß nicht, aber wenn, wie spielt man sie ab?
In einer RichEdit hab ich mal das mit Smielys gemacht, aber da kann man nur BMP reinladen!
In eine Normale Edit bekommt man ja keine bilder, nur in RichEdit, und da eben nur BMP! -
Wie bekommt ICQ das mit den Bewegten Smylies und so hin?
Wenn man mit Info-Tool drübergeht steht da "Internet Explorer_Server", damit kann ich aber nichts anfangen
Kann mir jemad erklären wie das geht? Oder mir ein Beispiel geben? Oder irgendeine Idee?
THX im voraus für eure bemühungen! -
Such einfach mal in der Hilfe nach Control
-
Weiß da sonst keiner was?
-
Ich glaube was du schuchst ist TreeView
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <TreeViewConstants.au3>
#include <WindowsConstants.au3>#Region ### START Koda GUI section ### Form=
[/autoit] [autoit][/autoit] [autoit]
$Form1 = GUICreate("Form1", 157, 226, 193, 125)
$TreeView1 = GUICtrlCreateTreeView(4, 4, 145, 217)
$TreeView1_0 = GUICtrlCreateTreeViewItem("1", $TreeView1)
$TreeView1_1 = GUICtrlCreateTreeViewItem("1.1", $TreeView1_0)
$TreeView1_2 = GUICtrlCreateTreeViewItem("1.2", $TreeView1_0)
$TreeView1_3 = GUICtrlCreateTreeViewItem("2", $TreeView1)
$TreeView1_4 = GUICtrlCreateTreeViewItem("2.1", $TreeView1_3)
$TreeView1_5 = GUICtrlCreateTreeViewItem("2.2", $TreeView1_3)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###While 1
[/autoit] [autoit][/autoit] [autoit]
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
ExitEndSwitch
[/autoit]
WEnd -
Also du willst nicht den Text der Button veränder, sondern nur eine Zufällige nachricht? Das ist leicht
Spoiler anzeigen
[autoit]Dim $Nachricht[5]
[/autoit]
$Nachricht[0] = "1"
$Nachricht[1] = "2"
$Nachricht[2] = "3"
$Nachricht[3] = "4"
$Nachricht[4] = "5"
MsgBox (0,"",$Nachricht[Random (0,UBound($Nachricht) -1)]) -
So:
Spoiler anzeigen
[autoit]#include <StaticConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <Misc.au3>
#include "file.au3"
#include <Array.au3>Dim $dll = DllOpen("user32.dll")
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
Dim $arvocs
Dim $allvocs
Dim $englisch
Dim $deutsch
Dim $testWhile 1
[/autoit]
_FileReadToArray (@scriptdir & "\vokabeln.txt", $arvocs)
$allvocs = UBound ($arvocs) -1
$random = Random (1, $allvocs, 1)
$voc = $arvocs[$random]
If $voc == "" Then
Do
$random = Random (1, $allvocs, 1)
$voc = $arvocs[$random]
Until $voc <> ""
EndIf
$i = StringSplit ($voc, "=")
ToolTip("Deutsch",500,500,$i[1],"",1)
While 1
IF _IsPressed ("20") Then
While 1
If Not _IsPressed ("20") Then ExitLoop
WEnd
ExitLoop
EndIf
Sleep (100)
WEnd
ToolTip("Englisch",500,500,$i[2],"",3)
While 1
IF _IsPressed ("20") Then
While 1
If Not _IsPressed ("20") Then ExitLoop
WEnd
ExitLoop
EndIf
Sleep (100)
WEnd
WEnd -
Ich hab das Alte gerad mal Durchgegeguck!
Spoiler anzeigen
[autoit]#include <StaticConstants.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
#include <Misc.au3>Global $Counter = Random (1,100,1), $deutsch , $englisch, $dll = DllOpen("user32.dll"), $test
[/autoit]
$Old = ""
While 1
$deutsch = IniReadSection(@ScriptDir & "\Vokabeln.txt","Deutsch")
$englisch = IniReadSection(@ScriptDir & "\Vokabeln.txt","Englisch")
Do
$1 = Random (1,$deutsch[0][0] +1)
Until $1 <> $Old
$Old = $1
ToolTip("Deutsch",500,500,$deutsch[$1][1],"",1)
While 1
IF _IsPressed ("20") Then
While 1
If Not _IsPressed ("20") Then ExitLoop
WEnd
ExitLoop
EndIf
Sleep (100)
WEnd
ToolTip("Englisch",500,500,$englisch[$1][1],"",3)
While 1
IF _IsPressed ("20") Then
While 1
If Not _IsPressed ("20") Then ExitLoop
WEnd
ExitLoop
EndIf
Sleep (100)
WEnd
WEnd -
Oh, hab ich nicht gesehen!
Ich glaub ich verbesser das mal ein Bischen! -
Ich glaub man kann Exeltabellen auslesen, aber wie weiß ich auch nicht^^
Ähm Send ist nicht umbedingt das Beste, die Control's (z.B. ControlSetText) währen besser.Ich glaube XP hatt einen Benutzer-Max also das man nicht unentlich Benutzer machen kann, bin mir aber nicht sich und wie viele weiß ich auch nicht, kannst ja mal Googeln
-
Wie währe es wenn mal jemand die Vokabeln.txt Postet?
-
Hier ist mal ein Vokabeltrainer, da kannste Ideen sammeln