OrganizeIncludes

**Xenobiologist**

Hi,

Organize Includes - setzt die benötigten Includes in Scite.

Diese liegt unter @UserProfileDir (meistens c:\ Dokumente und Einstellungen\DEIN USER\ ...

Sollte die Datei nicht zu finden sein in Scite mal die Config öffnen und schließen - mit STRG+1.

Code

# 36 OrganizeIncludes
#command.36.*.au3="$(autoit3dir)\beta\autoit3.exe" "$(SciteDefaultHome)\OrganizeIncludes\OI_1.0.0.50.au3" "$(FilePath)"
command.36.*.au3="$(autoit3dir)\autoit3.exe" "$(SciteDefaultHome)\OrganizeIncludes\OI_1.0.0.50.au3" "$(FilePath)"
command.name.36.*.au3=OrganizeIncludes
command.save.before.36.*.au3=1
command.is.filter.36.*.au3=1
command.shortcut.36.*.au3=Ctrl+Shift+Alt+I

[/Spoiler]

Source Code --> entfernt

So long,

Mega

Download : Download THREAD
Download

Chicago

hallo th.meger,

gutes Teil. Nur noch eine Frage.

Reicht es dann im Script die, OrganizeIncludes1.0.exe anzugeben und es sucht alle
includes aus und schreibt die ins Script mit rein, oder erstellt es eine Liste von Includes die noch eingegeben werden müssen?

grüsse

Chicago

**Xenobiologist**

Hi,

ist Version 1.0

Bisher ist es so, dass der SourceCode geparst wird und dann alle includes die benötigt werden aus dem Standard-Autoit-Beta-Umfang gefunden werden.

Diese werden enweder je nach Auswahl:

a) Ganz oben im Skript eigebunden oder
b) in die Zwischenablage kopiert.

So long,

Mega

Chicago

hi th,
dann muss ich das aber mal ausprobieren .....
ich weiß nämlich nie was ich alles einbinden muss...

Danke Prof.

Chicago

**Xenobiologist**

Hi,

viel Spaß und wenn du Wünsche etc. hast, dann sag Bescheid.

So long,

Mega

jonk

Hi,

die Idee für dieses "Problem" ein Skript zu schreiben ist wirklich genial. Es ist wirklich lästig sich die includes zusammen zu puzzeln. Ich habe es auf jeden Fall im Scite eingebaut und werde es absofort immer nutzen. Danke für dieses tolle Script

**Xenobiologist**

Hi,

neue Version 1.2. siehe 1st post.

So long,

Mega

**Tweaky**

Hi,
bekomme dein Script gestartet, jedoch kommt gleich die Meldung

"No Files\Folders Found."

Habe dann in dieser Funktion in der ersten Zeile $betaincludesPath in $includesPath geändert.

[autoit]

Func _prepareOrganizeIncludes()
$FileList = _FileListToArray($includesPath, '*.au3', 1)
If @error = 1 Then
MsgBox(0, '', 'No Files\Folders Found.')
Exit
EndIf
If FileExists($includesIni) Then FileDelete($includesIni)
IniWrite($includesIni, 'Version', 'Beta', $betaInstallVersion)
IniWrite($includesIni, 'Version', 'Normal', $InstallVersion)
For $i = 1 To UBound($FileList) - 1
$functions = StringRegExp(FileRead(FileOpen($includesPath & $FileList[$i], 0)), '(?<=Func )[0-9a-zA-Z_]+[ ]{0,}(?=\()', 3)
If IsArray($functions) Then IniWrite($includesIni, 'Functions', $FileList[$i], _ArrayToString($functions, ';'))
Next
IniWrite($includesIni, 'Functions', 'GUIConstants.au3', 'GUICreate;GUIGetMsg')
EndFunc ;==>_prepareOrganizeIncludes

[/autoit]

Dann startet es bei mir.
Jedoch wird mir nur

[autoit]

#include <GUIConstants.au3>

[/autoit]

angezeigt.

Allerdings benötige ich auch noch

[autoit]

#include <Array.au3>
#Include <File.au3>
#Include <date.au3>
#include <_ArrayDisplay2D.au3>
#include <_ArraySort_2ary.au3>
#Include <String.au3>

[/autoit]

Wenn ich einen include-Befehl schon im Script stehen habe und ich dein Script nochmal starte, wird mir der Include-Befehl nochmal angezeigt.
Also könnte ich ihn mehrfach einfügen.

PS: Ich nutze AutOit 3.2.4.9 und Scite vom 22.05.2007

ExBerliner

hi tweaky,

den $includesPath habe ich auch so geändert wie du. damit war auch bei mir die fehlermeldung "No Files\Folders Found" dann weg. anscheinend sind wir beide die einzigsten, die die deutsche version als primäre version installiert haben ?

das mit deinen includes verstehe ich nicht so recht. nur die im prog von th.meger genannten includes sind erforderlich.

du hast aber auch die au3.properties unverändert von th.meger übernommen ? so läuft es zumindest bei mir.

EDIT: wieso isn der jonk unregistrierter user plötzlich ?

gruss exberliner

**Tweaky**

Hi,
wenigstens noch einer mit dem gleichen Problem

Ja bei der "au3.properties" habe ich genau die Zeilen von th.meger an Ende hinzugefügt.
Es wird immer nur "#include <GUIConstants.au3>" angezeigt sonst kein include

ExBerliner

hi tweaky,

lösch doch mal die includes.ini im verzeichnis x:\Programme\AutoIt3\SciTE\OrganizeIncludes.

ansonsten kann sicher th.meger noch weiterhelfen.

