Beiträge von BugFix

Was ist denn mit diesem Möchtegott los?
Soll er sich doch auf seinen SMS-Olymp zurückziehen - wir brauchen ihn eh nicht.
Strafen wir ihn mit Nichtachtung und Nichtbenutzung seines Dienstes (hab ich sowieso nicht nötig, von jmd. Almosen entgegenzunehmen).

Also Gott: Solltest du dich durch die Skriptfähigkeiten eines unserer Mitglieder in irgendeiner Weise angepi... fühlen, so tut mir das (aufrichtig?) leid.
Aber wie huggy bereits sagte: Das Thema ist durch, erledigt, aus die Maus, gestorben. --- Jetzt verstanden?

2 Sachen:
- setze mal ein Sleep in deine Schleife (etwa 100 od. 200), bekommt auch der CPU-Last ganz gut
- versuche das Setzen der Labelwerte auf ein Minimum zu reduzieren
- evtl. noch: GUISetState(@SW_LOCK ) - Labeldaten setzen - GUISetState(@SW_UNLOCK )

Autoit Ver. 3.2.8.1 ist die aktuellste.
Aber diese Funktion ist schon lange enthalten.

In der deutsche Hilfe wirst du natürlich nichts finden.

Prima, dann sollte es ja komplett sein.
Nun gibt es ausreichend Parameter, die man prüfen kann

Welche Hilfe benutzt du denn?

_TCPIpToName 
--------------------------------------------------------------------------------


Resolves IP adress to Hostname(s)




#include <iNet.au3>
_TCPIpToName ( $sIp [,$iOption = 0 [, $hDll_Ws2_32 = "Ws2_32.dll" ]] )




 


Parameters


$sIp Ip Adress in dotted (v4) Format 
$iOption Optional, Default = 0
0 = Return String Hostname
1 = Return Array (see Remarks) 
$hDll_Ws2_32 Optional, Handle to Ws2_32.dll 


 


Return Value


Success: Hostname or Array (see Remarks) 
Failure: "" 
@Error: 0 = No error. 
 1 = inet_addr DllCall Failed 
 2 = inet_addr Failed 
 3 = gethostbyaddr DllCall Failed 
 4 = gethostbyaddr Failed, WSAGetLastError = @Extended 
 5 = gethostbyaddr Failed, WSAGetLastError Failed 
 6 = strlen/sZStringRead Failed 
 7 = Error reading Aliases Array 


 


Remarks


A successfull WSAStartup (Done by TCPStartup) is required.
if $iOption = 1 then the returned Array looks Like this:
    $aResult[0] = Number of elemets
    $aResult[1] = "Hostname"
    $aResult[2] = "Alias 1"
    $aResult[3] = "Alias 2"
    ...

Genau, darum habe ich in meinem Post auch darauf verwiesen.
Noch mehr Infos dazu gibts glaub ich nicht.

Zitat

Original von winikator24654
BugFix

Ist doch egal wann die eingabe beendet ist - ich will eben nur abfangen, dass sich etwas ändert - ob 1 buchstabe oder ein Roman ist erstmal egal...

Das ist überhaupt nicht egal - das ist entscheidend!

Bsp.: Du willst "Lampe" eingeben und das Skript löst sofort nach der ersten Änderung (Eingabe 'L') das OnChange-Event aus.
Dann hast du die 'A'-Karte. Statt mit "Lampe" arbeitet dein Skript nur mit "L" weiter.

Du kannst natürlich auch eine Funktion gestalten, die kontinuierlich per GUICtrlRead() den Inhalt deines Feldes ausliest. Dann erkennst du jede Veränderung.

Edit:
Ich habe mal ein Bsp. erstellt, dass ständig den Inhalt von Input1 überwacht und an ein Label ausgibt.

Wenn Anwendungen auf einem Notebook laufen, sollte man evtl. auch den Ladezustand der Akkus im Auge behalten und entsprechend reagieren (Warnmeldung, Abbruch etc.).
Einige Infos lassen sich mit AutoIt-Scriptomatic über "ROOT\CIMV2" - "Win32_Battery" erhalten.

Ich hab hier mal zusammengestellt, was über die WMI-Klassen in der "ROOT\WMI" zu erhalten ist.

