Beiträge von Turbolocke

mhm ok, werd mich mal noch etwas tiefer damit befassen, und dann schauen ob ich weiterkomme. Danke für deine Hilfe !!!!!!!

hast du es schon probiert?
mach ne gui mit nem edit feld, Filewrite und fileread, einfach probieren das is ganz einfach wenn man mal damit beginnt
(is wie in Mathe)^^

naja, aber wenns ne dll ist sollte ich sie doch immer benutzen können,oder?
zumal du ja gesagt hast dass die screenshot funktion geht.,

ah cool, werd mich damit mal richtig beschäftigen,wobei ich nicht verstehe was du mit game maker teil meinst.
Heißt dass das es nur bei einer anderen Programmiersprache geht oder wie soll ich das verstehen?

so wie ich das sehe willst du nur die Einstellungen abspeichern. Nimm einfach die inibefehle( iniwrite,iniread) kurz anschauen,kapieren und loslegen^^

ja so in der der art.

Da ich gerade daran arbeite ein kleines Spiel zu verwirklichen, und ich in diesem ein Screencaptureprogramm einbauen wollte,bin ich auf die idee gekommen,gleich einen Film erstellen zu lassen.
Gedacht, gegoogelt.....
zur verzweiflung gesucht, nochmal gesucht, und nochmal lentztendlich auch eine dll gefunden.
Dummerweise fangen da die Probleme an.
Ich kapier die dll nicht und bräuchte unterstützung.
dll und dllbeschreibung in anhang.
Würde mich sehr freuen wenn ihr mir etwas helfen könntet, wäre schon hilfreich eine der funktionen in autoit umzusetzten damit ich die anderen kapiere und selber schreiben kann.
Turbolocke

der link:
Dll link autor

Ich meine dass es ja bei scite so ist dass normale Funktionen(msgbox, Mouseclick ....) blau angezeigt werden.
Allerdings wird dass bei eigenen Funktionen nicht gemacht.
z.b:

[autoit]

beispiel()

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

func beispiel()
blBLBLBSKDSNJHDJAHKJSSD
cODE
.
.
.
endfunc

[/autoit]

beispiel wird bei scite nicht blau angezeigt.
Verstehste jetzt was ich mein?

evtl,weil includes nicht dabei sind?

Wenn du deine ganzes Skript in ne funktion reinschreibst,hier Anfang(), dann kannst du diesen Anfang jedesmal starten,wenn du lust hast.Probiers mal mit msgboxen aus, wirst sehen es geht.
Dein Skript ist nicht lauffähig, müsste aber theoretisch gehen,wenn du deine Fehler ausbesserst und die von mir gemachten änderungen übernimmst.

[autoit]

#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
Anfang()

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

Func Anfang()
$Form1 = GUICreate("Form1", 136, 123, 193, 125)
$start = GUICtrlCreateButton("start", 10, 54, 53, 25, 0)
$Input1 = GUICtrlCreateInput("", 46, 28, 37, 21)
$stop = GUICtrlCreateButton("stop", 68, 54, 53, 25, 0)
GUISetState(@SW_SHOW)

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
case $start
schleife()
EndSwitch
WEnd
EndFunc

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

func schleife()

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

$pause = GUICtrlRead($timer)
$pause1 = ""
MsgBox(0,"debug", $pause & " minuten pause!")
if $pause <> $pause1 Then
AdlibEnable("stop", 150)
sleep($pause*1000*60)
start()
Else
EndIf
EndFunc

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

func stop()
$msg = GUIGetMsg()
if $msg = $stop then
MsgBox(0,"beenden", "programm wird beendet weil ich noch keine ordentliche lösung hierfür gefunden habe...!")
ExitLoop
Anfang()
endif
EndFunc

[/autoit]

Spoiler anzeigen

[autoit]

Startanfang()

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

