Beiträge von x0r

x0r

sind ja schon ein paar nette Möglichkeiten, mir sind noch Folgende eingefallen:

Auf die Schnelle: Mit der genannten HWID, ich lass mir von der Person ein paar PC-Daten geben, bzw soll er ein Programm ausführen und mir die Daten zukommen lassen, daraus generiere ich einen String, den die Person in eine TXT schreiben soll. Der wird natürlich schon vorher vom Programm (beim Start) generiert und jedesmal abgefragt.

MySQL-Server: Ne Datenbank+Tabelle online gestellt, auf die bei jedem Start zugegriffen wird und ein von mir eingegebener Aktivierungsschlüssel bei erfolgreicher Prüfung gelöscht wird und somit nicht mehr verwendet werden kann.

Und die wohl suboptimalste: Ich verschick einen günstigen USB-Stick mit einem Aktivierungstool, das sich dann bei Benutzung selbst löscht und vorher natürlich die Aktivierungsdaten in die Registry schreibt

€dit: In der EXE abgelegte Passwörter sind suboptimal, da die Person das Prog ja nicht weitergeben soll/darf.

In AutoIt kompiliert ist kein Problem, die Person ist ein "DAU" (PC An/Aus & Progs starten, mehr nicht :D)

x0r

Hi all,

habe eben einen Auftrag von meinem Chef erhalten:

Er hat ein Programm (natürlich von mir geschrieben!) entdeckt, das er gerne anderen Personen zur Verfügung stellen möchte, allerdings sollen diese Personen das Prog nicht mehrfach kopieren und an anderer Stelle nutzen können.

Mir schwebt da sowas wie ein Registrierungsschlüssel vor, den man 1x eingibt und das Programm voll nutzen kann, bei weiterem kopieren und eingeben soll der aber nicht mehr funktionieren und die Programmfunktion nicht mehr gegeben sein. Natürlich ist der Schlüssel nach einmaligem Gebrauch dann nutzlos.

Wisst ihr, was ich meine?

Für Alternativen bin ich offen

Grüße,
x0r

x0r

Zitat

x0r: Nein, Privat Server sind nicht verboten, wenn dem so wäre hätte Blizzard da schon lange etwas gegen unternehmen können.

...dass der Threadersteller sowas schreibt, war mir klar

x0r

Hi,

Zitat

in die erste Zeile das Programm oder die Datei reinziehen, rechts daneben einen Namen angeben

Ich hab geschrieben "evtl kanns jemand brauchen" und nicht "wer nicht damit umgehen kann"

Keine Ahnung, warum ich irgendwelche Styles verwende, die hab ich aus nem älteren Projekt kopiert.

...und die Liste neu erstellen hat sich als funktionierend herausgestellt, glaube irgendeinen Fehler hatte ich mit "GUICtrlSetData()".

Ich finde es gut, meine Kollegen lieben es. Wie es programmiert ist, spielt keine Rolle (es kann in der Firma niemand programmieren!), solange es perfekt funktioniert - und das tut es

Gruß
x0r

x0r

Hi,

evtl kanns jemand brauchen - Teil 2

Kompiliertes Programm in den Autostart-Ordner, mit Strg+F12 anzeigen lassen (und wieder ausblenden), Programme/Dateien rein per Drag&Drop und hinzufügen.

Beim nächsten Windows-Start werden alle in der Liste stehenden Programme geöffnet. Funktioniert bei mir wunderbar und ist viel besser als der blöde Autostart-Ordner von Windows

Spoiler anzeigen

[autoit]

;GUI Autostart

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

#NoTrayIcon

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

Global $toggle = 1
Global $ini = @UserProfileDir & "\autostart.ini"

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

HotKeySet("^{F12}","guitoggle")

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

#include <date.au3>
#include <file.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIComboBoxEx.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <WindowsConstants.au3>

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

$Form1 = GUICreate("Autostart-Manager v1.0 by x0r", 627, 454, 192, 114, Default, $WS_EX_ACCEPTFILES)
$list = GUICtrlCreateList("", 16, 48, 481, 383)
$addin = GUICtrlCreateInput("", 16, 16, 593, 21)
GUICtrlSetState(-1, $GUI_DROPACCEPTED)
$add = GUICtrlCreateButton("Hinzufügen", 512, 48, 99, 25, $WS_GROUP)
$del = GUICtrlCreateButton("Löschen", 512, 80, 99, 25, $WS_GROUP)
$runini = GUICtrlCreateButton("ini öffnen", 512, 300, 99, 25, $WS_GROUP)
$xit = GUICtrlCreateButton("Beenden", 512, 408, 99, 25, $WS_GROUP)
GUISetState(@SW_SHOW)

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

