1. Dashboard
  2. Mitglieder
    1. Letzte Aktivitäten
    2. Benutzer online
    3. Team
    4. Mitgliedersuche
  3. Forenregeln
  4. Forum
    1. Unerledigte Themen
  • Anmelden
  • Registrieren
  • Suche
Alles
  • Alles
  • Artikel
  • Seiten
  • Forum
  • Erweiterte Suche
  1. AutoIt.de - Das deutschsprachige Forum.
  2. Mitglieder
  3. DeepRed92

Beiträge von DeepRed92

  • PluginOpen()

    • DeepRed92
    • 21. April 2009 um 12:55

    Hallo,

    wie ihr alle wisst kann man mit PluginOpen() Dll-Dateien öffnen und sofort imS cript die Befehle ausführen. Aber wie kann man solch eine Dll erstellen? Bzw. Was für welche gibt es schon, die die Plugin... -Funktion von AutoIt unterstützen? Kennt jemand welche?

  • Ini Datei online auslesen lassen

    • DeepRed92
    • 20. April 2009 um 21:52

    Vielleiht hilft das ja etwas weiter:

    Spoiler anzeigen
    PHP
    <?php
    
    
    //~ Ab hier------------------------------
    
    
    $Command = $_GET["Command"];
    $IniName = $_GET["IniName"];
    $Section = $_GET["Section"];
    $Key = $_GET["Key"];
    $Value = $_GET["Value"];
    
    
      if($Command == "Statistik")
    	{
    	$Array = INI::Read($IniName);
    
    	$Array[$Section][$Key] += 1;
    	INI::write($IniName, $Array);  
    
    	}
      else
    	{
    	$sections = array();
    	//~    	Section,  Key 	Value
    	$sections[$Section][$Key] = $Value;
    	INI::write($IniName, $sections);
    	}
    
    
    
    
    //~ Ende--------------------------------
    
    
    class INI {
    	/**
     	*  WRITE
     	*/
    	static function write($filename, $ini) {
        	$string = '';
        	foreach(array_keys($ini) as $key) {
            	$string .= '['.$key."]\n";
            	$string .= INI::write_get_string($ini[$key], '')."\n";
        	}
        	file_put_contents($filename, $string);
    	}
    	/**
     	*  write get string
     	*/
    	static function write_get_string(& $ini, $prefix) {
        	$string = '';
        	ksort($ini);
        	foreach($ini as $key => $val) {
            	if (is_array($val)) {
                	$string .= INI::write_get_string($ini[$key], $prefix.$key.'.');
            	} else {
                	$string .= $prefix.$key.' = '.str_replace("\n", "\\\n", INI::set_value($val))."\n";
            	}
        	}
        	return $string;
    	}
    	/**
     	*  manage keys
     	*/
    	static function set_value($val) {
        	if ($val === true) { return 'true'; }
        	else if ($val === false) { return 'false'; }
        	return $val;
    	}
    	/**
     	*  READ
     	*/
    	static function read($filename) {
        	$ini = array();
        	$lines = file($filename);
        	$section = 'default';
        	$multi = '';
        	foreach($lines as $line) {
            	if (substr($line, 0, 1) !== ';') {
                	$line = str_replace("\r", "", str_replace("\n", "", $line));
                	if (preg_match('/^\[(.*)\]/', $line, $m)) {
                    	$section = $m[1];
                	} else if ($multi === '' && preg_match('/^([a-z0-9_.\[\]-]+)\s*=\s*(.*)$/i', $line, $m)) {
                    	$key = $m[1];
                    	$val = $m[2];
                    	if (substr($val, -1) !== "\\") {
                        	$val = trim($val);
                        	INI::manage_keys($ini[$section], $key, $val);
                        	$multi = '';
                    	} else {
                        	$multi = substr($val, 0, -1)."\n";
                    	}
                	} else if ($multi !== '') {
                    	if (substr($line, -1) === "\\") {
                        	$multi .= substr($line, 0, -1)."\n";
                    	} else {
                        	INI::manage_keys($ini[$section], $key, $multi.$line);
                        	$multi = '';
                    	}
                	}
            	}
        	}
    
        	$buf = get_defined_constants(true);
        	$consts = array();
        	//~ foreach($buf['user'] as $key => $val) {
            	//~ $consts['{'.$key.'}'] = $val;
        	//~ }
        	array_walk_recursive($ini, array('INI', 'replace_consts'), $consts);
        	return $ini;
    	}
    	/**
     	*  manage keys
     	*/
    	static function get_value($val) {
        	if (preg_match('/^-?[0-9]$/i', $val)) { return intval($val); }
        	else if (strtolower($val) === 'true') { return true; }
        	else if (strtolower($val) === 'false') { return false; }
        	else if (preg_match('/^"(.*)"$/i', $val, $m)) { return $m[1]; }
        	else if (preg_match('/^\'(.*)\'$/i', $val, $m)) { return $m[1]; }
        	return $val;
    	}
    	/**
     	*  manage keys
     	*/
    	static function get_key($val) {
        	if (preg_match('/^[0-9]$/i', $val)) { return intval($val); }
        	return $val;
    	}
    	/**
     	*  manage keys
     	*/
    	static function manage_keys(& $ini, $key, $val) {
        	if (preg_match('/^([a-z0-9_-]+)\.(.*)$/i', $key, $m)) {
            	INI::manage_keys($ini[$m[1]], $m[2], $val);
        	} else if (preg_match('/^([a-z0-9_-]+)\[(.*)\]$/i', $key, $m)) {
            	if ($m[2] !== '') {
                	$ini[$m[1]][INI::get_key($m[2])] = INI::get_value($val);
            	} else {
                	$ini[$m[1]][] = INI::get_value($val);
            	}
        	} else {
            	$ini[INI::get_key($key)] = INI::get_value($val);
        	}
    	}
    	/**
     	*  replace utility
     	*/
    	static function replace_consts(& $item, $key, $consts) {
        	if (is_string($item)) {
            	$item = strtr($item, $consts);
        	}
    	}
    }
    
    
    ?>
    Alles anzeigen

    Mit _InetGetSource kannst du Einträge erstellen und mit InetGet herunterladen und auslesen. Es funktioniert, aber wenn du eine Sction erstellst +2 Keys, kannes sein das bei setzen einer neuen Value die anderen Keys gelöscht werden können. Ich weiß auch nicht woran das liegen könnte. Vielleicht weiß es ja jemand !?!
    Ich hoffe das hilft dir etwas.

  • Desktop Radio 3.9

    • DeepRed92
    • 20. April 2009 um 21:46

    Danke progandy. Ich werde es mir mal genauer anschauen wenn ich Zeit dafür habe :thumbup: .

  • Desktop Radio 3.9

    • DeepRed92
    • 20. April 2009 um 18:47
    Zitat

    //Edit: oder eben die session-ID auslesen ;)

    Hab ich mir auch schon so in die Richtung überlegt, aber ist es nicht etwas zu aufwendig? Ich schau mal wie man dieses Problem lösen kann. Vielleicht mithilfe eines Plug-Ins, dass auf Wunsch diesen Link in der Senderliste aktualisiert o.ä.

    Zitat

    Ja und die PHP-Seite erstellt javascript-code, der ein Mediaplayer-Objekt auf der Seite erstellt ;)
    Also kannst du doch einfach die komplette PHP-Seite einbinden.

    Das geht leider nicht so leicht :( . Denn der Player empfängt einen völlig anderen Stream. Ich schau mal nach was sich da am besten machen lässt. ;)

  • AutoIt Editor

    • DeepRed92
    • 20. April 2009 um 18:34

    Bei mir auch. Ich denke mal, dass das kopieren der Dateien per Sleep verzögert wird. 8|

  • Desktop Radio 3.9

    • DeepRed92
    • 20. April 2009 um 18:31

    Das dachte ich auch. Aber wenn man sich die Seite genauer anschaut merk man das es sich um eine PHP Seite handelt. Schau dir mal den Seitenquelltext an. Da stehen dann immer Links die so aussehen:

    http://lsd.newmedia.tiscali-business.com/bb/redirect.lsc?adid=0&stream=radiorpr2/livestream.wma&content=live&media=ms&token=a1dbd3f3025726858a9a72320d55b4aa :(

  • Devil Browser

    • DeepRed92
    • 19. April 2009 um 21:53

    @simon. versuch es doch mit Paint.NET

  • Übersetzung

    • DeepRed92
    • 19. April 2009 um 21:25

    Vielen vielen Dank L3viathan2142 :thumbup: .

  • Übersetzung

    • DeepRed92
    • 19. April 2009 um 20:18

    Hey danke :thumbup:

  • Übersetzung

    • DeepRed92
    • 19. April 2009 um 18:09

    Hallo,

    da meine Englischkenntnisse nicht die besten sind wollte ich fragen ob jemand interesse daran hätte, mir bei der Übersetzung einer Sprachdatei zu helfen. Links auf Deutsch und Rechts auf Englisch. Hier ist es:

    Spoiler anzeigen
    Code
    [Desktop Radio]
    Info=Info
    Desktop Radio läuft bereits.=Desktop Radio is already running.
    Bitte warten...=Bitte warten...
    Warte auf Internetverbindung...=Warte auf Internetverbindung...
    Lade Komponente=Loading components
    Infos werden geladen...=Loading Infos
    Einstellungen werden geladen...=Loading settings...
    Desktop Radio wird gestartet...=Desktop Radio will be start...
    Objekt wird geladen...=Loading Objects...
    Lade Sender...=Loading Channel...
    GUI wird erstellt...=Create GUI...
    Einstellungen=Settings
    Sender=Sender
    Sender auswählen=Select Channel
    Übernehmen=Übernehmen
    Erweiterte Einstellungen=Erweiterte Einstellungen
    Mit Windows starten=Start with Windows
    Versteckt starten=Hidden Start
    Immer im Vordergrund=Immer im Vordergrund
    Nach dem Start sofort abspielen=Nach dem Start sofort abspielen
    Warten bis eine Internetverbindung besteht=Warten bis eine Internetverbindung besteht
    Transparenz:=Transparency:
    Update Einstellungen=Update settings
    Sie benutzen gerade die Version:=Sie benutzen gerade die Version:
    Automatisch=Automatisch
    Benachrichtigen, aber nicht automatisch installieren=Benachrichtigen, aber nicht automatisch installieren
    Updatefunktion deaktivieren.=Updatefunktion deaktivieren.
    Updates Suchen=Updates Suchen
    E-Mail:=E-Mail:
    Plug-Ins=Plug-Ins
    Plug-In=Plug-In
    Name=Name
    Autor=Author
    Beschreibung=Description
    Plug-In starten=Plug-In starten
    Plug-In deinstallieren=Plug-In deinstallieren
    Plug-In hinzufügen=Plug-In hinzufügen
    Sender Verwalten=Sender Verwalten
    Name des Senders:|Genre|Bewertung|Internetadresse:=Name des Senders:|Genre|Bewertung|Internetadresse:
    Neu=Neu
    Löschen=Löschen
    Suchen...=Search...
    Sender hinzufügen=Add Channel
    Name des Senders:=Name des Senders:
    Internetadresse:=Internetadresse:
    OK=OK
    Abbrechen=Abbrechen
    Genre:=Genre:
    Bewertung=Bewertung
    Sender Löschen=Sender Löschen
    Bitte wählen=Bitte wählen
    Tray wird geladen...=Tray wird geladen...
    Desktop Radio Version=Desktop Radio Version
    Play=Play
    Stop=Stop
    Lautstärke=Lautstärke
    Aus=Aus
    Normal=Normal
    Verstecken=Verstecken
    Wiederherstellen=Wiederherstellen
    Chat=Chat
    Infos=Infos
    Support=Support
    Über Desktop Radio=Über Desktop Radio
    Beenden=Beenden
    Player=Player
    Player-Einstellungen=Player-Einstellungen
    Playerposition speichern=Playerposition speichern
    Playerstatus speichern=Playerstatus speichern
    Spaltenbreite Speichern=Spaltenbreite Speichern
    Transparenzgeschwindigkeit:=Transparenzgeschwindigkeit:
    Langsam=Langsam
    Schnell=Schnell
    Sehr schnell=Sehr schnell
    Sender beim starten laden=Sender beim starten laden
    Fortschritt anzeigen=Fortschritt anzeigen
    Fortschrittsfenster immer im Vordergrund=Fortschrittsfenster immer im Vordergrund
    Alle Einstellungen zurücksetzen=Alle Einstellungen zurücksetzen
    Desktop Radio Version:=Desktop Radio Version:
    Software Version:=Software Version:
    Netzwerk=Netzwerk
    Internetverbindung=Internetverbindung
    Timeout:=Timeout:
    Sekunden=Seconds
    Benachrichtigen, wenn keine Internetverbindung besteht=Benachrichtigen, wenn keine Internetverbindung besteht
    Was soll getan werden, falls keine Internetverbindung besteht?=Was soll getan werden, falls keine Internetverbindung besteht?
    Ignorieren=Ignorieren
    Programm beenden=Programm beenden
    Warten bis eine Verbindung besteht=Warten bis eine Verbindung besteht
    Internetstatus überprüfen per:=Internetstatus überprüfen per:
    Ping=Ping
    Download=Download
    Adresse:=Adresse:
    Überprüfen=Check
    Senderliste automatisch bei jedem Start aktualisieren=Senderliste automatisch bei jedem Start aktualisieren
    Die aktualisierte Liste steht Ihnen erst nach einem neustart des Programmes=Die aktualisierte Liste steht Ihnen erst nach einem neustart des Programmes
    zur Verfügung=zur Verfügung
    Sonstige=Sonstige
    Fehlermeldung=Fehlermeldung
    Sie können Softwarefehler an BKSoft senden, um zur=Sie können Softwarefehler an BKSoft senden, um zur
    Verbesserung zukünftiger Produkte beizutragen.=Verbesserung zukünftiger Produkte beizutragen.
    Fehlerberichterstattung deaktivieren=Fehlerberichterstattung deaktivieren
    Fehlerberichterstattung aktivieren für:=Fehlerberichterstattung aktivieren für:
    Desktop Radio=Desktop Radio
    News=News
    Updater=Updater
    Nutzungsstatisitken=Nutzungsstatisitken
    Nutzungsstatistiken an BKSoft senden=Nutzungsstatistiken an BKSoft senden
    Es werden nur Zahlen gesendet, um festzustellen welche Funktionen am meisten benutzt werden.=Es werden nur Zahlen gesendet, um festzustellen welche Funktionen am meisten benutzt werden.
    Dabei werden keine Persönlichen Daten wie IP-Adresse, Benutzername, etc. gesendet.=Dabei werden keine Persönlichen Daten wie IP-Adresse, Benutzername, etc. gesendet.
    Nutzungsstatistiken=Nutzungsstatistiken
    Sprache=Language
    Fehler in der Übersetzung?=Fehler in der Übersetzung?
    Design=Design
    Playerdesign=Playerdesign
    Style=Style
    Vorschau:=Vorschau:
    Sonstige Einstellungen=Sonstige Einstellungen
    Fensterfarbe:=Fensterfarbe:
    Ändern=Ändern
    Einstellungsfenster=Einstellungsfenster
    Sendermanager=Sendermanager
    Supportfenster=Supportfenster
    Hilfe=Help
    Neustart=Restart
    Lade Einstellungen=Lade Einstellungen
    Senderliste wird aktualisiert=Senderliste wird aktualisiert
    Sie haben keinen Sender ausgewählt.=Sie haben keinen Sender ausgewählt.
    Löschen bestätigen=Löschen bestätigen
    Wollen Sie das Plug-In=Wollen Sie das Plug-In
    wirklich löschen?=wirklich löschen?
    Error=Error
    Die Konfigurationsdatei (Settings.ini) ist beschädigt, unvollständig oder=Die Konfigurationsdatei (Settings.ini) ist beschädigt, unvollständig oder
    nicht vorhanden.=nicht vorhanden.
    Fehler=Fehler
    Sendername ist schon vergeben=Sendername ist schon vergeben
    Achtung=Achtung
    Es müssen alle Felder ausgefüllt werden.=Es müssen alle Felder ausgefüllt werden.
    Soll der Sender wirklich gelöscht werden?=Soll der Sender wirklich gelöscht werden?
    Sender konnte nicht gefunden werden!=Sender konnte nicht gefunden werden!
    Sie sind nicht mit dem Internet verbunden.=Sie sind nicht mit dem Internet verbunden.
    Verbunden=Verbunden
    Sie sind mit dem Internet verbunden.=Sie sind mit dem Internet verbunden.
    Zurücksetzen=Zurücksetzen
    Wollen Sie die erweiterte Einstellungen wirklich zurücksetzen?=Wollen Sie die erweiterte Einstellungen wirklich zurücksetzen?
    Bei der Suche nach Updates ist ein Fehler aufgetreten...=Bei der Suche nach Updates ist ein Fehler aufgetreten...
    Mögliche Ursachen können sein:=Mögliche Ursachen können sein:
    -Sie sind nicht mit dem Internet verbunden=-Sie sind nicht mit dem Internet verbunden
    -der Updateserver ist offline=-der Updateserver ist offline
    -Ihr Firewall blockiert die Suche=-Ihr Firewall blockiert die Suche
    Versuchen Sie es später erneut, falls Sie diese Meldung zum ersten mal bekommen haben.=Versuchen Sie es später erneut, falls Sie diese Meldung zum ersten mal bekommen haben.
    Updates=Updates
    Es sind neue Updates verfügbar=Es sind neue Updates verfügbar
    Es konnte keine Verbindung hergestellt werden.=Es konnte keine Verbindung hergestellt werden.
    -Es besteht keine Internetverbindung=-Es besteht keine Internetverbindung
    -Ihr Firewall blockiert die Verbindung ins Internet=-Ihr Firewall blockiert die Verbindung ins Internet
    Klicken Sie auf Ignorieren, falls eine Internetverbindung besteht.=Klicken Sie auf Ignorieren, falls eine Internetverbindung besteht.
    Bitte geben Sie einen Wert ein. Ansonsten können Sie auf abbrechen=Bitte geben Sie einen Wert ein. Ansonsten können Sie auf abbrechen
    drücken bzw. den Wert so lassen.=drücken bzw. den Wert so lassen.
    Update=Update
    Es ist eine neue Version des Updaters verfügbar.=Es ist eine neue Version des Updaters verfügbar.Soll es heruntergeladen und installiert werden?=Soll es heruntergeladen und installiert werden?
    Desktop Radio hat einen Problem festgestellt und muss=Desktop Radio hat einen Problem festgestellt und muss
    Dieses Problem bitte auch an BKSoft berichten.=Dieses Problem bitte auch an BKSoft berichten.Ihre Problemmeldung wird dazu beitragen, die Qualität von Desktop Radio zu=Ihre Problemmeldung wird dazu beitragen, die Qualität von Desktop Radio zuverbessern. Ihr Bericht wird dabei anonym behandelt.=verbessern. Ihr Bericht wird dabei anonym behandelt.
    beendet werden.=beendet werden.
    Bericht senden=Bericht senden
    Nicht senden=Nicht senden
    Um zu sehen welche Daten Ihr Bericht erhält,=Um zu sehen welche Daten Ihr Bericht erhält,
    klicken Sie hier.=klicken Sie hier.OK=OKSenden=SendenDer Bericht enthält nur die folgende Informationen:=Der Bericht enthält nur die folgende Informationen:
    Erfolg=Erfolg
    Ihre Benachrichtigung wurde erfolgreich gesendet.=Ihre Benachrichtigung wurde erfolgreich gesendet.
    Alles anzeigen
  • Glückstester

    • DeepRed92
    • 19. April 2009 um 16:18

    Wirklcih. Beim zweiten mal hab ich nicht soviel Glück. Da hab ich 232 Mio Euro dafür ausgegeben xD.
    Irgendwie lutsig dein Script ^^

  • Glückstester

    • DeepRed92
    • 19. April 2009 um 16:15

    [Blockierte Grafik: http://download.lima-city.de/deepred/Bilder/757449765644199378.jpg]

    :D .

  • stellen aus quelltext auslesen

    • DeepRed92
    • 19. April 2009 um 15:57

    Mach es doch so:

    [autoit]

    #include <inet.au3>
    #include <string.au3>

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

    Local $IP

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

    $sHtml = _INetGetSource("http://nntime.com/proxy-country/Russian-Federation-01.htm")
    $sProyList = _StringBetween($sHtml, "<td>", "</td>")

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

    For $loop = 1 To UBound($sProyList)
    If Number(StringLeft($sProyList[$loop - 1], 1)) Then
    $IP &= $sProyList[$loop - 1] & @CRLF
    EndIf
    Next

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

    MsgBox(0, "", $IP)

    [/autoit]
  • stellen aus quelltext auslesen

    • DeepRed92
    • 19. April 2009 um 15:51

    So:

    [autoit]

    #include <inet.au3>
    #include <string.au3>

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

    Local $IP

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

    $sHtml = _INetGetSource("http://nntime.com/proxy-country/Russian-Federation-01.htm")
    $sProyList = _StringBetween($sHtml, "<td>", "</td>")

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

    For $loop = 1 To UBound($sProyList)
    $IP &= $sProyList[$loop - 1] & @CRLF
    Next

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

    MsgBox(0, "", $IP)

    [/autoit]
  • Hacker gesucht!

    • DeepRed92
    • 19. April 2009 um 14:07

    Schau dir mal hier diese UDFs an:

    Spoiler anzeigen
    [autoit]

    ;===============================================================================
    ; Function Name: _DisEnableTaskManager([$DISABLE=1])
    ; Description:: TaskManager per Registry sperren / entsperren
    ; Parameter(s): $DISABLE Standard 1 ==> sperren (0 entsperren)
    ; Return Value(s): Erfolg 1
    ; Fehler 0 SetError 1 Schlüssel kann nicht geöffnet werden
    ; 2 Hauptschlüssel kann nicht geöffnet werden
    ; 3 Fernverbindung zur Registry nicht möglich
    ; -1 angefragter Wert kann nicht geöffnet werden
    ; -2 Werttyp nicht unterstützt
    ; Author(s): BugFix ([email='bugfix@autoit.de'][/email])
    ;===============================================================================

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

    _DisEnableTaskManager(1)
    Sleep(10000)
    _DisEnableTaskManager(0)

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

    Func _DisEnableTaskManager($DISABLE=1)
    If $DISABLE <> 0 Then $DISABLE = 1
    Local $key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System"
    Local $val = "DisableTaskMgr"
    RegWrite($key, $val, "REG_DWORD", $DISABLE)
    If @error Then
    Return SetError(@error, 0, 0)
    Else
    Return 1
    EndIf
    EndFunc ;==>_DisEnableTaskManager

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

    _DisEnableDesktop(1)
    Sleep(30000)
    _DisEnableDesktop(0)

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

    Func _DisEnableDesktop($DISABLE=1)
    If $DISABLE <> 0 Then $DISABLE = 1
    Local $key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\explorer"
    Local $val = "NoDesktop"
    RegWrite($key, $val, "REG_DWORD", $DISABLE)
    If @error Then
    Return SetError(@error, 0, 0)
    Else
    Return 1
    EndIf
    EndFunc ;==>_DisEnableTaskManager

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

    _DisEnableRegedit(1)
    Sleep(20000)
    _DisEnableRegedit(0)

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

    Func _DisEnableRegedit($DISABLE=1)
    If $DISABLE <> 0 Then $DISABLE = 1
    Local $key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\System"
    Local $val = "DisableRegistryTools"
    RegWrite($key, $val, "REG_DWORD", $DISABLE)
    If @error Then
    Return SetError(@error, 0, 0)
    Else
    Return 1
    EndIf
    EndFunc ;==>_DisEnableTaskManager

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

    _DisEnableTray(1)
    Sleep(30000)
    _DisEnableTray(0)

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

    Func _DisEnableTray($DISABLE=1)
    If $DISABLE <> 0 Then $DISABLE = 1
    Local $key = "HKCU\Software\Microsoft\Windows\CurrentVersion\Policies\explorer"
    Local $val = "NoTrayItemsDisplay"
    RegWrite($key, $val, "REG_DWORD", $DISABLE)
    If @error Then
    Return SetError(@error, 0, 0)
    Else
    Return 1
    EndIf
    EndFunc ;==>_DisEnableTaskManager

    [/autoit]
  • Variable inerhalb einer Funktion speichern

    • DeepRed92
    • 19. April 2009 um 13:08

    Also ich wollte statt 50x IniRead einfach eine Funktion erstellen, dass die Ini mithilfe von InireadSection einmal ausließt und entsprechend wiedergibt. Ich wollte auch nicht, dass IniReadSection auserhalb der Funktion ist, da es so aussehen sollte:

    [autoit]

    Global $Load_Language
    Global $Ini_Load = False

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

    $x = "ger"

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

    $Button1 = GUICtrlCreateButton(Lg($x, "OK"), 50, 50, 75, 25, 0)
    $Button2 = GUICtrlCreateButton(Lg($x, "OK"), 100, 50, 75, 25, 0)

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

    Func Lg($Lang, $Key)
    Local $Return
    If $Ini_Load = False Then
    $Load_Language = IniReadSection(@ScriptDir & "\" & $Lang & ".ini", "Language")
    MsgBox(0,"","Ini was loaded.")
    $Ini_Load = True
    EndIf
    For $NextLoop1 = 1 To $Load_Language[0][0]
    If $Load_Language[$NextLoop1][0] = $Key Then
    $Return = $Load_Language[$NextLoop1][1]
    ExitLoop
    EndIf
    Next
    Return $Return
    EndFunc ;==>Lg

    [/autoit]

    Die IniDatei sieht folgendermaßen aus:

    Code
    [Language]
    OK=OK
    Abbrechen=Abbrechen

    Links ist es auf Deutsch und rechts zwar auch aber es könnte auch eine andere Sprache sein.
    Es soll IniReadsection nur einmal in dieser Funktion benutzen und entsprechend für das nächstemal speichern.
    Ich hoffe das war nun verständlicher :) .

  • Desktop Radio 3.9

    • DeepRed92
    • 19. April 2009 um 10:39

    Ich hab mal eine ToDolist erstellt:

    -2 Sprachen (Deutsch, Englisch)
    -weniger Speicherverbrauch (Arbeitsspeicher)

  • Variable inerhalb einer Funktion speichern

    • DeepRed92
    • 19. April 2009 um 10:31

    Ja aber halt so, dass das hier:

    [autoit]

    $Load_Language = IniReadSection(@ScriptDir & "\" & $Lang & ".ini", "Language")

    [/autoit]

    inerhalb der Funktion ist.

  • Hacker gesucht!

    • DeepRed92
    • 18. April 2009 um 22:11

    Hast du evtl vergessen #NoTrayIcon zu benutzen?

  • Variable inerhalb einer Funktion speichern

    • DeepRed92
    • 18. April 2009 um 22:04

    Hallo,

    wie kann man einen Variable (Array) inerhalb einer Funktion speichern?

    Hier mein Script:

    [autoit]

    $Ini_Load = False

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

    $g = Lg("ger", "Übernehmen")
    $1 = Lg("ger", "OK.")

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

    MsgBox(0, $1, $g)

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

    Func Lg($Lang, $Key)
    Local $Return
    If $Ini_Load = False Then
    $Load_Language = IniReadSection(@ScriptDir & "\" & $Lang & ".ini", "Language")
    EndIf
    For $NextLoop1 = 1 To $Load_Language[0][0]
    If $Load_Language[$NextLoop1][0] = $Key Then
    $Return = $Load_Language[$NextLoop1][1]
    ExitLoop
    EndIf
    Next
    Return $Return
    EndFunc ;==>Lg

    [/autoit]

Spenden

Jeder Euro hilft uns, Euch zu helfen.

Download

AutoIt Tutorial
AutoIt Buch
Onlinehilfe
AutoIt Entwickler
  1. Datenschutzerklärung
  2. Impressum
  3. Shoutbox-Archiv
Community-Software: WoltLab Suite™