Beiträge von BugFix

Zitat von Tweaky

da das zu suchende Array einen falschen Bereich hatte

Danke, das ist übrigens einer der Gründe, warum ich mir abgewöhnt habe, den zurückgegeben Zähler in $Array[0] als Obergrenze zu verwenden. Ich verwende nur UBound($Array) -1, dann stimmt es immer.

Edit:
Übrigens glaube ich nun doch, dass ich von Demenz geplagt werde. Habe die Frage ja schon mal gestellt und daraufhin kam deine oben genannte Antwort. Und ich kann mich dadran echt nicht mehr erinnern... schlimm, schlimm.

Hi,
wenn man mit einem ADO-Objekt eine Datenbankabfrage macht, kann man mittels GetRows das zurückgelieferte RecordSet in ein Array wandeln.
Dabei ist mir ein seltsames Verhalten aufgefallen:
Liefert das Ergebnis nur eine Spalte zurück (also ein 1D-Array), so muß ich auf dieses Array aber als 2D-Array zugreifen!! und als Wert für die zweite Dimension dann 0 einsetzen!
Also nicht wundern, wenn ihr mal damit arbeitet und plötzlich einen Arrayfehler auftritt - nun wißt ihr wieso.

Wollte ich dir schon ewig sagen: OI ignoriert die WindowsConstants.au3 - also es wird nicht erkannt, dass diese eingebunden werden muß. (Ver. 4.0)

Ah, Danke - der Ansatz war gut. Habs jetzt noch etwas vereinfacht:

Zitat von Tweaky

Würde mich aber brennend interessieren an was das liegt

Ich vermute fast, dass das gewollt ist (in SQL gibt es ja z.B. den Befehl DROP zum Löschen). Also werde ich mal schnell meine eigene Drag 'n Drop-Funktion schreiben.

Hi,
wie ihr im Skript seht, kann ich die Einträge aus dem Listview per Drag&Drop ins Edit schreiben. Geht auch tadellos.
Ich möchte jedoch den bisherigen Inhalt des Edits erhalten (deshalb verwende ich auch die Append-Funktion) - aber sowie gedropt wird, wird der Inhalt des Edits gnadenlos überschrieben.
Wie kann ich das unterbinden?

zu 1.
Die Suche bemühen, dazu stehen schon x funktionsfähige Beispiele im Forum.

zu 2.
Um in ein Word-Dokument zu schreiben muß es geöffnet sein. Das kann selbstverständlich im Hintergrund sein. Schau dir mal die Funktionen der "Word.au3" an.

zu 3.
Auch das Thema PC sperren wurde in verschiedenen Threads ausgiebig durchgekaut.

Kleiner Tipp:
Starte meinen Bsp.-Client, dort werden ja Ereignisse (eingehende Nachrichten etc.) in die Console geschrieben. Dann schicke von einem anderen Client (mIRC, Miranda...) eine DCC-Anforderung. Dann kannst du genau sehen, wie diese Anforderung vom Protokoll her behandelt wird und brauchst nur analog reagieren.

Füge mal das Error-Handling ein, das hilft dir weiter:

Global $oMyError = ObjEvent("AutoIt.Error","MyErrFunc") ; Initialize a COM error handler

Func MyErrFunc()
Msgbox(0,"AutoItCOM Test","Ein COM-Fehler ist aufgetreten !" & @CRLF & @CRLF & _
"err.description is: " & @TAB & $oMyError.description & @CRLF & _
"err.windescription:" & @TAB & $oMyError.windescription & @CRLF & _
"err.number is: " & @TAB & hex($oMyError.number,8) & @CRLF & _
"err.lastdllerror is: " & @TAB & $oMyError.lastdllerror & @CRLF & _
"err.scriptline is: " & @TAB & $oMyError.scriptline & @CRLF & _
"err.source is: " & @TAB & $oMyError.source & @CRLF & _
"err.helpfile is: " & @TAB & $oMyError.helpfile & @CRLF & _
"err.helpcontext is: " & @TAB & $oMyError.helpcontext )
EndIf
Local $err = $oMyError.number
If $err = 0 Then $err = -1
Local $g_eventerror = $err
Endfunc

Machs einfach so:

Global $INI = @ScriptDir & '\testini.ini'
Global $strWrite = ''
If Not FileExists($INI) Then IniWriteSection($INI, 'test', 'key1=A'& @LF &'key3=B'& @LF &'key71=C'& @LF &'key45=D')

Global $ReadSec = IniReadSection($INI, 'test')
For $i = 1 To UBound($ReadSec) -1
$strWrite &= 'Key' & $i & '=' & $ReadSec[$i][1] & @LF
Next
IniWriteSection($INI, 'test', $strWrite)

Also nehme ich mal an, dass der Name der Keys (Key1, Key2..) keine Rolle spielt? Es wird nur der erste, zweite... usw. Eintrag abgefragt, unabhängig vom Schlüsselnamen? Oder wie läuft es?

Ich glaube, die Meinungen dazu sind so vielschichtig, wie das Wetter
Ich persönlich lehne Vista auch kpl. ab, was ich damit bisher ausprobiert habe, gibt keinen signifikanten Grund XP fallen zu lassen.
Ob 64-Bit Technologie aktuell irgendwelche Vorteile bringt, wage ich zu bezweifeln. Dort, wo Unmengen an Daten verwaltet werden und es auf Prozessorfähigkeiten ankommt, verwendet man sowieso kein Windows (Media-Bereich, Publishing, da ist der Apfel unumstrittener König).
Für privaten Bereich ist 64-Bit, sowas wie mit Kanonen auf Spatzen schießen.
Mein ganz privater Tipp: Dual Core 32-Bit, WinXP

Hab grad in der Shoutbox gelesen, dass du an den beiden Schleifenformen
While .. WEnd
Do ... Until
verzweifelst.
Ich zeigs dir am Bsp., beide Varianten machen absolut dasselbe, nur auf andere Art und Weise:

While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then Exit
WEnd
; oder
Do
$msg = GUIGetMsg()
Until $msg = $GUI_EVENT_CLOSE

Siehst du den Unterschied, bzw. die Gemeinsamkeiten? - Nun kannst du es sicher in deinem Skript richtig verwenden.

Wie wärs denn, wenn du ein wirkliches CHILD-Window erstellst? Lies die Hilfe zu den Styles.

Also ich bin nicht gewillt letztendlich dein Skript komplett umzuschreiben. Das mußt du selber tun. Genug Hinweise hab ich dir gegeben.
Ich habe aber den Eindruck, dass es bei dir noch am grundlegenden Verständnis mangelt. Da solltest du dich erst mal mit den Grundlagen beschäftigen und kleine Brötchen backen.

Case $msg = $Tab
$aktivesTabItem = _GUICtrlTab_GetCurSel($Tab)

MsgBox(0, '', 'LAN-IP: ' & @IPAddress1)

Das war das Codestücke aus meinem Bsp. und das funktioniert. Ich habe es nur kommentiert, damit du weißt, was passiert.
Mußt es dann anpassen, wenn du es per Button machen willst.

Edit:
Na, hast du es hinbekommen? Ich habs dir mal hier im Muster angepaßt. Du kannst so auch mitten im Countdown zurücksetzen, nicht erst bei Null.
Und du kannst jetzt auch Stunden eingeben, also:
bis 1 Std. die Minutenzahl, z.B.: 45
darüber h:min, also z.B.: 1:05

Makro: @IPAddress1