Func Startanfang()
$pause = GUICtrlRead($timer)
$pause1 = ""
MsgBox(0,"debug", $pause & " minuten pause!")
if $pause <> $pause1 Then
AdlibEnable("austritt", 150)
sleep($pause*1000*60)
start()
Else
EndIf
endfunc
func austritt();immer wenn du zum scriptanfang willst startest du das script einfach von vorne. Und zwar indem du alle schleifen beendest und dass ganze script in eine Funktion zusammenfasst.(Außer die anderen Funktionen,da sonst ein fehler kommt.
Startanfang()
EndFunc

[/autoit]

so ungefähr.

auch von meiner Seite einen schönen geburtstag,wünsch dir viel glück, etc etc, die anderen habens schon gesagt^^

geburtstage auch, glückwunsch funkey^^

Nach langer Zeit hab ich mich mal wieder damit beschäftigt, und habe mich entschlossen, das speichern und laden der Zwischenablage umzuändern.
Statt clipget und clipput verwende ich jetzt ein windowsinternes programm, welches ich automatisiert habe. leider hab ich es bis jetzt noch nicht unsichtbar machen können,werds aber mal versuchen wenn ich grad bei Laune bin^^
Feedback immer erwünscht
Turbo

ja gibt es *g*
Mal dir die msboxen, wenns sie zu 100% echt ausschauen, veröffentliche sie hier und wir haben was davon,anstatt irgendwelche funviren zu machen.
Hab sowas am anfang auch gemacht, wird aber doch eigentlich langweilig oder?

ich hätte noch nen Vorschlag, und zwar ,dass die syntaxhervorhebung für Funktionen ( bei scite blau) auch noch eigene Funktionen unterstützt.
d.h sobald

[autoit]

Func Bla()
...
EndFunc

[/autoit]

im Script definiert wird auch unterstützt wird.

mach ne autoitinstallation mit updatefunktion^^

auch wenns schon Uhr alt ist, is mir ein bug aufgefallen, den ich hiermit behebe, damit ihn andere Leute nicht selber finden müssen. bei der Versoin über dem beitrag hier fehlen bei den Generierten Fileinstalls die ". hab diese jetzt eingeführt, nun kann man den Text 1:1 ins script einfügen.

Spoiler anzeigen

[autoit]

#include <GUIConstants.au3>
#include <file.au3>
#include <Array.au3>
Dim $array[33][2] = [['Macros for "All User" data. Most values are read from HKEY_LOCAL_MACHINE\SOFTWARE\Microsoft\Windows\CurrentVersion'], _
['@AppDataCommonDir', 'path to Application Data '], _
['@DesktopCommonDir', 'path to Desktop '], _
['@DocumentsCommonDir', 'path to Documents '], _
['@FavoritesCommonDir', 'path to Favorites '], _
['@ProgramsCommonDir', "path to Start Menu's Programs folder "], _
['@StartMenuCommonDir', 'path to Start Menu folder '], _
['@StartupCommonDir', 'path to Startup folder '], _
[' '], _
['Macros for Current User data. Most values are read from HKEY_CURRENT_USER\SOFTWARE\Microsoft\Windows\CurrentVersion '], _
['@AppDataDir', "path to current user's Application Data "], _
['@DesktopDir', "path to current user's Desktop "], _
['@MyDocumentsDir', 'path to My Documents target '], _
['@FavoritesDir', "path to current user's Favorites "], _
['@ProgramsDir', "path to current user's Programs (folder on Start Menu) "], _
['@StartMenuDir', "path to current user's Start Menu "], _
['@StartupDir', "current user's Startup folder "], _
['@UserProfileDir', "Path to current user's Profile folder. "], _
[''], _
['Other macros for the computer system: '], _
['@HomeDrive', "Drive letter of drive containing current user's home directory. "], _
['@HomePath', "Directory part of current user's home directory. To get the full path, use in conjunction with @HomeDrive. "], _
['@ProgramFilesDir', 'path to Program Files folder '], _
['@CommonFilesDir', 'path to Common Files folder '], _
['@WindowsDir', 'path to Windows folder '], _
['@SystemDir', "path to Windows' System (or System32) folder "], _
['@TempDir', 'path to the temporary files folder ']]

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

#Region ### START Koda GUI section ### Form=
$Form1 = GUICreate("FolderInstall-Creator", 517, 439, 193, 125)
$Input1 = GUICtrlCreateInput("", 32, 32, 401, 21)
$Input2 = GUICtrlCreateInput("", 32, 72, 401, 21)
$Button1 = GUICtrlCreateButton("...", 440, 32, 49, 25, 0)
$Button2 = GUICtrlCreateButton("Macros", 440, 72, 49, 25, 0)
$Button3 = GUICtrlCreateButton("Generate", 96, 120, 305, 41, 0)
$check1 = GUICtrlCreateCheckbox("Overwrite",3,3,100,20)
$Edit1 = GUICtrlCreateEdit("", 24, 176, 457, 249)
GUICtrlSetData(-1, "Edit1")
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

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

While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$folder = FileSelectFolder("Source wählen","")
If $folder <> "" Then GUICtrlSetData($Input1,$folder)
Case $Button2
_ArrayDisplay($array,"Help - Macro Description")
Case $Button3
GUICtrlSetData($Edit1,FileInstallFolder(GUICtrlRead($Input1),GUICtrlRead($Input2),BitAND(GUICtrlRead($check1),$GUI_CHECKED)))
Case $Edit1
EndSwitch
WEnd

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

Func FileInstallFolder($from, $to, $overwrite)
If StringRight($from, 1) <> "\" Then
$from = $from&"\"
EndIf
If StringRight($to, 1) <> "\" Then
$to = $to&"\"
EndIf
Local $files = _FileListToArray($from, "*", 1)
Select
Case @error = 1
SetError(1)
Return(0)
Case @error = 2
SetError(2)
Return(0)
Case @error = 3
SetError(3)
Return(0)
Case @error = 4
SetError(4)
Return(0)
Case Else
$dir = DirCreate($to)
If $dir = 0 Then
SetError(5)
Return(0)
EndIf
Local $installs = "Local $folderinstallerrors = 0" & @CRLF
For $i = 1 To $files[0]
$installs &= " $install = FileInstall('" & $from&$files[$i] & "',' " & $to&$files[$i] & "', " & $overwrite & ")" & @CRLF & _
" If $install = 0 Then $folderinstallerrors += 1" & @CRLF
Next
$installs &= "If $folderinstallerrors > 1 Then" &@CRLF& " ;Your error-handling here!" & @CRLF & "EndIf" & @CRLF
SetError(0)
Return $installs
EndSelect
EndFunc ;==>FileInstallFolder

[/autoit]

nebenbei, find ich es toll, dass hier bereits ein generator da war, hätt ihn sonst selber schreiben müssen

meiner beispielsweise wenn ich grade was runterlade, defragmentiere etc^^

schaut ganz nett aus, allerdings würd ich an deiner stelle noch eine Option einstellen, die die Zeit misst die wirklich aktiv am bildschirm verbracht wird.