Beiträge von Tuxedo

Mit dem folgenden Script startet die Progressbar bei mir mit vollem Balken und läuft dann bis 0 zurück

Na dann gebe ich ISN Autoit Studio wieder eine Chance es besser zu machen.

Eine Vor-Version 1.05 oder 1.06 hatte bei mir eine Zeit lang tadellos funktioniert und eines Tages

bekam ich sämtliche Pfad und Dateinamen nur noch im Uralten 8.3 Format zu sehen, da ich

dagegen nichts unternehmen konnte und ich mich mit diesem Format Heutzutage nicht mehr

herumschlagen will, habe ich die Arbeit mit ISN Autiot Studio aufgegeben.

Dann hoffe ich diesesmal auf bessere Erfahrungen, ansonsten wäre das Stückchen Software

bei der Arbeit mit Autoit ja unschlagbar.

Vor allem auch der integrierte Debugger ist bei der Fehlersuche fast unverzichtbar.

Auch die Auflistung der Variablen und Funktionen ist eine enorme Hilfe.

Alle Achtung und Herzlichen Dank für dieses großartige Programm.

Wer hätte das gedacht, ich weiss nicht warum Bitnugger, aber das abschalten über msconfig funktioniert tadellos. Warum geht das dann nicht direkt über die Systemsteuerung?? echt merkwürdig.

Na wie auch immer, es geht also auch ohne sich direkt als Admin anmelden zu müssen.

Mal so nebenbei gefragt Bitnugger, warum kannst du deinen neuen Beitrag zwischen meine schon vorhandenen Beiträge posten?? So eine Funktion hab ich nirgends gesehen.

Habs geschafft die UAC komplett abzuschalten.

Also Bei meinem Normalen Account muss ich natürlich bei ausgeknipster UAC trotzdem noch

das Admin Passwort angeben. Es gibt allerdings einen entscheidenden Unterschied:

Ich hatte früher eine Zeit in der ich CheatEngine mehrere zig-mal am Tag gebraucht habe

und hab mir dehalb eine Lösung gebastelt damit ich nicht jedesmal das Adminpasswort eingeben musste. Allerdings verlangte natürlich die UAC immer noch eine Bestätigung ob ich mit dem Adminzugriff

einverstanden bin. Diese Meldung wird jetzt mit ausgekipster UAC nicht mehr gezeigt.

Ich hab mich inzwischen schon an diese Fragerei gewöhnt und aktiviere sie jetzt wieder

Schönen Abend

Tuxedo
I

Peter ich wollte deinen Wunsch gerade erfüllen, kann aber die UAC anscheinend nur mit einem Neustart abschalten, ich kann sie zwar um 2 Stufen herabsetzen, aber abschalten lässt er mich

nur wenn ich mich direkt als Admin anmelde und ich kann momentan leider nicht meine laufende Sitzung risikieren, dann müsste ich alles wieder von vorne beginnen und das wäre sehr negativ.

Aber deine reste Frage ist schon getestet, wenn ich als normaler Benutzer agiere, kann ich meinen HP-Emulator nicht als Admin starten(was das Tool braucht),

wenn ich aber RequireAdmin=Y im Script aktiv habe verlangt der Start des Scripts(oder auch die kompilierte EXE) definitiv nach dem Admin Passwort

und wird dann auch mit Adminrechten ausgeführt, sprich der HP-Emulator läuft und funktioniert richtig.

Wie kann ich die UAC sonst noch abschalten ohne die laufende Sitzung zu beenden.

Ich habe schon versucht die Systemsteuerung als Admin zu starten, Eingabe des Admin Passwortes akzeptiert, aber sobald ich im Reiter Benutzerkonto

die UAC

bearbeiten will, wird nochmal nach dem Passwort gefragt, ich gebe es nochmal an und kann trotzdem die UAC nur reduzieren aber nicht abschalten.

Zitat von BigRox

Hallo,

also sollte das #RequireAdmin eigentlich nur in einem Script beachtet werden und wenn ich das Script kompiliere, so müsste es eigentlich ignoriert werden

Nein, da bist du entweder im Irrtum oder aber es lässt sich nicht eindeutig bestimmen, weil es

eben zu viel unterschiedliche Systemkonstallationen gibt.

Ich verwende Autoit+ Scite als Portable und starte es als Normaler Nutzer ohne Adminrechte,

wenn ich ein Script mit RequireAdmin=Y kompiliere, dann verlangt die danach gestartete EXE

ein Admin Passwort von mir und es läuft auch wirklich mit Admin Rechten.

