nicht schlecht, die hält sich ganz schön lang
Beiträge von Schnitzel
-
-
der exit buton funktioniert nicht
das liegt an der zeile:
[autoit]GUICtrlSetOnEvent($GUI_EVENT_CLOSE, "_Exit")
[/autoit]
[autoit]
richtig müsste sie heißenGUISetOnEvent($GUI_EVENT_CLOSE, "_Exit")
[/autoit]da $GUI_EVENT_CLOSE kein control ist
-
könnte der fehler vllt sein dass du ein bild überschreiben willst?
probiers mal mit anderem speicherpfad
Spoiler anzeigen
[autoit]#include <GDIPlus.au3>
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Global enum _
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
$RotateNoneFlipNone = 0 , _
$Rotate90FlipNone = 1 , _
$Rotate180FlipNone = 2 , _
$Rotate270FlipNone = 3 , _
$RotateNoneFlipX = 4 , _
$Rotate90FlipX = 5 , _
$Rotate180FlipX = 6 , _
$Rotate270FlipX = 7 , _
$RotateNoneFlipY = 6 , _
$Rotate90FlipY = 7 , _
$Rotate180FlipY = 4 , _
$Rotate270FlipY = 5 , _
$RotateNoneFlipXY = 6 , _
$Rotate90FlipXY = 7 , _
$Rotate180FlipXY = 0 , _
$Rotate270FlipXY = 1_GDIPlus_Startup ()
[/autoit]
$hImage = _GDIPlus_ImageLoadFromFile ("D:\ABCD.jpg")
DllCall($ghGDIPDll,"int","GdipImageRotateFlip","ptr",$hImage,"long",$RotateNoneFlipX)
_GDIPlus_ImageSaveToFile ($hImage,"D:\ABCD_gespiegelt.jpg")
_GDIPlus_ImageDispose($hImage)
_GDIPlus_ShutDown () -
ich schätze mal das hier hilft dir weiter, da funktionierts ;-):
[ offen ] Bilder spiegeln
-
0x steht generell für nen hex wert und die werden soweit ich weiß egtl standardmäßig groß geschrieben.
aber wenn du meinst kannst dus ja umwandeln:
msgbox(0,"",Stringtrimleft(StringLower ( "0x098F6BCD4621D373CADE4E832627B4F6"), 2))
-
ich hab zwar noch nie mit richedit gearbeitet aber brauchst du vllt sowas wie:
_GUICtrlRichEdit_Destroy($RichEdit_1)
_GUICtrlRichEdit_Destroy($RichEdit_2)bei mir kommt keine fehlermeldung, aber das script wird auch nicht sauber beendet, mit den Destroy befehlen gehts dann...
-
-
wärs da nicht das leichteste in der swf den schwarzen rand wegzuschneiden?
-
Bei Schnitzels Beispiel müssen alle Controls direkt hintereinander erstellt werden
und? er will sie ja auch in ner schleife erstellen, da ist es dann ja ziemlich egal.
abwechseld controls erstellen die nicht selbe funktionen enthalten is meines erachtens sehr unsauber. da macht man lieber nochmal ne schleifeIm OnEvent Mode geht das alles aber noch wesentlich einfacher!
ja leider ist der sehr unbeliebt...
obwohls egtl sehr viel leichter geht -
bei mir stürzt das script auch ab.
unter welchen os habt ihr es denn laufen
und welche autoit version? -
vllt hilft dir ja ein einfaches beispiel weiter
Spoiler anzeigen
[autoit]#include <GUIConstants.au3>
[/autoit] [autoit][/autoit] [autoit]
Dim $Button[5]
$Form1 = GUICreate("", 270, 190)
For $i = 0 to 4
$Button[$i] = GUICtrlCreateButton("Button" & $i, 8, 9+35*$i, 250, 30, 0)
next
GUISetState(@SW_SHOW)While 1
[/autoit]
$nMsg = GUIGetMsg(1)
Switch $nMsg[0]
Case $GUI_EVENT_CLOSE
Exit
Case $Button[0] to $Button[4]
msgbox(0,"","Die button id ist " & $nMsg[0] & @crlf & "das button handle ist: " & $nMsg[2])
EndSwitch
WEnd -
gut wäre auch wenn du sie ausfühlich kommentierst am besten sowas in der art über die funktion schreiben:
Spoiler anzeigen
[autoit];===============================================================================
[/autoit]
; Function Name: _MeineFunktion()
; Description: Das macht die funktion
; Parameter(s): $parameter1 - was ist parameter1
; $parameter2 - was ist parameter2
; [Default]==> was wird als standardwert verwendet
; Requirement(s): #include <guiconstants.au3>, welche includes werden benötigt
; Return Value(s): On Success - Mode = 1: was wird zurükgegeben
; On Failure: returns 0 and @error set to 1, was wird bei fehlern zurückgegeben
; Author(s): Deinname
;===============================================================================sowas in der art über jede funktion.
die funktionen sollten eigenständig arbeiten und ein möglichst gutes error handling haben. damit man genau weiß wo der fehler lag
-
bei so einfachen scripten bräuchtest du doch die FF.au3 garnicht.
Spoiler anzeigen
[autoit]#include<GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include<FF.au3>$hGUI = GUICreate("MedizinGUI", 400, 400)
[/autoit] [autoit][/autoit] [autoit]
$herzbutton = GUICtrlCreateButton("Das Herz", 10, 20)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]$msg = GUIGetMsg()
[/autoit] [autoit][/autoit] [autoit]Switch $msg
[/autoit] [autoit][/autoit] [autoit]Case $GUI_EVENT_CLOSE
[/autoit] [autoit][/autoit] [autoit]
ExitLoopCase $herzbutton
[/autoit] [autoit][/autoit] [autoit]
Herz_1()EndSwitch
[/autoit] [autoit][/autoit] [autoit]WEnd
[/autoit] [autoit][/autoit] [autoit]Func Herz_1()
[/autoit] [autoit][/autoit] [autoit]GUISetState(0, $hGUI)
[/autoit] [autoit][/autoit] [autoit]
$herzGUI = GUICreate("Das Herz", 300, 300)
$grundlagebutton = GUICtrlCreateButton("Grundlage", 10, 20)
$kardiologebutton = GUICtrlCreateButton("Der Kardiologe", 10, 50)
$aufbauherzbutton = GUICtrlCreateButton("Aufbau & Funktion des Herzens", 10, 80)
$aufbaukreislaufbutton = GUICtrlCreateButton("Aufbau & Funktion des Blutkreislaufs", 10, 110)
$herzschlagbutton = GUICtrlCreateButton("Wie schlägt das Herz?", 10, 140)
$begriffebutton = GUICtrlCreateButton("Begriffe rund ums Herz", 10, 170)
$herzsportbutton = GUICtrlCreateButton("Herz/Kreislauf & Sport", 10, 200)
$herzschwangerschaftbutton = GUICtrlCreateButton("Herz/Kreislauf & Sport", 10, 230)
$herzkreiserkrankungen = GUICtrlCreateButton("Herz-Kreislauf-Erkrankungen", 10, 260)
GUISetState(@SW_SHOW)While 1
[/autoit] [autoit][/autoit] [autoit]$msg = GUIGetMsg()
[/autoit] [autoit][/autoit] [autoit]Switch $msg
[/autoit] [autoit][/autoit] [autoit]Case $GUI_EVENT_CLOSE
[/autoit] [autoit][/autoit] [autoit]
ExitLoopCase $grundlagebutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_kardiologe-herz-kreislauf_177.html")Case $kardiologebutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_kardiologe_1733.html")Case $aufbauherzbutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_herz-herzmuskel-herzbeutel_588.html")Case $aufbaukreislaufbutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_blutkreislauf-herz-blutgefaesse_591.html")Case $herzschlagbutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_wie-schlaegt-das-herz_594.html")Case $begriffebutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_wichtige-begriffe-rund-ums-herz_586.html")Case $herzsportbutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_herz-kreislauf-sport_587.html")Case $herzschwangerschaftbutton
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_herz-kreislauf-schwangerschaft_595.html")Case $herzkreiserkrankungen
[/autoit] [autoit][/autoit] [autoit]
Shellexecute("http://www.internisten-im-netz.de/de_herz-kreislauf-erkrankungen_596.html")EndSwitch
[/autoit] [autoit][/autoit] [autoit]WEnd
[/autoit] [autoit][/autoit] [autoit]GUIDelete($herzGUI)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUISetState(@SW_SHOW, $hGUI)EndFunc ;==>Herz_1
[/autoit]ist das eine alternative für dich?
-
deswegen solltest du die control-id's in einem array speichern.
[autoit]$var = IniReadSection(@ScriptDir & "\settings.ini", "Settings")
[/autoit]
If isarray($var) Then
Dim $item[ubound($var)]
For $i = 1 To $var[0][0]
$item[$i] = GUICtrlCreateListViewItem($var[$i][0] & "|" & $var[$i][1], $listview3)
Next
endifin etwa so.
mit dem richtigen index kannst du dann jedes element wieder abfragen
-
ich komm mit deiner beschreibung nicht so ganz zurecht. und ich denke es geht anderen genauso.
bitte beschreib dein problem ausführlich eindeutig und schritt für schritt, so machst dus uns viel leichter
-
es gibt keinen array index -1 der erste index is immer 0
-
dazu brauchst du doch nur Filedelete und vielleicht noch ein _filelisttoarray
-
ich habs auch nicht gekannt. is echt cool. und klasse umgesetzt
jetz gibt auch endlich dein bild einen sinn
-
wenndann musst dus schon eher so verwenden...
Spoiler anzeigen
[autoit]#include <GUIConstantsEx.au3>
[/autoit] [autoit][/autoit] [autoit]
#include <WindowsConstants.au3>
#Region OPT
Opt("TrayMenuMode", 1)
#EndRegion OPT#Region Tray
[/autoit] [autoit][/autoit] [autoit]
$totray = TrayCreateItem("Show")
TraySetState()
#EndRegion Tray$width = 380
[/autoit] [autoit][/autoit] [autoit]
$height = 650
$hwnd = GUICreate("INRadio-Localtuner", $width, $height, -1, -1, Default, $WS_EX_ACCEPTFILES)
$Close = GUICtrlCreateButton("Close", 296, 160, 75, 25, 0)
$Play = GUICtrlCreateButton("Play", 216, 160, 75, 25, 0)
$Stop = GUICtrlCreateButton("Stop", 136, 160, 75, 25, 0)
$newfile = GUICtrlCreateButton("Andere Datei", 36, 160, 75, 25, 0)
$progress_slider = GUICtrlCreateProgress(8, 32, 236, 20)
$slots = GUICtrlCreateLabel(GUICtrlRead($progress_slider), 8, 8, 150, 17)
$ordner = GUICtrlCreateButton("Neue Bibliothek", 136, 330)
GUICtrlCreateLabel("Lautstärke", 8, 190, 80, 20)
$Volume_slider2 = GUICtrlCreateSlider(8, 250, 366, 80)
$hListView = GUICtrlCreateListView('Dateiname|Pfad', 10, 375, 350, 200)$rightVol = GUICtrlCreateProgress(8, 88, 236, 17)
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]
GUICtrlSetLimit(-1, 100, 0)
GUICtrlCreateLabel("Right Channel Volume Level", 8, 112, 150, 17)
$LeftVol = GUICtrlCreateProgress(8, 136, 236, 17)
GUICtrlSetLimit(-1, 100, 0)
GUICtrlCreateLabel("Left Channel Volume Level", 8, 64, 150, 17)GUISetState()
[/autoit] [autoit][/autoit] [autoit]While (True)
[/autoit]
$Msg = GUIGetMsg()
$tmsg = TrayGetMsg()
Switch $tmsg
Case $totray
GUISetState(@SW_SHOW)
EndSwitch
Switch $Msg
Case $GUI_EVENT_CLOSE
GUISetState(@SW_HIDE)
EndSwitch
WEnd -
TheShadowAE
die lösung wäre aber sehr unpraktisch wenn man immer erst das bild auf 1,1 öffnen muss^^ps das gibt sicher auch n fehler wenndann musst du das array um 1 größer dimensionieren.
$pixel[500] heißt es gibt von 0 bis 499