frohes neues ![]()
Beiträge von Nestos
-
-
Ich glaube es wäre besser, wenn du für die GUI den Style
[autoit]$WS_EX_TOPMOST
[/autoit]verwenden würdest.

Und das Spiel is einfach nur Top!

-
Ich glaube das ganze könnte im GUIOnEventModus gehen. Bin mir aber nicht ganz sicher.

-
Es flackert zwar ein bisschen, aber sonst: Top Arbeit!
-
-
Mir kommt vor, du kramst die ganzen Threads nur aus, um Posts zu kriegen.

-
Ich hab auch mal was gemacht.

[Blockierte Grafik: http://img5.imagebanana.com/img/8wivj181/Logo1_trans.png]
[Blockierte Grafik: http://img5.imagebanana.com/img/0n798yew/Logo2_trans.png]
Edit:
Hab noch ein Logo:
[Blockierte Grafik: http://img5.imagebanana.com/img/sfn6hxsr/Logo3_trans.png] -
Das ist mein Skript
[autoit]
[/autoit]
#Region ### START Koda GUI section ### Form=C:\Users\Michael\Desktop\AutoIT\Travianer Bot Auflösungen.kxfSchon mal die Forenregeln gelesen?

-
Der Wallpaper is ja mal wirklich genial! ;D
-
Sicher funkt das.

Is ja im OnEventModus. -
So funktioniert es:
[autoit]FileWrite($sPath & $sName & "_Secured.au3", 'Execute(_StringEncrypt(0, "' & $sCrypted & '", _HexToString(" & $sHex & "), 2)')
[/autoit]Einfach Zeile 53 damit ersetzen.

Dein Fehler war, dass du die Anführungszeichen falsch gesetzt hast.
-
Die Ursache, dass das Programm nichts berechnet, ist diese: GUICtrlRead() gibt bei Erfolg einen String zurück, der den Text des Inputs enthält.
Lösung: Du müstest den Text umwandeln lassen, sodass er auch wirklich berechnet wird.
Das geht so ungefähr:
[autoit]GUICtrlSetData($LabelTR1, Number($Erg))
[/autoit]Habs jetzt nicht getestet, müsste aber funktionieren.

-
Ich würde mich auch gerne mal an der Aufgabe versuchen. ;D
Vll bekomm ich ja was schönes hin...
-
[autoit]irgendwie ist der Code überhaupt nicht schwer, aber trotzdem kommt ein blöder Fehler
[autoit]ShellExecute("cmde")
[/autoit]
If @error Then ExitShellExecute("cmd.exe")
[/autoit]
If @error Then ExitFunktioniert so bei mir.

-
Wirklich eine schöne Funktion.

-
Danke, dass hat mir wirklich weitergeholfen.

[closed]
-
Ich habe folgendes Problem:
Ich hab ein Rechteck indem sich ein Kreis und drei Linien befinden.
Nun will ich das ganze rotieren, bekomm das aber nicht hin.Script:
Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit]Opt("GUIOnEventMode", 1)
[/autoit] [autoit][/autoit] [autoit]_GDIPlus_Startup()
[/autoit] [autoit][/autoit] [autoit]Global $hWnd
[/autoit] [autoit][/autoit] [autoit]
Global $hGraphic, $bitmap, $backbuffer, $pen, $brushGlobal $x = 250, _
[/autoit] [autoit][/autoit] [autoit]
$y = 250, _
$rotation = 180, _
$pi = 4 * ATan(1)$hWnd = GUICreate("Rotation", 500, 500, -1, -1)
[/autoit] [autoit][/autoit] [autoit]
GUISetOnEvent(-3, "_Close")
GUISetState()$hGraphic = _GDIPlus_GraphicsCreateFromHWND($hwnd)
[/autoit] [autoit][/autoit] [autoit]
$bitmap = _GDIPlus_BitmapCreateFromGraphics(500, 500, $hGraphic)
$backbuffer = _GDIPlus_ImageGetGraphicsContext($bitmap)
$pen = _GDIPlus_PenCreate(0, 1)
$brush = _GDIPlus_BrushCreateSolid(0xFF00FF00)While 1
[/autoit] [autoit][/autoit] [autoit]
_GDIPlus_GraphicsFillRect($backbuffer, 0, 0, 500, 500, $brush)
_GDIPlus_PenSetColor($pen, 0xFFFF0000)
; Berechnung für die Koordinaten
$x1 = $x - 5
$y1 = $y + 10
$x2 = $x - 5
$y2 = $y - 10
$x3 = $x + 5
$y3 = $y - 10
$x4 = $x + 5
$y4 = $y + 10
; Ende der Berechnungen
_GDIPlus_GraphicsDrawLine($backbuffer, $x1, $y1, $x2, $y2, $pen)
_GDIPlus_GraphicsDrawLine($backbuffer, $x2, $y2, $x3, $y3, $pen)
_GDIPlus_GraphicsDrawLine($backbuffer, $x3, $y3, $x4, $y4, $pen)
_GDIPlus_GraphicsDrawLine($backbuffer, $x4, $y4, $x1, $y1, $pen)
_GDIPlus_GraphicsDrawEllipse($backbuffer, $x - 3, $y -3, 6, 6, $pen)
_GDIPlus_GraphicsDrawLine($backbuffer, $x, $y - 3, $x, $y - 13, $pen)
_GDIPlus_PenSetColor($pen, 0xFF0000FF)
_GDIPlus_GraphicsDrawLine($backbuffer, $x - 3, $y - 10, $x - 3, $y - 8, $pen)
_GDIPlus_GraphicsDrawLine($backbuffer, $x + 3, $y - 10, $x + 3, $y - 8, $pen)
_GDIPlus_GraphicsDrawImageRect($hGraphic, $bitmap, 0, 0, 500, 500)
Sleep(10)
WEndFunc _Close()
[/autoit]
_GDIPlus_BrushDispose($brush)
_GDIPlus_PenDispose($pen)
_GDIPlus_GraphicsDispose($backbuffer)
_GDIPlus_BitmapDispose($bitmap)
_GDIPlus_GraphicsDispose($hGraphic)
_GDIPlus_Shutdown()
WinClose($hwnd)
Exit
EndFuncDanke schonmal für die Antworten.

MfG
H2112 -
Ja kann sie.

Ich such mal kurz das Script und die UDF.
Edit:
UDF ist im Anhang!
Für die Farben
Alles anzeigenEdit2: Bitte im zweiten Post wegen der Frage schauen. Danke!

Ich bins wieder.
Und gleich zu meiner Frage:
Ich will einen bestimmten Text in einem RichEdit Controle verändern. Doch ich bekomme das irgendwie nicht hin.Würde mich über ein Beispiel freuen.

Die UDF die ich benutze ist im Anhang.
MfG
H2112Edit:
Ich hab das Problem lösen können.
Hier die Funktion dafür:
[autoit];====================================================================================================
[/autoit]
; Function Name: _GUICtrlRichEdit_SetFontColor
; Description: Select the text color
; Parameters : $hWnd - Handle to the control
; $hColor - Color value HEX (BGR)
; $iSelect - Color entire text or selection (default)
; Return values : True on success, otherwise False
; Author : Yoan Roblet (Arcker)
; Rewritten : grham
; Notes :
;====================================================================================================
;
Func _GUICtrlRichEdit_SetFontColor($hWnd, $hColor, $iSelec = False)
Local $tCharFormat = DllStructCreate($tagCHARFORMAT2)
DllStructSetData($tCharFormat, 1, DllStructGetSize($tCharFormat))
DllStructSetData($tCharFormat, 2, $CFM_COLOR)
DllStructSetData($tCharFormat, 6, $hColor)
Local $iSelec2 = $SCF_ALL
If $iSelec Then $iSelec2 = $SCF_SELECTION
Return __GCR_SendMessage($hWnd, $EM_SETCHARFORMAT, $iSelec, DllStructGetPtr($tCharFormat))
EndFunc ;==>_GUICtrlRichEdit_SetFontColor -
Ich hab noch eine Frage bezüglich rtf Formatierungen und wollte keinen neuen Thread aufmachen.
Und jetzt zu meiner Frage:
Gibt es eine Möglichkeit, eine bestimmte Zeile zentriert zu machen?Danke schonmal für die Antworten.
MfG
h2112Edit:
[autoit]
So auch hier hab ich die Lösung gefunden:_GUICtrlRichEdit_SetParaAlignment($hRichEdit, "c")
[/autoit] -