Kompiliere ich das gleiche Script ohne RequireAdmin=Y, läuft die kompilierte EXE ohne Admin Rechte und es wird auch kein Passwort beim Start verlangt.

Ich habe in meinem angemeldeten Benutzer auch keine Adminrechte wie sonst üblich bei Windows 7.

Wenn ich Admin Rechte anfordere, dann muss ich immer und ohne Ausnahme das Passwort

eines Benutzterkontos angeben das Adminrechte besitzt.

Ich hoffe das bringt dir etwas Erleuchtung.

Du hast Glück weil ich gerade etwas Zeit übrig hatte.

Da du dich unnötig kompliziert ausgedrückt hast, hab ich nicht wirklich verstanden was du wolltest,

aber ich denke mein Script sollte in die richtige Richtung gehen.

An deine Bedürfnisse anpassen darfst du es selber.

Ich kann nicht sagen ob es überall so läuft wie bei meinem Windows 7 Pro x64,

aber wenn ich ein Script mit Adminrechten starte, laufen auch alle daraus gestarteten Scripte und

Programme unter Adminrechten.

Ich denke das sollte auch bei dir so sein.

Ausserdem schreibe ich meine Scripte möglichst so, daß sie keine Adminrechte benötigen,

das braucht es eigentlich nur wenn man in der Registry herumautomatisieren will oder in

Ordnern arbeitet für die einem die Rechte fehlen(dann verschaffe ich mir die Rechte auf anderem Wege.).

Ich hab kein Script von dir gesehen Tweaky, aber entweder kann Shellexecute aus einem 32-Bit Script kein 64-Bit Programm starten oder du kannst mal versuchen beim Shellexecute Befehl den kompletten Pfad

zur Vlc.exe und als Parameter die Avi Datei angeben und sehen obs dann eventuell geht.

Naja, ich würde meinen wenn die x64 Versionen keinen Vorteil bringen, dann kann man ja auch bei den x86 Versionen bleiben, ausser man muss unbedingt den ganzen verfügbaren Speicher ausnutzen,

dann ist eine 64-Bit Version unverzichtbar.

Ausserdem laufen die 32-Bit Versionen auf den meisten Systemen, es wurden auch enorm viele

Windows 7 und Windows 8 Versionen als 32-Bit Version an den Mann (die Frau) gebracht.

Deshalb behalte ich immer die Sourcecodes gut auf, dann kann ich immer nach der jeweiligen

Situation entscheiden ob 32-Bit oder 64-Bit besser ist.

Für einen Laien leider schwer zu verstehen, aber super und schön umgesetztes Werk

von Dir und eukalyptus.

Vielleicht kann man die Systemuhr damit ersetzen.

Hätt ich fast vergessen, das usex64=y solltest du ersetzen durch usex64=n,

ansonsten gibts einen Absturz, zumindest bei mir.

Danke für die Rückmeldung AutoMit, solchen Usern ist man doch gerne behilflich.

Tja , also ich würde Peter S. Taler hier in Schutz nehmen, ich finde so etwas zumindest mal als unhöflich, allerdings hättest du dem TE etwas mehr Zeit geben können.

Ein halber Tag als Reaktionszeit ist für die meisten Foristen etwas knapp.

Aber ich habe auch schon Beiträge gesehen, wo eben nach einer Woche auch noch keine Reaktion kam.

Und solche Aktionen sorgen dann halt dafür, daß ich mit jedem Mal wo es passiert etwas weniger Lust kriege zu Antworten.

Und irgendwann ist dann halt der Punkt erreicht, ab dem man dann eben keine Hilfe mehr anbietet.

Tut mir leid, daß ich es dir so präsentieren muss, aber diese doofe Forensoftware löscht einfach

ungefragt die Zeilenumbrüche aus meinem kopierten Code raus.

Also füge ich es einfach als normalen Text ein, ich hoffe es ist das was du gesucht hast.

Func _GetMouseInfo()
;Returns the screen number on which the actual mouse cursor is
;Call: _GetMouseInfo()
;Don't miss to include the Func_GetMonitorInfo.au3 (#include "Func_GetMonitorInfo.au3")

$MousePos = MouseGetPos()
$NrOfScreens = _GetMonitorInfo("Nr","")
For $i = 1 To $NrOfScreens
If $MousePos[0] >= _GetMonitorInfo("PosX",$i) AND ($MousePos[0] <= _GetMonitorInfo("PosX",$i) + _GetMonitorInfo("ResX",$i)) AND $MousePos[1] >= _GetMonitorInfo("PosY",$i) AND ($MousePos[1] <= _GetMonitorInfo("PosY",$i) + _GetMonitorInfo("ResY",$i)) Then Return $i
;Checks on which Screen the Mousecursor is
Next
EndFunc

