Darter, mach du doch mal was in GDI+ das sich "Spiel" nennt !!!
Und mich habe bereits ein Spiel released !
Darter, mach du doch mal was in GDI+ das sich "Spiel" nennt !!!
Und mich habe bereits ein Spiel released !
Gibts schon eine Demo?
Darter: Er versucht wenigstens, ein Spiel zu erstellen. Du kannst ja nur andere nerven.
tince die sollte heute abend kommen, c.a. 19 - 20 Uhr !
Ich teile um 16 - 17 Uhr meine Zeitungen aus... 1 h, danach code ich die Demo !!!
Diese "Demo" wird aber erstmal nur das Spiel sein, morgen kommt dann update mit Speichern & Laden !
@EM: Sieht schon gut aus
Darter: Spuck hier nicht so große Töne mach su erstmal sowas dann kanns du über andere urteilen
Darter: Spuck hier nicht so große Töne mach su erstmal sowas dann kanns du über andere urteilen
Danke Sprenger, warum hast du nur recht ?
ach ich hab schon viel gemacht auch mit gdi+. erst letztens wieder was fertig gestellt(2500 zeilen code) nur leider entspricht es nicht unbedigt den Forenregeln und dehalb werde ich es hier auch nicht veröffentlichen
tze, Darter reiß dein M**l nicht so weit auf danke !
ach ich hab schon viel gemacht auch mit gdi+. erst letztens wieder was fertig gestellt(2500 zeilen code) nur leider entspricht es nicht unbedigt den Forenregeln und dehalb werde ich es hier auch nicht veröffentlichen
<ironie>Ah, ja genau, ich hab letztens ein 137893 Zeilen Code(Onlinegame) mit GDI+ gemacht </ironie>
hab mal schnell ne kleinigkeit zusammengebastelt. Aber das ist schon besser als deins
#Include <GDIPlus.au3>
#include <GUIConstantsEx.au3>
#include <WinAPI.au3>
#include <WindowsConstants.au3>
#Include <Misc.au3>
$change = 1
$change2 = 1
$title = "Meine GUI"
$test2 = GUICreate($title, 250, 88,@DesktopWidth-250,0,$WS_POPUP)
$winhandle = WinGetHandle($test2)
;GUICtrlCreatePic("bilder/hintergrund3.gif",0,0,250,88)
$test = GUICtrlCreatePic("bilder/button.gif",220,0,28,10)
;GUISetBkColor(0xFF3F5C)
GUISetState()
;WinsetOnTop($test,"",1)
_GDIPlus_Startup()
$hGraphics = _GDIPlus_GraphicsCreateFromHWND($winhandle)
$hImage_hintergrund = _GDIPlus_BitmapCreateFromFile("bilder/hintergrund3.gif")
;$hImage_Button_normal = _GDIPlus_BitmapCreateFromFile("bilder/button.gif")
;$hImage_Button_hover = _GDIPlus_BitmapCreateFromFile("bilder/button2.gif")
_GDIPlus_GraphicsDrawImageRect($hGraphics, $hImage_hintergrund, 0,0,250,88)
;_GDIPlus_GraphicsDrawImageRect($hGraphics, $hImage_Button_normal, 220,0,28,10)
;_GDIPlus_GraphicsDispose($hGraphics)
;$titel = GUICtrlCreateLabel("Nachricht erhalten!",20,3,200,20)
;GUICtrlSetFont($titel,10,400,2,"Comic Sans MS")
;GUICtrlSetColor ($titel, 0xFFFFFF)
;$pen = _GDIPlus_PenCreate(0xFF000000)
;_GDIPlus_GraphicsDrawString($hGraphics, "Nachricht erhalten!", 20, 0, $pen)
$hBrush = _GDIPlus_BrushCreateSolid(0xFFFFFFFF)
$hFormat = _GDIPlus_StringFormatCreate()
$hFamily = _GDIPlus_FontFamilyCreate("Comic Sans MS")
$hFont = _GDIPlus_FontCreate($hFamily, 10, 1)
$tLayout = _GDIPlus_RectFCreate(20, -2, 0, 0)
$aInfo = _GDIPlus_GraphicsMeasureString($hGraphics, "Nachricht erhalten!", $hFont, $tLayout, $hFormat)
_GDIPlus_GraphicsDrawStringEx($hGraphics, "Nachricht erhalten!", $hFont, $aInfo[0], $hFormat, $hBrush)
$hBrush = _GDIPlus_BrushCreateSolid(0xFF000000)
$hFormat = _GDIPlus_StringFormatCreate()
$hFamily = _GDIPlus_FontFamilyCreate("Comic Sans MS")
$hFont = _GDIPlus_FontCreate($hFamily, 10, 2)
$tLayout = _GDIPlus_RectFCreate(20, 50, 0, 0)
$aInfo = _GDIPlus_GraphicsMeasureString($hGraphics, "Nachricht von ... erhalten", $hFont, $tLayout, $hFormat)
_GDIPlus_GraphicsDrawStringEx($hGraphics, "Nachricht von ... erhalten", $hFont, $aInfo[0], $hFormat, $hBrush)
While 1
ohnenamen()
febterfallen()
$winpos = WinGetPos($title,"")
if IsArray($winpos) Then
If MouseGetPos(0) > $winpos[0] And MouseGetPos(0) < $winpos[0]+ $winpos[2]-30 And MouseGetPos(1) > $winpos[1] And MouseGetPos(1) < $winpos[1]+20 And _IsPressed(01) Then
;MsgBox(0,"","")
$mouspos = GUIGetCursorInfo()
Do
WinMove($title,"",MouseGetPos(0)-$mouspos[0],MouseGetPos(1)-$mouspos[1])
Until Not _IsPressed(01)
EndIf
EndIf
Sleep(10)
WEnd
Func ohnenamen()
$mouspos = GUIGetCursorInfo()
if IsArray($mouspos) Then
If $test = $mouspos[4] Then
If $change2 Then
$test = GUICtrlCreatePic("bilder/button.gif",220,0,28,10)
$change = 1
$change2 = 0
EndIf
Else
If $change Then
;GUICtrlDelete($test)
$test = GUICtrlCreatePic("bilder/button2.gif",220,0,28,10)
;_GDIPlus_GraphicsDrawImageRect($hGraphics, $hImage_Button_hover, 220,0,28,10)
$change = 0
$change2 = 1
EndIf
EndIf
If $test = $mouspos[4] And $mouspos[2] Then
Do
$mouspos = GUIGetCursorInfo()
Until not $mouspos[2]
If $test = $mouspos[4] Then Exit
EndIf
EndIf
EndFunc
Func febterfallen()
$t = 22
$i = 0
$winposoben = WinGetPos($title)
$winpos = WinGetPos($title)
If $winpos[1] < (@DesktopHeight - 130) Then
Do
For $r = $winpos[1] to $winpos[1]+2 Step 1/$t
WinMove($title,"",$winpos[0], $r)
;MsgBox(0,"",$r)
$i += $i
$pos = MouseGetPos()
$winpos = WinGetPos($title,"")
If MouseGetPos(0) > $winpos[0] And MouseGetPos(0) < $winpos[0]+ $winpos[2] And MouseGetPos(1) > $winpos[1] And MouseGetPos(1) < $winpos[1]+$winpos[3]Then
Do
ohnenamen()
Sleep(100)
$pos = MouseGetPos()
$winpos = WinGetPos($title,"")
Until MouseGetPos(0) > $winpos[0] or MouseGetPos(0) < $winpos[0]+ $winpos[2] or MouseGetPos(1) > $winpos[1] or MouseGetPos(1) < $winpos[1]+$winpos[3]
EndIf
Next
If $t = 6 Then
;MsgBox(0,"","")
Else
$t -= 1/16
;MsgBox(0,"",$t)
EndIf
$winpos = WinGetPos($title)
$winpos2 = WinGetPos($title)
Until $winpos2[1] > (@DesktopHeight - 129)
If (@DesktopHeight - $winposoben[1]) > 800 Then
$winpos = WinGetPos($title)
For $z = 1 to 160 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 20 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 20 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
If (@DesktopHeight - $winposoben[1]) > 600 And (@DesktopHeight - $winposoben[1]) < 799 Then
$winpos = WinGetPos($title)
For $z = 1 to 150 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 15 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
If (@DesktopHeight - $winposoben[1]) > 400 And (@DesktopHeight - $winposoben[1]) < 599 Then
$winpos = WinGetPos($title)
For $z = 1 to 140 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 15 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
If (@DesktopHeight - $winposoben[1]) > 200 And (@DesktopHeight - $winposoben[1]) < 399 Then
$winpos = WinGetPos($title)
For $z = 1 to 20 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 15 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
If (@DesktopHeight - $winposoben[1]) > 170 And (@DesktopHeight - $winposoben[1]) < 199 Then
$winpos = WinGetPos($title)
For $z = 1 to 3 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 3 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 10 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 6 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 6 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
If (@DesktopHeight - $winposoben[1]) > 250 And (@DesktopHeight - $winposoben[1]) < 99 Then
$winpos = WinGetPos($title)
For $z = 1 to 5 Step 1/50
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 5 Step 1/70
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 15 Step 1/90
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 5 Step 1/150
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
$winpos = WinGetPos($title)
For $z = 1 to 5 Step 1/200
WinMove($title,"",$winpos[0],$winpos[1]- $z)
Next
EndIf
EndIf
EndFunc
Das schafft man in genau 30 Zeilen Code -.-
Das schafft man in genau 30 Zeilen Code -.- Du bist echt so ein mieser Darter, das script ist geklaut
los script geklaut hmm genau ich werd wohl noch wissen, was ich gecodet hab.
Und wenn du das in 30 zeilen schaffst mit denau dem Selben effekt dann kann ich nur gw sagen.
Du bist echt so ein mieser Darter, das script ist geklaut
Woher?
Woher?
lol genau. Das ist ein teil meines netzwerk tool, welches noch nicht ganz fertig ist. Aber wenn du den Cod auch noch willst np.
Jetzt hab ich EINMAL was gesagt, und du meckerst mich sofort an
Aber jetzt bin ich ruhig
das musst du sagen? dann mach mir es mal bitte in 30 zeilen ich geb dir 30 min.
Ach und ja du musst nix von Spammen sagen unter deinem Namen steht doch nur Profi, da du immer und überall rumgespammt hast. Würde man nur die sozusagen sinnvollen Beiträge zählen würde da noch Anfänger stehen. also psssst
nope. exakt das gleiche mit dem ziechnen und dem button und der exakt gleichen bewegung.
Siehs doch ein, dass sowas nicht in 30 Zeilen code zu machen ist.
hahaha
Tut mir leid dort ist kein Button ?
Musst dich wohl vertan haben, macht nichts, passiert jedem mal
So jetzt ist endgültig schluss, der nächste Beitrag von dir zu deinem Teil wird auch reported bis du aufhörst, das ist jetzt das 3tte mal das ich dich mahne sie es ein Darter sei einfach still
Oh mein Gott, "Ich kann das besser und du kannst das nicht , und das ist geklaut und blabla...."
Kindergarten?
MfG Hellboy