gruss exberliner

**Xenobiologist**

Hi,

ja am besten die ini nochmal löschen.

Dann welche Autoit versionen sind installiert

Normal und beta? Nur beta? nur normal?

Hast du ein Bsp Skript bei dem es nicht funktioniert?

Das Skript durchsucht "nur" alle include Dateien die in

meinstens c:\Programme\

...\AutoIt3\Include\
...\AutoIt3\beta\Include\

stehen.

#include <_ArrayDisplay2D.au3>
#include <_ArraySort_2ary.au3>

Hast du diese Dateien dahin kopiert?

Müsste ich mal testen, ich nutze selten extra includes, sondern kopiere die relevanten udfs direkt ins Skript.

So long,

Mega

P.S.: Danke fürs Ausprobieren!!! :kiss:

**Tweaky**

Hi,
so nun funktionierts soweit.

#include <_ArrayDisplay2D.au3>
#include <_ArraySort_2ary.au3>
hab ich in den include-Ordner kopiert.

Ich nutze nur die normale Version, keine Beta.

Wenn ich allerdings dieses Beispiel aus der Hilfe als Test nehme,

[autoit]

$gui=GUICreate("Background", 800, 300)
; background picture
$background = GUICtrlCreatePic ("demo-bg.jpg", 0, 0, 800, 300)
GUISetState(@SW_SHOW)

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

; transparent child window
$pic=GUICreate("", 14, 80, 0, 0,$WS_POPUP,$WS_EX_LAYERED+$WS_EX_MDICHILD,$gui)
; transparent pic
$basti_stay = GUICtrlCreatePic ("l_st.gif", 0, 0, 14, 80)
GUISetState(@SW_SHOW)

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

do
$msg = GUIGetMsg()

until $msg = $GUI_EVENT_CLOSE

[/autoit]

werden mir folgende includes angezeigt:

[autoit]

#include<_ArrayDisplay2D.au3>
#include<_ArraySort_2ary.au3>
#include<GUIConstants.au3>

[/autoit]

aber warum?

Die einzige Verbesserung, die ich hätte, wäre, dass man die includes nicht doppelt einfügen kann.

**Xenobiologist**

Hi,

okay ich gucke. Sollte einbaubar sein. Zum Problem. Kannst du mir die beiden include Dateien mal schicken, oder den Quelltext posten.

Danke!

So long,

Mega

**Tweaky**

Hier sind die Links von BugFix vom Board

_ArrayDisplay2D.au3
_ArrayDisplay2D

_ArraySort_2ary.au3
Array 2-stufig sortieren

**Xenobiologist**

Hi,

habe deine Anforderungen mal versucht umzusetzen. Siehe 1st Post.

So long,

Mega

**Tweaky**

sodele,
hab deine neue au3-Datei in den Ordner kopiert, die au3.properties geändert und die inlcludes.ini geändert

Wenn ich es mit diesem Script probiere

Spoiler anzeigen

[autoit]

$gui=GUICreate("Background", 800, 300)
; background picture
$background = GUICtrlCreatePic ("demo-bg.jpg", 0, 0, 800, 300)
GUISetState(@SW_SHOW)

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

; transparent child window
$pic=GUICreate("", 14, 80, 0, 0,$WS_POPUP,$WS_EX_LAYERED+$WS_EX_MDICHILD,$gui)
; transparent pic
$basti_stay = GUICtrlCreatePic ("l_st.gif", 0, 0, 14, 80)
GUISetState(@SW_SHOW)

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

MsgBox(0,"",_NowCalcDate)

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

do
$msg = GUIGetMsg()

until $msg = $GUI_EVENT_CLOSE

[/autoit]

kommt zuerst die Meldung "No Files\Folders Found."

Wenn ich es dann nochmal starte kommt deine GUI-Oberfläche.

Es wird mir nur #include<GUIConstants.au3> anzeigt (mit Haken).

Jedoch fehlt #include <Date.au3>.

Wenn ich es nochmal starte wird mir #include<GUIConstants.au3> anzeigt (ohne Haken).

Wenn ich den Haken setze kann ich den include nochmal einfügen.

Wie ist es, wenn ich Scite update, muß ich dann die Änderungen in der au3.properties nochmal machen?

**Xenobiologist**

Hi,

du musst zuerst die ini löschen.

Das Skript ist so auch nicht lauffähig!!!

Wenn du es so machst funktioniert es einwandfrei.

Spoiler anzeigen

[autoit]

$gui=GUICreate("Background", 800, 300)
; background picture
$background = GUICtrlCreatePic ("demo-bg.jpg", 0, 0, 800, 300)
GUISetState(@SW_SHOW)

; transparent child window
$pic=GUICreate("", 14, 80, 0, 0,$WS_POPUP,$WS_EX_LAYERED+$WS_EX_MDICHILD,$gui)
; transparent pic
$basti_stay = GUICtrlCreatePic ("l_st.gif", 0, 0, 14, 80)
GUISetState(@SW_SHOW)

MsgBox(0,"",_NowCalcDate())

do
$msg = GUIGetMsg()

until $msg = $GUI_EVENT_CLOSE

[/autoit]

So long,

Mega

**Tweaky**

Ups, da hab ich wohl in der Eile () vergessen.
Naja nun funktioniert
Danke

**Xenobiologist**

Hi,

kein Problem. Ich danke fürs Testen.

Funktionen werden erst erkannt, wenn auch eine ( den Namen folgt. Anders sind sie ja aber auch nicht nutzbar.

Damit man die Namen der Funktionen in Kommentaren verwenden kann.

So long,

Mega