Func _GetMonitorInfo($Typ, $Nr)
;Returns some informations about your screens
;Call: _GetMonitorInfo("Typ", "Nr")
;Possible Values for "Typ": "Nr" / "ResX" / "ResY" / "PosX" / "PosY"
;If "Typ" = "Nr", then the Number of asked Screen will be ignored!
;Nr = Number of asked Screen

Local $NrOfMonitors, $ResolutionX[32], $ResolutionY[32], $PositionX[32], $PositionY[32]
Local $cbMonitorEnumProc = DllCallbackRegister("MonitorEnumProc", "ubyte", "ptr;ptr;ptr;int")

If @error Then Return SetError(1, 0, False)
Local $strctCount = DllStructCreate("uint Count;uint Width[12];uint Height[12];int left[12];int top[12]")
If @error Then Return SetError(2, @error, False)
Local $iCount

DllStructSetData($strctCount, "Count", 0)

$Ret = DllCall("User32.dll", "ubyte","EnumDisplayMonitors","ptr", 0,"ptr", 0, "ptr", DllCallbackGetPtr($cbMonitorEnumProc), "ptr", DllStructGetPtr($strctCount))
If @error Or $Ret[0] = 0 Then Return SetError(3, @error, False)

DllCallbackFree($cbMonitorEnumProc)

$iCount = Int(DllStructGetData($strctCount, "Count"))

Local $aMonitors[$iCount+1][4] = [[$iCount]]

For $i = 1 To $iCount
$aMonitors[$i][0] = Int(DllStructGetData($strctCount, "Width",$i))
$aMonitors[$i][1] = Int(DllStructGetData($strctCount, "Height",$i))
$aMonitors[$i][2] = Int(DllStructGetData($strctCount, "left",$i))
$aMonitors[$i][3] = Int(DllStructGetData($strctCount, "top",$i))
Next

If Not @error Then
$NrOfMonitors = $aMonitors[0][0]
For $i = 1 To $NrOfMonitors
$ResolutionX[$i] = $aMonitors[$i][0]
$ResolutionY[$i] = $aMonitors[$i][1]
$PositionX[$i] = $aMonitors[$i][2]
$PositionY[$i] = $aMonitors[$i][3]
Next
EndIf
Select
Case $Typ="Nr"
Return $NrOfMonitors
Case $Typ="ResX"
Return $ResolutionX[$Nr]
Case $Typ="ResY"
Return $ResolutionY[$Nr]
Case $Typ="PosX"
Return $PositionX[$Nr]
Case $Typ="PosY"
Return $PositionY[$Nr]
EndSelect
EndFunc

Func MonitorEnumProc($hMonitor, $hdcMonitor, $lprcMonitor, $dwData)
Local $strctRECT = DllStructCreate("long left;long top;long right;long bottom", $lprcMonitor)
Local $strctCount = DllStructCreate("uint Count;uint Width[12];uint Height[12];int left[12];int top[12]", $dwData)
Local $iNumber = DllStructGetData($strctCount, "Count")
Local $Height = Int(DllStructGetData($strctRECT, "bottom"))-Int(DllStructGetData($strctRECT, "top"))
Local $Width = Int(DllStructGetData($strctRECT, "right"))-Int(DllStructGetData($strctRECT, "left"))

DllStructSetData($strctCount, "Width", $Width, $iNumber+1)
DllStructSetData($strctCount, "Height", $Height, $iNumber+1)
DllStructSetData($strctCount, "left", Int(DllStructGetData($strctRECT, "left")), $iNumber+1)
DllStructSetData($strctCount, "top", Int(DllStructGetData($strctRECT, "top")), $iNumber+1)
DllStructSetData($strctCount, "Count", $iNumber+1)
Return True
EndFunc

Dann gib doch als Pfad an:

Global $sFilePath = "C:\Users\Stefan\Desktop\OneDrive-2018-02-08" & "\Posbill_Sicherung_loeschen.au3"

oder was auch geht, wäre

$Pfad = "C:\Users\Stefan\Desktop\OneDrive-2018-02-08"

$Datei = "Posbill_Sicherung_loeschen.au3"

Global $sFilePath =$Pfad & "\" & $Datei

Nimm einfach was dir am besten gefällt.

Dann flutscht es normalerweise.

Nene Oscar das war kein C64, aber in dieser Zeit war das, sogar noch etwas vorher.