guitoggle()
fillbox()
startup()

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $add
saveds()
GUICtrlSetData($addin,"")
Case $del
deleteentry()
Case $runini
ShellExecute($ini)
Case $xit
Local $a = MsgBox(68,"Beenden","Sicher?")
if $a = 6 Then Exit
Case $GUI_EVENT_CLOSE
send("^{F12}")
EndSwitch
WEnd

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

func startup()
$cnt = _FileCountLines($ini)
For $i = 2 to $cnt
$sec = FileReadLine($ini, $i)
$sec = StringSplit($sec,"=")
if $sec[2] <> "" then
ShellExecute($sec[2])
sleep(500) ;Timer je nach Bedarf
EndIf
Next
EndFunc

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

func guitoggle()
$toggle = BitXOR($toggle,1)
if $toggle = 1 Then GUISetState(@SW_SHOW)
if $toggle = 0 Then GUISetState(@SW_HIDE)
EndFunc

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

Func fillbox()
GUICtrlSetData($list, "")
$cnt = _FileCountLines($ini)
For $i = 2 to $cnt
$sec = FileReadLine($ini, $i)
GUICtrlSetData($list, $sec)
Next
EndFunc

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

Func saveds()
Local $additem = GUICtrlRead($addin)
if $additem <> "" then IniWrite($ini, "start", _Now(), $additem)
fillbox()
EndFunc

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

Func deleteentry()
if GUICtrlRead($list) <> "" Then
local $reallydel = MsgBox(36, "Eintrag löschen", "Sicher?")
If $reallydel = 6 Then
Local $proj1 = GUICtrlRead($list)
$proj1 = StringSplit($proj1,"=")
IniDelete($ini, "start", $proj1[1])
fillbox()
EndIf
EndIf
EndFunc

[/autoit]

Viel Spass damit,
x0r

x0r

Hi,

evlt kanns jemand brauchen.

GUI ist Drag&Drop-kompatibel, in die erste Zeile das Programm oder die Datei reinziehen, rechts daneben einen Namen angeben, hinzufügen und der Rest sollte selbsterklärend sein

Spoiler anzeigen

[autoit]

#include <array.au3>
#include <file.au3>
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <GUIListBox.au3>
#include <GUIComboBox.au3>
#include <GUIListView.au3>
#include <WindowsConstants.au3>

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

Global $list1, $active = 0

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

$Form1 = GUICreate("Projekte", 633, 454, 192, 114, BitOR($WS_MINIMIZEBOX, $WS_SYSMENU, $WS_CAPTION, $WS_POPUP, $WS_POPUPWINDOW, $WS_GROUP, $WS_BORDER, $WS_CLIPSIBLINGS), $WS_EX_ACCEPTFILES)
$list1 = GUICtrlCreateList("", 8, 48, 537, 396, BitOR($WS_BORDER, $LBS_MULTIPLESEL))
$add = GUICtrlCreateButton("Add", 552, 16, 75, 25, $WS_GROUP)
GUICtrlSetState(-1, $GUI_DISABLE)
$start = GUICtrlCreateButton("Start", 552, 56, 75, 25, $WS_GROUP)
$mark = GUICtrlCreateButton("Select All", 552, 96, 75, 25, $WS_GROUP)
$del = GUICtrlCreateButton("Delete", 552, 416, 75, 25, $WS_GROUP)
$in = GUICtrlCreateInput("", 8, 16, 409, 21)
GUICtrlSetState(-1, $GUI_ACCEPTFILES)
$camp = GUICtrlCreateInput("", 424, 16, 121, 21)
GUISetState(@SW_SHOW)

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

Global $ini = @ScriptDir & "\Projekte.ini"

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

filllist()
Global $marking = 0

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $start
start()
Case $add
add()
Case $del
del()
Case $mark
if $marking = 1 Then
_GUICtrlListBox_ResetContent($list1)
filllist()
$marking = 0
GUICtrlSetData($mark, "Select All")
ElseIf $marking = 0 Then
_GUICtrlListBox_SelItemRange($list1, 0, _GUICtrlListBox_GetCount($list1))
$marking = 1
GUICtrlSetData($mark, "Unselect All")
EndIf

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

Case $GUI_EVENT_CLOSE
Exit
EndSwitch

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

