Beiträge von Grimbizo

Danke, ich guck mal, was sich da machen last

Ich hab auch mal ein paar gemacht.
#1:
Ist zwar kein Meisterwerk aber ganz hübsch, find ich

Sehr schön, gerade das "CAD-Highlighting" finde ich sehr gut!

Ich hab eben mal ein wenig rumgespielt (mit den FPS) und habe auf 60 gestellt. Angezeigt warden mir 12. Trotzdem läuft alles einwandfrei flüssig, das könnte man vllt noch ändern

Ansonsten ein S U P E R Projekt.

Gerade für ein kleines Mathe Programm ist das praktisch. Damit kann ich (als eingebettetes Fenster) gleich komplexe Figuren zur veranschaulichung darstellen, und das ohne eine riesige engine einbinden zu müssen; danke dafür.

Schon coole Sache!

Und ich hab mir ewig Gedanken gemacht, wie ich PWs in er Datei (mit AutoIT und einer eigenen Technik) speichern kann ohne, dass die PWs ausgelesen warden können

Danke dafür

Grimbizo

Danke für eure Antworten!

Oscar & funkey
Aber LoadInternationalStrings werde ich denke ich nicht noch mal ändern. Insbesondere, da die Strings auch geladen werden müssen. Dein ( Oscar ) Case Else Zweig kann ich nicht nutzen, da die englischen Strings ja auch geladen werden müssen und ich einen Loop vermeiden möchte.

Gruß
Grimbizo

Danke erst mal für den Kommentar Oscar

Danke, wegen dem Tipp mit dem Case. Ich habs erst so probiert:

Case "0001" Or "0002"...

Das hat aber nicht funktioniert (zumindest nicht so, wie ich es wollte )

Ich wusste nicht, wie man mit AutoIT Dateien umbenennt, aber ich werde es verändern für die v1.1.

Das rekursive hatte ich mir auch schon überlegt. Ich hab auch überlegt, ob man einzelne Dateien zu einer Liste hinzufügen bzw. einzelne Dateien aus einem Ordner ausschließen können soll. Das wird sicher mit der v1.1 kommen.

ExpandVarStrings habe ich mir vor allem dingen wegen der Sprachen ausgesucht, weil es so (ein bischen ) weniger platz braucht (außerdem wusste ich zwar von stringformat in C/C++ aber nicht in AutoIT; man kann ja auch net alles wissen, vor allem wenn man mehr mit C++ zu Tun hat):

Opt( "ExpandVarStrings", 1 )
Global $str_0001 = "Some Text"
MsgBox( 0, "", "The Text is " & $str_0001 )
MsgBox( 0, "", "The Text is $str0001$" )

Ich habe mir gerade String Format angesehen. Ich werde mir überlegen das zu benutzen. Aber ich finde die Übersichtlichkeit, gerade bei verschachtelten Funktionen, die jeweils eine andere aufrufen, nicht viel besser. Ich werde es ausprobieren!

Noch mal danke!
Grimbizo

[Edit:] Ach ja, die Zeile

$strShortPath = FileGetShortName( "$strDirectory$" & $aFiles[$i] )

habe ich eingefügt, um das Progress Fenster net zu überfüllen, wenn der Pfad lang ist

Ich nehme an C# .Net?

Hi

Das einzige, was mir einfällt ist, dass du ein Label-Array machst, das du auslesen kannst und dann mit _ArrayToString und ClipPut in die Zwischenablage speicherst.
Vielleicht geht's auch mit WinGetText, aber da bin ich mir net sicher.

Gruß Grimbizo

Halli hallo!

Ich melde mich auch mal wieder hier Seit längerer Zeit bin ich dabei meine Musik auf meinem Computer zu sortieren - Und es nerven mich vor allem zwei Dinge dabei im Dateinamen:

1. - Unterstriche! Gerade mit Sprachausgabe, die ich benötige, da ich fast nichts sehe, ist es grausam: "001Unterstrich-UnterstrichInterpretUnterstrich-UnterstrichTitel.mp3" zu hören!
2. - Den Interpretennamen und den Albumname im Dateinamen einer Datei, die in einem Album ist: "Interpret - Album - Titel.mp3" (obwohl der Name des Interpreten in samplern wichtig ist )