Und bei dem damaligen Basic gab es noch keine Labels=Sprungmarken sondern eben nur Zeilennumern.

Mit Labels wäre es ja kinderleicht gewesen, dann hätte man nicht soviele ungewollte Endlosschleifen produziert, die man dann eben finden und ausbügeln musst.

Ach war das spassig.

Ich denke du meinstest dieses Buch von Johannes Mitlmeier, Bitteschön hier ist es.

Ich hoffe der Author hat nix gegen den Upload seines Buches.

Und der Letzte Ausspruch bezog sich keineswegs auf diese Diskussion hier sondern betrifft eher

die heutzutage allgemein übliche Denkweise.

Hier mal 2 Beispiele wie man früher Programme gemacht hat und komischerweise haben sie alle mehr oder weniger tadellos funkitoniert, gut man schrieb keine Dinger mit Tausenden von Zeilen.

Das brauchte man auch nicht. Man hat eben soviele Zeilen geschriben wie es brauchte Pasta.

Am Anfang wars eben ein bisschen ungewohnt und manchmal wars etwas fehlerhaft, aber

Fehler konnte man ausbügeln oder vermeiden. Irgendwann hat man eben angefangen zwischen den Zeilen eben 100 oder 1000 Zeilen leergelassen, damit man immer Reserven hatte, falls man etwas hinzufügen oder wglöschen musste, und so die Goto Befehle nicht alle umgeschrieben werden mussten. Also im Grunde keine unlösbaren Probleme mit den ganzen Goto's.

Endlosschleife per Goto

Zeile 1 Start

Zeile 2 Etwas bla bla dazwischen

Zeile 3 messagebox(...)

Zeile 4 Tooltip(.....)

Zeile 5 Goto 1

oder eine Funktion Handgemacht

Zeile 1 Start Funktionsaufruf Goto 6

Zeile 2 Weiter im Programm

Zeile 3 .....

Zeile 4 ......

Zeile 5 Goto 10

Zeile 6 Virtuelle Funktion

Zeile 7 $a = $b+$c

Zeile 8 Print $a

Zeile 9 Goto 2

Zeile 10 End

Heute denkt jeder hergelaufene Trottel er hätte die Weisheit mit Baggerschaufeln gefressen,

und vergisst dabei, daß schon genug andere geniale Menschen Dinge vor Hundert Jahren erfunden haben die heute immer noch eingesetzt werden. und alle denken, alles sei in der heutigen Zeit erfunden worden.

Damals(60er+70er Jahre) gab es Maschinen(Dreh-Automaten) die mittels Steckbrett und mit Endschaltern programmiert wurden und die liefen Jahrelang jeden Tag problemlos.

Die einzige und eher zweifelhafte Errungenschaft der heutigen Zeit ist die Geschwindigkeit.

Tuxedo

So hab den Player jetzt schon viele Stunden am Laufen gehabt, er zickt noch hin und wieder, aber die Ursache finde

ich noch nicht. Es beschränkt sich aber auf das Erstellen der Playlist, der Play Betrieb läuft stundenlang ohne Probleme,

bis auf die Dateien die aus unbekannten Gründen nicht geöffnet werden können.

Bei solchen Files gibt der Player eine Meldung aus, wenn die bestätigt wird läuft die Musik weiter bis Playlsitende,

dann wird der Player beendet.

Das hängt aber von den MP3 Files ab, es sollten zumindest keine VBR sondern CBR Files sein, also ohne

variable Bitrate.

Beim ersten Start wird eine Playliste im Scriptordner erstellt, die dann per Ctrl F5 mit Songs befült werden muss.

Viele Fehler werden abgefangen, aber nicht alle...sorry

Tastenkombis:

ESC - Player beenden

Ctrl p - Pause

Cursor hoch - Lautstärke erhöhen

Cursor runter - Lautstärke verringern

Cursor Rechts - inTitel-Suchlauf vor

Cursor Links - inTitel-Suchlauf zurück

Ctrl Alt r - Titel-Wiederholung(Repeat)

Ctrl F5 - Titel zur Playliste hinzufügen

DumdiDum ich hoffe es gefällt dir so wie es ist.

Edit: Sorry für die vorhandenen Fehler hier ist jetzt eine bereinigte Version 3.

Ich wollte bei dieser Version eigentlich eine Funktion einbauen die nicht abspielbare Dateien aus der Playliste entfernt,

aber da ich das im Moment nicht zufriedenstellend machen kann, wird das eingebaut sobald ich eine

funktionierende Lösung dafür gefunden habe. Dann gibts eine Version 4