If GUICtrlRead($in) <> "" And GUICtrlRead($camp) <> "" And $active = 0 Then
GUICtrlSetState($add, $GUI_ENABLE)
$active = 1
EndIf
WEnd

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

Func filllist()
_GUICtrlListBox_Destroy($list1)
$list1 = GUICtrlCreateList("", 8, 48, 537, 396, BitOR($WS_BORDER, $LBS_MULTIPLESEL))
Local $sec = IniReadSection($ini, "proj")
_ArraySort($sec)
For $i = 1 To UBound($sec, 1) - 1
_GUICtrlListBox_AddString($list1, $sec[$i][0] & " > " & IniRead($ini, "proj", $sec[$i][0], "") & @LF)
Next
EndFunc ;==>filllist

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

Func add()
IniWrite($ini, "proj", GUICtrlRead($camp), GUICtrlRead($in))
GUICtrlSetData($in, "")
GUICtrlSetData($camp, "")
GUICtrlSetState($add, $GUI_DISABLE)
$active = 0
filllist()
EndFunc ;==>add

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

Func del()
Local $test = _GUICtrlListBox_GetSelItemsText($list1)
if UBound($test) > 1 Then
local $a = MsgBox(68,"Löschen","Sicher?")
if $a = 6 Then
For $x = 1 To $test[0]
Local $boom = StringSplit($test[$x], " > ")
IniDelete($ini, "proj", $boom[1])
Next
filllist()
EndIf
EndIf
EndFunc ;==>del

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

Func start()
Local $test = _GUICtrlListBox_GetSelItemsText($list1)
For $x = 1 To $test[0]
Local $boom = StringSplit($test[$x], ">")
ShellExecute(StringTrimLeft(StringTrimRight($boom[2],1),1))
sleep(1000)
Next
EndFunc ;==>start

[/autoit]

Gruß
x0r

x0r

Déjà-vu? ich hab doch grad genau das geschrieben, oder nicht?

x0r

Hi,

ich hab die ganzen Links immer extrahiert und in einer txt abgelegt, von dort aus dann jeden Einzelnen aufgerufen und die entsprechenden Infos raus geholt (mit _InetGetSource() und mit _StringBetween() gearbeitet).

So mach ich das bis heute, das funktioniert eigentlich am Besten

Gruß
x0r

x0r

Die Realmliste muss man nur ändern, wenn man auf illegalen & privaten Servern spielt und da das laut Blizzards AGB verboten ist, sollte hier auch kein Support gegeben werden

x0r

Fragt mich nicht warum, aber so funktionierts annehmbar!!!

Spoiler anzeigen

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

#AutoIt3Wrapper_UseX64=n
#include <array.au3>
#include <date.au3>
#include <GDIPlus.au3>
#include <MPDF_UDF.au3>
#include <screencapture.au3>
#include <imagesearch.au3>

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

screencap()

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

Func screencap()

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

If FileExists(@ScriptDir & "\Image2PDF.pdf") Then FileDelete(@ScriptDir & "\Image2PDF.pdf")

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

$var = @DesktopDir & "\Screens\" & @UserName & ".jpeg"
$var2 = @DesktopDir & "\Screens\" & @UserName & "2.jpeg"

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

$pic = _ScreenCapture_Capture("")
_ScreenCapture_SaveImage($var, $pic)

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

_rotate90($var, $var2)

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

;PDF erstellen
Local $aImgs = $var2

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

_SetTitle("Test")
_SetSubject("Test")
_SetKeywords("pdf, Test")
_OpenAfter(True);open after generation
_SetUnit($PDF_UNIT_CM)
_SetPaperSize("A4")
_SetZoomMode($PDF_ZOOM_CUSTOM, 90)

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

_InitPDF(@ScriptDir & "\Image2PDF.pdf")

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

_SetPaperSize("CUSTOM", 1920, 1920) ; A4 landscape
_SetOrientation($PDF_ORIENTATION_LANDSCAPE)

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

_SetLayoutMode($PDF_LAYOUT_CONTINOUS)

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

_LoadResImage("img", $aImgs)

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

_BeginPage()

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

_InsertImage("img", 0, 0, _GetPageWidth() / _GetUnit(), _GetPageHeight() / _GetUnit())
_EndPage()

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

_ClosePDFFile()

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

EndFunc ;==>screencap

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

Func _Rotate90($ZielImage, $ZielPfad)
_GDIPlus_Startup()

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