Für dieses Problem habe ich ein Tool geschreiben, mit dem man automatisiert alle Daten in einem Ordner nach einem bestimmten Suchschema umbenennen lassen kann. Es kann/können:
- ein Teil des Dateinamen ersetzt werden (z.B. "Interpret_Album_Titel.mp3" zu "Interpret Album Titel.mp3")
- die ersten Zeichen im Dateinamen entfernt werden (z.B. "Interpret Album Titel.mp3" zu "Titel.mp3")
- die letzten Zeichen im Dateinamen entfernt werden (z.B. "Titel feat. Interpret.mp3" zu "Titel.mp3")
- die Dateierweiterung mit einbezogen werden oder nicht

Seit v1.1: 
- Inhalt von Unterordnern mit umbenennen

Seit v2.0:
- Neues Interface und neue Routinen.
- Umbenennen von einzelnen Dateitypen möglich

Ich würde mich über Feedback freuen!

Euer Grimbizo

Downloads:
FileRenamer v1.0
FileRenamer v1.1
FileRenamer v2.0

Hi!

Erstens gibt es bei mir volgenden Fehler:
C:\Dokumente und Einstellungen\lb304\Desktop\iTunesInterface\class\iTunes.au3 (55) : ==> Variable must be of type "Object".:
$aInfo[0] = $oSelf.mainObject.CurrentTrack.Album
$aInfo[0] = $oSelf.mainObject.CurrentTrack^ ERROR

Zweitens habe ich hier eine Funktion, die ein Teil einer Bibliothek (die noch nicht fertig ist :D) von mir sein soll. Vielleicht hilfts dir.

#Include <Color.au3>

Func _Color_Average( $aColors, $iMode )

If Not IsArray( $aColors ) Then Return SetError( 1, 0, False )

Local $iTmpRed, $iTmpGreen, $iTmpBlue

If $iMode = 0 Then

For $i = 0 To UBound( $aColors ) - 1

$iTmpRed += _ColorGetRed( $aColors[$i] )
$iTmpGreen += _ColorGetGreen( $aColors[$i] )
$iTmpBlue += _ColorGetBlue( $aColors[$i] )

Next

$iTmpRed /= UBound( $aColors )
$iTmpGreen /= UBound( $aColors )
$iTmpBlue /= UBound( $aColors )

Return "0x" & Hex( Int( $iTmpRed ), 2 ) & Hex( Int( $iTmpGreen ), 2 ) & Hex( Int( $iTmpBlue ), 2 )

ElseIf $iMode = 1 Then

For $i = 1 To $aColors[0]

$iTmpRed += _ColorGetRed( $aColors[$i] )
$iTmpGreen += _ColorGetGreen( $aColors[$i] )
$iTmpBlue += _ColorGetBlue( $aColors[$i] )

Next

$iTmpRed /= UBound( $aColors )
$iTmpGreen /= UBound( $aColors )
$iTmpBlue /= UBound( $aColors )

Return "0x" & Hex( Int( $iTmpRed ), 2 ) & Hex( Int( $iTmpGreen ), 2 ) & Hex( Int( $iTmpBlue ), 2 )

EndIf

EndFunc

BB - Grimbizo

PS: Wenn du dich geduldest ist das ganze bald eine C/C++ DLL für ein au3 Plugin

Zitat von RedHead

der teil mit

[autoit]

Func _ArrayExCompare($aArray1, $aArray2)

EndFunc

[/autoit]

ist immer noch unverändert

Ja, aber das habe ich auch nie behauptet

Und das kann ich noch ändern.

Moment....

Edit: So, hochgeladen

Soo Neue Version: Beschreibung hinzugefügt.

Ooooops
Da hab ich wohl was vergessen...
Aber ich lad ne neue Version hoch (mit Bemerkungen)

Aber danke

