Ich habe mal versucht einen eigenen Ladebalken zumachen. Mit F9 kann man die prozent angeben wieweit der Balken gefüllt werden soll. wenn ich z.B 5% eingebe dann macht er die linie auserhalb des rechtecks und 50% liegt glaub ich auch nicht genau in der mitte, weis einer was daran falsch ist?
Spoiler anzeigen
#include <GDIPlus.au3>
HotKeySet("{F9}","plus")
;0xFFA8E61D ; grün
;0xFFFF7E00 ; orange
$fenster = GUICreate("test",600,600)
GUISetBkColor(0x0033CC)
$handle = WinGetHandle($fenster)
GUISetState(@SW_SHOW)
Local $randPen,$balkenPen,$prozent
_GDIPlus_Startup()
$hGraphics = _GDIPlus_GraphicsCreateFromHWND($handle)
$loeschPen = _GDIPlus_PenCreate(0xFF0033CC,36)
$balkenPen = _GDIPlus_PenCreate(0xFFA8E61D,36)
$randPen = _GDIPlus_PenCreate(0xFFFF7E00,4)
_GDIPlus_GraphicsDrawLine($hGraphics,45,490,560,490,$randPen)
_GDIPlus_GraphicsDrawLine($hGraphics,560,490,560,530,$randPen)
_GDIPlus_GraphicsDrawLine($hGraphics,560,530,45,530,$randPen)
_GDIPlus_GraphicsDrawLine($hGraphics,45,530,45,490,$randPen)
$linie = 0
while 1
wend
func plus()
if $linie = "True" Then
_GDIPlus_GraphicsDrawLine($hGraphics,47,510,558,510,$loeschPen)
EndIf
$prozent = InputBox("","prozent?")
$rechts = $prozent * 5.58
$linie = _GDIPlus_GraphicsDrawLine($hGraphics,47,510,$rechts,510,$balkenPen)
MsgBox(0,"",$linie)
EndFunc
Danke Schonmal