$hImage2 = _GDIPlus_BitmapCreateFromFile($ZielImage)
$Width = _GDIPlus_ImageGetWidth($hImage2)
$Height = _GDIPlus_ImageGetHeight($hImage2)
$hBitmap1 = _ScreenCapture_Capture("", 0, 0, $Height, $Width)
$hImage1 = _GDIPlus_BitmapCreateFromHBITMAP($hBitmap1)
$hGraphic = _GDIPlus_ImageGetGraphicsContext($hImage1)

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

$hMatrix = _GDIPlus_MatrixCreate()
_GDIPlus_MatrixTranslate($hMatrix, $Height * 2, -$Width)
_GDIPlus_MatrixRotate($hMatrix, 90, "False")
_GDIPlus_GraphicsSetTransform($hGraphic, $hMatrix)
_GDIPlus_GraphicsDrawImage($hGraphic, $hImage2, $Width, $Height)

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

$result = _GDIPlus_ImageSaveToFile($hImage1, $ZielPfad)

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

_GDIPlus_MatrixDispose($hMatrix)
_GDIPlus_ImageDispose($hImage1)
_GDIPlus_ImageDispose($hImage2)
_WinAPI_DeleteObject($hBitmap1)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_Shutdown()
Return $result
EndFunc ;==>_Rotate90

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

Danke an alle Beteiligten für die Tips

Gruß
x0r

x0r

Danke für die Antwort, ich werde es am Montag direkt mal testen, wenns funktioniert => klasse!!!

x0r

Hi UEZ,

dein Programm ist echt spitzenklasse.

Allerdings wird das Screenshot im Querformat in ein Hochformat-PDF eingefügt.

Kann ich das Format des PDFs irgendwie ändern?

Gruß
x0r

x0r

Hi all,

da es doch nicht so funktioniert, wie ich es mir vorgestellt hatte und ich sowieso schon wieder viel zu lange damit rumspiele, schreib ich jetz mal was

Ich möchte einen Screenshot eines Formular einer MS Access Datenbank machen und diesen in ein PDF einfügen.

Screenshot erzeugen, speichern und einfügen funktioniert auch, allerdings ist dann die Skalierung total im ***. Hab nun rausgefunden, dass wenn ich den Screenshot vorher um 90° drehe, dann einfüge und wieder zurückdrehe, die Skalierung einwandfrei ist. Gibts da nicht eine andere Möglichkeit?

Das Script bis jetzt:

Spoiler anzeigen

[autoit]

#include <date.au3>
#include <GDIPlus.au3>
#include <MPDF_UDF.au3>
#include <screencapture.au3>

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

WinActivate("PDF-Formular")
screencap()

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

Func screencap()

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

If FileExists(@ScriptDir & "\Image2PDF.pdf") Then FileDelete(@ScriptDir & "\Image2PDF.pdf")

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

$now = StringReplace(_Now(), ":", "_")
$now = StringReplace($now, ".", "_")
$now = StringReplace($now, " ", "_")
$now = StringReplace($now, ",", "_")
$rnd = Random(1, 9999, 1)
$var = @DesktopDir & "\Screens\DB_" & @UserName & "_" & $now & "_" & $rnd & ".jpg"

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

$pic = _ScreenCapture_Capture("")
_ScreenCapture_SaveImage($var, $pic)

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

;bild drehen
;~ _GDIPlus_Startup()
;~ $hImage = _GDIPlus_ImageLoadFromFile($var)
;~ $sCLSID = _GDIPlus_EncodersGetCLSID("JPG")
;~ $tData = DllStructCreate("int Data")
;~ DllStructSetData($tData, "Data", $GDIP_EVTTRANSFORMROTATE90)
;~ $tParams = _GDIPlus_ParamInit(1)
;~ _GDIPlus_ParamAdd($tParams, $GDIP_EPGTRANSFORMATION, 1, $GDIP_EPTLONG, DllStructGetPtr($tData, "Data"))
;~ _GDIPlus_ImageSaveToFileEx($hImage, $var, $sCLSID, DllStructGetPtr($tParams))
;~ _GDIPlus_Shutdown()

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

;PDF erstellen
Local $aImgs = $var

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

;set the properties for the pdf
_SetTitle("Image2PDF")
_SetSubject("Convert image(s) to pdf")
_SetKeywords("pdf, AutoIt")
_OpenAfter(True);open after generation
_SetUnit($PDF_UNIT_CM)
_SetPaperSize("a3")
_SetZoomMode($PDF_ZOOM_CUSTOM, 90)

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

