Beiträge von veronesi

Ich denke, es ist das einfachste, wenn ich einfach eine zweite GUI mache.
Den folgenden Code habe ich hauptsächlich aus der Hilfe zusammen kopiert.
Somit sollte es funktionieren.

Schade, dass das GUI nicht einfach mit dem Style $WS_VSCROLL funktioniert. Die ganze Funktion WM_VSCROLL ist doch sehr kompliziert!
Gruss Veronesi

Hallo zusammen

Ich möchte für ein Projekt ein DropDown Menü erstellen, in welchem ich Bilder (und Text) habe und auswählen kann.
Das geht evtl. irgendwie mit der _GUICtrlComboBoxEx, aber da hatte ich bisher kein Glück, bzw. nur mit Bildgrössen bis 64x64. (Leider habe ich den Quellcode zu meiner Schande schon wieder gelöscht)

Ich möchte nämlich wirklich richtig grosse Bilder da rein packen. Die Bilder sind später im JPG Format vorhanden. Die Bilder im DropDown sollen so ca. 1280x1280 Pixel gross sein.
(Der "Monitor" besteht aus einer 6x4 Matrix mit jeweils 80" Cubes; Also eine Art Grossbild Videoleinwand)

Also so etwas wie das hier, nur grösser: Der Inhalt kann nicht angezeigt werden, da er nicht mehr verfügbar ist. !
Danke für Eure Ideen.
Veronesi

Ja, je nach Computer / Domäneneinstellung brauchst Du das noch!
Mir ging es aber mehr um den Befehl selbst.

Schön, dass es klappt!
Gruss, Veronesi

Warum benutzt Du nicht einfach anstelle von SetACL das ICACLS?
Das ist bei neueren Betriebssystemen automatisch mit dabei.
Dann kannst Du folgende Syntax verwenden:

$szPath = "C:\Program Files (x86)\Altec"
;Setze Rechte für Benutzer auf Änderungszugriff
;Mit Objektvererbung und Containervererbung
Run('"' & @ComSpec & '" /c ICACLS "' & $szPath & '" /grant Benutzer:(OI)(CI)M /T /C /Q', '', @SW_HIDE)

Gruss Veronesi

Schön, dass wieder jemand mehr mit den Systeminternen DLLs arbeitet
Und schön, dass es nun funktioniert

Wenn man die Makros im String nun nicht durch @XYZMacro@ ersetzen möchte, dann kann man einfach die folgende Funktion verwenden!

$Test = "Hallo! Mein Benutzername ist @UserName! Die Aktuelle Zeit ist: @Hour:@Min:@Sec.@MSec!"
MsgBox(64, "Info", _MacroToString($Test))

Func _MacroToString($sString)
;Checks the string for any AutoIt Macros. If found, convert it.
;(c) 10.05.2012 / Veronesi

If Not StringInStr($sString, "@") Then Return $sString ;No Macro found
Local $as_Macros = StringRegExp($sString, "(?s)(?<=.)@(.*?)(?=[\.\,\;\?\!\: ])", 3) ;Create Array with all macros
If @error Then Return $sString
Local $i_M2S, $sMacro
For $i_M2S = 0 To UBound($as_Macros) - 1 ;For every macro: Replace it's string with the interpreted macro
$sMacro = Execute("@" & $as_Macros[$i_M2S])
If Not @error Then $sString = StringReplace($sString, "@" & $as_Macros[$i_M2S], $sMacro)
Next
Return $sString
EndFunc ;==>_MacroToString

Veronesi

Wird denn das 0x03 wirklich vom Steuergerät gesendet, oder nicht?
Hast Du es mal mit dieser UDF probiert?

Ich denke, ich habe nun selbst die Antwort gefunden

#include <Array.au3>
$sString = "abc" & @CR & "def" & @LF & "ghi" & @CRLF & "jkl" & " 0x0D " & "mno" & " 0x0A " & "pqr"
$sString = StringReplace($sString, @CRLF, @LF) ;Replace all @CRLF with @LF
$sString = StringReplace($sString, @CR, @LF) ;Replace all @CR with @LF
$sString = StringAddCR($sString) ;Replace all @LF with @CRLF
$sString = StringReplace($sString, " 0x0D ", " 0x0D " & @CRLF)
$sString = StringReplace($sString, " 0x0A ", " 0x0A " & @CRLF)
$aString = StringSplit($sString, @CRLF, 1)
_ArrayDisplay($aString)

Hallo Zusammen,
Ich habe ein kleines Problem.

$sString = "abc" & @CR & "def" & @LF & "ghi" & @CRLF & "jkl" & " 0x0D " & "mno" & " 0x0A " & "pqr"
#cs
Wandle $sString in Array, so dass jedes Trennzeichen das nächste Array Element erzwingt.
Die Trennzeichen müssen jeweils noch vorhanden sein! Und zwar sollen sie in dem vorherigen Array Element sein!
Trennzeichen sind:
@CR
@LF
@CRLF
" 0x0D " (ohne Anführungszeichen, aber mit den Abständen vorher und nachher; entspricht @CR in Hex)
" 0x0A " (ohne Anführungszeichen, aber mit den Abständen vorher und nachher; entspricht @LF in Hex)

Das Array sollte dementsprechend nachher so aussehen:
[0] "abc" & @CR
[1] "def" & @LF
[2] "ghi" & @CRLF
[3] "jkl 0x0D "
[4] "mno 0x0A "
[5] "pqr"
#ce

Kann mir da wer helfen?
Veronesi

Von einer AutoIt Exe ein eigenes AU3 Skript auszuführen, ist sehr einfach.

Global $ScriptToRun = @ScriptDir & "\test.au3"
Global $ReturnValue = RunWait('"' & @AutoItExe & '" /AutoIt3ExecuteScript "' & $ScriptToRun & '"', "", @SW_HIDE)

Gruss, Veronesi

Auch mit den Dateien hier kein Bluescreen. Funktioniert wie designt!
Das mit dem Blinken:
Wenn Du den entsprechenden "Blinkbefehl" erhältst, dann setze ein Flag (Variable: $fBlink1s = True)
Und in deiner Hauptschleife frage jeweils immer das Flag ab. Wenn es auf True steht und seit der letzten Abfrage (Timer setzen!) mindestens die Blinkzeit vergangen ist, dann kannst Du den Status der LED "toggeln"!

Ich programmiere Dir das nun extra nicht pfannenfertig, da dies einfach ist und eine gute Übung darstellt.

Das Einzige, was mir auffällt ist, dass Du keine Abbruchbedingung für die While Schleife hast. Dadurch wird die Funktion _CloseCOMPort nie ausgeführt. Und in dieser wird eben auch am Schluss die Kernel32.dll wieder geschlossen......

Aber abgesehen davon: Ich konnte mit Deinem Script auf keinem Rechner hier (XP x86 / XP x64 / W7x86 / W7x64 / Server 2008 R2) einen Bluescreen provozieren. - Weder wenn ich die von Dir angehängte (etwas ältere) UDF verwende, noch wenn ich meine eigene (etwas erweiterte) verwende.

Ich habe aber auch keine Textfile aus denen er etwas lesen könnte.
Wenn Du die Textfiles noch anhängst, kann ich es mal mit diesen laufen lassen. Aber ich denke, dass wird auch klappen.....

Edit
Was ich mir noch vorstellen könnte ist, dass die Karte etwas an den PC zurücksendet. Und ich habe schon Geräte erlebt, welche ganz vermurkste Kommandos senden können, welche den PC zum Absturz bringen. Das waren dann aber Kommandos, die zum PC HINEIN kommen!

Hallo Greenhorn.
Danke für den Tipp!

Mein RegExp oben funktioniert einwandfrei. Einfach die Escape Zeichen für Slashes hätte ich sparen können.

Thanks!
Veronesi

Hi Marvin

Leider geht das nicht, da zwischendurch auch ähnliche, aber leider für mich ungültige Zeichen vorkommen.
Den RegExp habe ich nun etwas erweitert. Nun findet er schon bessere Ergebnisse, aber vorallem nach dem Match noch zu viel:

((?i)(?<=.src\=\")http\:\/\/www\.url\.ch\/uploads\/(.*)\.jpg(?=\".*))

Edit:
Mit dem nun oben korrigierten RegExp hat es funktioniert!

Hallo zusammen

Ich hoffe, es kann mir jemand helfen, den korrekten RegExp zusammen zu stellen, um einen HTML Quellcode korrekt zu parsen!
Der Quellcode könnte z.B. so aussehen:

xyzxyzxyz (Beliebige Zeichen hier. Auch Zeilenumbrüche)


title="xyz" src="http://www.url.ch/uploads/xyz1.jpg" alt="" width="450" height="519" /></a></p>
xyz xyz xyz
title="xyz" src="http://www.url.ch/uploads/xyz2.jpg" alt="" width="450" height="519" /></a></p>
xyz xyz xyz
title="xyz" src="http://www.url.ch/uploads/xyz3.jpg" alt="" width="450" height="519" /></a></p>

Ich möchte nun alle Stellen finden, die mit src="http://www.url.ch/uploads/ beginnen und mit .jpg" aufhören.

Den RegExp habe ich versucht mit (.*)src=\"http\:\/\/www.url.ch\/uploads\/(.*)\.jpg\"
Aber das funktioniert offensichtlich nicht.

Wenn jemand nicht mit diesen Ausdrücken auf Kriegsfuss steht, könnte er mir bestimmt kurz helfen!
Vielen Dank!
Veronesi

Für den Computernamen kannst Du @ComputerName verwenden.
Dein Script könnte z.B. mit RunAs ein zweites Script aufrufen. (Als Admin) Und dieses könnte dann die Installation steuern.

Grundsätzlich brauchst Du aber kein zweites Script. Du kannst auch Dein eigenes Script mit Adminrechten selber aufrufen lassen!

Hallo Greenhorn

Upps, da habe ich mich wohl in der Kürze verschrieben!
Natürlich müsste es $GUI_RUNDEFMSG sein!

Gruss
Veronesi

Hallo Ilse

Ist natürlich nicht perfekt und sollte noch überarbeitet werden.
Aber ich denke, es zeigt Dir eine Möglichkeit auf, die Du weiterbearbeiten kannst.

Grüsse
Veronesi

Sorry, hab's erst jetzt gelesen.
Wenn ich Dich richtig verstanden habe, so willst Du zuerst die F11 Taste drücken.
Erst dann wird hochgezählt. Wenn Du dann Enter drückst, wird die aktuelle Zahl ausgegeben und das Programm beendet. Wenn Du aber vor dem Enter nochmals F11 drückst, so soll das Programm beendet werden?

Z.B so?