LOL - und woher soll das Programm wissen, wann die Eingabe beendet ist?
Nach 5 Zeichen oder 10 ??

Die aktuelle Stable Version ist 3.2.8.1
Installiere die mal.

Aber wichtig ist, wohin willst du Alt+n senden? Einige Programme sind da ziemlich resistent.

Zitat

Original von winikator24654
und wie ist das mit dem "onChange"-Event für Input-Objekte? wie funktioniert das?

Das Event "OnChange" tritt ein, wenn du ein Input- oder Editfeld mit ENTER verläßt und der Inhalt des Feldes verändert wurde.

Hi,
alle ID's bekommen dieselbe Funktion zugewiesen, die dann nach der ID selektiert separaten Code zuweist:

Dim $arTrayItem[1]
;...
;...
ReDim $arTrayItem[UBound($arTrayItem)+1]
$arTrayItem[UBound($arTrayItem)-1] = TrayCreateItem(.Fields("gname").value , $tGroups)
TrayItemSetOnEvent(-1, "_select")

Func _select()
Switch @TRAY_ID
Case $arTrayItem[1]
;...
Case $arTrayItem[2]
;...
Case $arTrayItem[3]
;...
EndSwitch
EndFunc

Lies jetzt mal deine Antwort und versetz dich in meine Lage. Könntest du damit etwas anfangen?

Machs doch nicht so geheimnisvoll. Was für eine Funktion willst du ausführen?
Und stell mal etwas Code rein, damit man sich ein Bild machen kann.

Das kommt davon, wenn man so spät von Arbeit kommt - jetzt ist eigentlich schon alles gesagt.

Also: Auch von mir Alles Gute und genieße die Zeiten vor der 30

Hi,
die ID bekommst du doch bei der Erstellung des Trayitems zurück.
Dann kannst du diese doch in ein Array packen um der Dynamik gerecht zu werden und dann eine entsprechende Funktion zuweisen.
Probier mal so:

Dim $arTrayItem[1]
;...
;...
ReDim $arTrayItem[UBound($arTrayItem)+1]
$arTrayItem[UBound($arTrayItem)-1] = TrayCreateItem(.Fields("gname").value , $tGroups)
GUICtrlSetOnEvent(-1, "Funktionsname")

Edit:
Vielleicht ist es sogar günstiger ein 2D-Array zu erstellen, sodass du die Parameter für die ID-spezifische Funktion mit im Array ablegen kannst.

Erklär doch mal genauer, was du machen möchtest.
Was meinst du mit: ...in eine laufende Funktion eingreifen... ?

Fragen über Fragen...

@Bullz
Das schönste Image nützt dir nichts, wenn die TrueImage-CD sagt: Nö, nix da HD!
Und das ist bei neuer Hardware sehr oft der Fall. Gerade aktuelle Chipsätze werden nicht unterstützt und deine SATA-Platte bleibt im Dunkel.
Wenn du also nen neuen PC kaufst, installierst TI und fertigst ein Image an (was von dem gestarteten Windows aus auch wunderbar geht), erlebst du dein blaues Wunder wenn du das Image zurückspielen willst, du aber "keine" HD hast.

Ich bin wahrhaft ein Fan von TrueImage und nutze es schon seit Jahren.
Umso trauriger bin ich, dass selbst die Version 10 aktuelle Chipsätze nicht erkennt.
Die Serverversion krankt ebenso.

Wenn du pausieren möchtest, das Skript aber evtl. zwischenzeitlich andere Aufgaben erfüllen soll, kannst du diesen Ansatz wählen:

$Start = False
;...
;...
Case $msg = $button_Start_Stop
If $Start Then
; Code ausführen, fortsetzen (am besten Funktionsaufruf)
Else
; Code stoppen
EndIf
$Start = Not $Start
;...
;...

Ich denke, das ist in etwa das was du möchtest. Ich habe die Child-GUI aber "drauf"geheftet.
Bewegst du die Parent, wird die Child mitbewegt.

VBS läßt sich recht gut umsetzen in AutoIt. Schau mal in die Rubrik Entwickler, Objekte unter AutoIt