_SetOrientation($PDF_ORIENTATION_LANDSCAPE)
;~ _SetOrientation($PDF_ORIENTATION_PORTRAIT)

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

_SetLayoutMode($PDF_LAYOUT_DEFAULT)
;~ _SetLayoutMode($PDF_LAYOUT_CONTINOUS)

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

;initialize the pdf
_InitPDF(@ScriptDir & "\Image2PDF.pdf")

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

;=== load resources used in pdf ===
_LoadResImage("img", $aImgs)

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

;load each image on it's own page
_BeginPage()
;scale image to paper size!
;~ _InsertImage("img", 0, 0, _GetPageWidth(), _GetPageHeight())
_InsertImage("img", 0, 0, _GetPageWidth() / _GetUnit(), _GetPageHeight() / _GetUnit())
_EndPage()

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

;then, finally, write the buffer to disk
_ClosePDFFile()

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

;~ FileDelete($var)
EndFunc ;==>screencap

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

Wär super, wenn einer (oder zwei) etwas tolles wüssten

Danke & Gruß
x0r

x0r

schreib deine #include's oben rein, nicht in irgendeine funktion..

€dit:

Zitat

statt Benutzername und Passwort, den Benutzername und das Passwort anzeigen

x0r

du solltest dir in Scite mal "Strg+T" angewöhnen.. dann sehen nämlich auch die screenshots besser aus - warum eigentlich screenshots?!

x0r

...also in der fehlermeldung steht doch, dass $result nicht deklariert ist. DAS STEHT DA WIRKLICH!!!

x0r

kann sein, dass es in den udf's schon was gibt, aber hier meine schnelle hms-lösung

die kannst bestimmt da mit einbauen:

[autoit]

MsgBox(0,"",hms(299))

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

func hms($var)

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

;~ $var = $var / 1000 ;falls der wert in ms angegeben ist (1000 = 1 sekunde)

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

local $h = 0, $m = 0, $s = 0

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

for $i = 1 to $var
$s += 1
if $s = 60 Then
$m += 1
$s = 0
EndIf

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

if $m = 60 Then
$h += 1
$m = 0
EndIf
Next

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

if StringLen($h) = 1 Then $h = "0" & $h
if StringLen($m) = 1 Then $m = "0" & $m
if StringLen($s) = 1 Then $s = "0" & $s

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

return $h & ":" & $m & ":" & $s

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

EndFunc

[/autoit]

x0r

von miraus kann die komplexität bzw unübersichtlichkeit sehr hoch sein, solange es funktioniert..
durchsteigen muss im endeffekt jeder einzelne für sich.

ich würde, wenn die schleife bei ubound angekommen ist und result immernoch 0 ist, ne zweite variable auf 1 setzen, die dann die äußere schleife beendet.
so war das eigentlich auch eben gemeint, allerdings wirklich sinnfrei

x0r

[autoit]

While TimerDiff($iTimer) < $iTimeout
For $i = 0 To UBound($aPics) - 1
$bResult = _ImageSearch(@ScriptDir & "/Data/" & $aPics[$i] & ".bmp", 1, $iX, $iY, $iTol)
If $bResult = 1 Then ExitLoop
Sleep(50)
Next
if $bResult = 1 then ExitLoop
WEnd

[/autoit]

sowas in der art schonmal in betracht gezogen?
(die option bei exitloop hab ich noch nie benutzt)

x0r

grad getestet, funktioniert einwandfrei (habe auch ein 1x4 px großes Papierkorb-Bild gemacht ;))

[autoit]

#include <imagesearch.au3>
#AutoIt3Wrapper_UseX64=n

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

Global $ix, $iy, $itol, $bresult

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

$bResult = _ImageSearch(@ScriptDir & "\ausschnitt.bmp", 1, $iX, $iY, $iTol)
If $bResult = 1 Then MouseMove($ix, $iy)

[/autoit]

Beiträge von x0r

Serial Key

Serial Key

txt in die gui einfügen

Projekt Starter

Autostart Manager

Projekt Starter

Bestimmte Internetlinks automatisch anklicken lassen

Bestimmte Internetlinks automatisch anklicken lassen

txt in die gui einfügen

Screenshot in PDF einfügen

Screenshot in PDF einfügen

Screenshot in PDF einfügen

Screenshot in PDF einfügen

Eigenes Macro Tool

ImageSearch Versuch

ImageSearch Versuch

Countdown Timer (Variable)

ImageSearch Versuch

ImageSearch Versuch

ImageSearch Versuch