Hier ist mal eine Kleine Funktionssammlung für Arrays.

Ich gebe zu sie ist nicht perfekt aber ich hab sie schon gebraucht.

Edit: UPGEDATED: Beschreibungen hinzugefügt.

Also ich habe eine kleine UDF gebastelt,die Mit Arrays arbeitet. Ich lad die grad hoch.

Vielleicht kannst dus ja brauchen.

Moment...

Edit: Hier der Link: ArrayEx

Könnte man nicht einfach einen "Zeiger" wie bei C++ auf einen Speicherbereicht machen und den dann direkt verarbeiten. Vorher natürlich noch gucken, ob der Prozess schon läuft.

Man könnte es vielleicht auch über Objekte machen.

Wie man bei IE einfach einen Tab hinzufügt, wenn man eine HTML Datei mit AutoIT und IE.au3 öffnet.

Zitat von chesstiger

Die Zwischenablage zu nutzen, ist - sorry - kompletter Schwachsinn.^^
Da dann doch lieber eine Temp-Datei.

Hast schon Recht

Das war halt das erste, das mir eingefallen ist. Aber man kann natürlich einfach so machen:

Haupt-Anwendung:

If Not ProcessExists("EigentlicheAnwendung.exe") Then Run("EigentlicheAnwendung.exe")
IniWrite("TMP", "TMP", "TMPPARAM", $CMDLINERAW)

Eigentliche-Anwendung:

AdlibRegister("GetParameters")

;HIER DAS SKRIPT EINFÜGEN

Func GetParameters()
$Parameters = IniRead("TMP", "TMP", "TMPPARAM", "")
IniWrite("TMP", "TMP", "TMPPARAM", "")

;HIER FUNKTIONEN AUFRUFEN

EndFunc

I-wie komm ich mir n bischen noob like vor

Also ich würde das ganze so machen:

Haupt-Anwendung:

If Not ProcessExists("EigentlicheAnwendung.exe") Then Run("EigentlicheAnwendung.exe")
ClipPut($CMDLINERAW)

Eigentliche Anwendung:

AdlibRegister("GetParameters")

;HIER DAS SKRIPT EINFÜGEN

Func GetParameters()
$Parameters = ClipGet()
ClipPut("")
Return $Parameters
EndFunc

Wenn ich dich richtig verstanden habe möchtest du so etwas machen:

Bild

Wenn die Einträge fest sind ist das nicht mal schwer. Dann muss man noch nen button erstellen, auswerten, fertig.

Wenn es unterschiedlich viele und unterschiedlich benannte Werte beinhaltet, dann ist das schwerer. Dann brauchst du einen "Index" Eintrag pro Sektion oder eine Index Sektion:

Index in Sektion:

[Sektion1]
Index=value1|value2
value1=1
value2=2

Index der Datei:

[Index]
Index=Sektion1\value1|Sektion1\value2
[Sektion1]
value1=1
value2=2

Das ganze müstest du dann mit StringSplit und For-Loops auswerten und die Datei dann ggf. komplett neu schreiben.

Kleine Frage:
Willst du nen .ini manager basteln?

Bis dann - Grimbizo

Zitat von AspirinJunkie

Wie ich schon schrieb: Die Priorisierung der Operatoren.
In dem Ausdruck wird "Not" vor dem "=" ausgewertet.
Es wird also implizit folgendes ausgewertet:

Code

If (Not $iOldSelectedButton) = $iSelectedButton Then

Du willst ja hingegen aber eigentlich eher folgendes:

Code

If Not ($iOldSelectedButton = $iSelectedButton) Then

Und jetzt musst du nur überlegen was bei "Not $iOldSelectedButton" als Ergebnis herauskommt wenn $iOldSelectedButton z.B. eine Zahl ist denn dieses Ergebnis wird dann ja schlussendlich mit "$iSelectedButton" per "="-Operator auf Gleichheit überprüft.

Aha. Dann muss ich in Zukunft mit Not Operatoren mehr aufpassen. So lernt man immer wieder was dazu. Danke AspirinJunkie