Beiträge von nuts

nuts

Innerhalb der Funktionen, die über GUIRegisterMsg aufgerufen werden, sollte man übrigens das Skript nicht anhalten (msgbox).
Nur als Zusatzinfo, falls du dich für die Lösung von autobert entscheidest.

nuts

Mit meinen Ati's (HD5670 & HD5450) gibts unter Win7 auch keine Probleme.

nuts

Insgesamt ist die hardware doch recht stimmig und alles liegt in einem guten Preis- / Leistunsverhältnis.
Beim Netzteil reichen ~100W weniger.

nuts

Das sagst du jetzt.
Fakt ist das die meisten Menschen neue, unklare Sachverhalte besser in der Muttersprache verstehen

nuts

Vielleicht klappts mit der deutschen Hilfe besser?

nuts

Hat jemand Lust zur verlinkten UDF mal ein Beispiel zu machen?
Ich steig da nicht ganz durch

Beispiel XML:

Spoiler anzeigen

XML

<?xml version="1.0" encoding="UTF-8"?>
<settings>
  <section name="Card">
    <entry name="IPTV">0</entry>
    <entry name="Unicast">2</entry>
    <entry name="Multicast">0</entry>
    <entry name="Filedevice">0</entry>
  </section>
  <section name="Unicast Network Device">
    <entry name="DVBServerIP">192.168.1.100</entry>
    <entry name="ServerPort">4022</entry>
    <entry name="UnicastIP">192.168.1.100</entry>
    <entry name="UnicastPort">3456</entry>
    <entry name="UnicastNic">0.0.0.0</entry>
    <entry name="UCBuffers">7</entry>
  </section>
  <section name="Unicast Network Device 2">
    <entry name="DVBServerIP">192.168.1.100</entry>
    <entry name="ServerPort">4022</entry>
    <entry name="UnicastIP">192.168.1.100</entry>
    <entry name="UnicastPort">3456</entry>
    <entry name="UnicastNic">0.0.0.0</entry>
    <entry name="UCBuffers">7</entry>
  </section>
</settings>

Alles anzeigen

Gesucht:
_XML_Read_Section (inireadsection)
_XML-Read (iniread)
_XML_Write_Section (iniwritesection)
_XML-Write (iniwrite)

nuts

Die dort beschriebenen VGA / Scart Adapter gibt es auch meines Wissens so nicht zu kaufen (vergleichbare Angebot bei ebay usw. funktionieren alle nicht!).

Unter windows wird auch die Sync -Geschichte kritisch (mangels Einstellmöglichkeiten im Treiber).
VGA entspricht RGB-HV während die meisten Fernseher am Scarteingang RGB, YUV oder RGB-H erwarten.
Je nach GPU kann das funktionieren ... muss aber nicht.

nuts

Mit Fileread wird dein ganzes Textfile gelesen (inkl. Leerzeichen, Zeilenumbrüche usw.).

Das entspricht mit deiner .txt Datei so ungefähr:

[autoit]

"0x44696573206973742065696E205465737420537472696E67"& @crlf

[/autoit]

nuts

Nicht ganz.
Leerzeichen sind auch noch da.

[autoit]

#include <String.au3>

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

;$read = "0x44696573206973742065696E205465737420537472696E67"

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

$file = FileOpen(@ScriptDir&'\b.txt', 0)
$read = FileRead($file)
fileclose($file)
MsgBox(0, "test", vargettype($read)) ;was kommt hier raus? "String" oder?
$re = _HexToString(StringStripWS($read,8)) ;bzw. binarytostring($read)
MsgBox(0, "Ergebnis", $re)

[/autoit]

nuts

Lad mal bitte deine Textdatei hoch.

nuts

Hm naja bevor hier diese komischen "lass mich für dich googeln" Links ausgepackt werden sollte man mal klären was der Fragesteller überhaupt vor hat.

Du willst einen Röhren-TV an den Laptop anschließen?
Weil die tollen google-Treffer zeigen hautpsächlich capture Karten.

nuts

~~Wieso jetzt _StringToHex?~~

[autoit]

#include <String.au3>

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

;$read = "0x44696573206973742065696E205465737420537472696E67"

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

$file = FileOpen('c:\b.txt', 0)
$read = FileRead($file)
fileclose($file)
MsgBox(0, "test", vargettype($read)) ;was kommt hier raus? "String" oder?
$re = _HexToString($read) ;bzw. binarytostring($read)
MsgBox(0, "Ergebnis", $re)

[/autoit]

nuts

Schonmal mit ~~Stringtobinary~~ Binarytostring versucht?

nuts

Funktioniert bei mir auch einwandfrei.

nuts · _FileListToRekursiv Update: 08.07.2011 nuts 22. November 2010 um 18:17

~~Ob das mit der lokalen Deklaration außerhalb einer Funktion (imho auch kein guter Stil) zusammenhängt?~~

edit \

Hehe ja die Deklaration (besser global) muss auch vor dem Funktionsaufruf geschehen.

Spoiler anzeigen

[autoit]

#include <Array.au3>

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

;===================================================================================================================================#
;~ Function Name....: _FileListToRekursiv($Pfad, $Wildc = '*', $Flag = 0, $Mehr = 0)
;
;~ Description......: Auflistung von Dateien
;~ $Pfad............: Pfad
;~ $Wildc...........: '*' (Standart) Suchbegrif u. o. Wildcards bei Wildcards mit o. suchbegriff $_Flag_ auf '3' setzen es ist auch
; möglich mehrere suchbegriffe zu suchen z.B (*wma,*mp3,*txt) o. (wma,mp3,txt) getrennt mit ','
;~ $Flag............: '0' (Standart) Datein u. Ordner '1' nur Datein '2' nur Ordner '3' um mit suchbegriffen zu suchen wie (*.txt)
;~ $Mehr............: '0' (Standart) Ein duchlauf dann wird $RAS gelöscht : '1' Ein Speicher für wiederholten aufruf.
;~ Return Value(s)..: Array mit den gefundenen Dateien u. o Ordner Array[0] endhält die anzahl (Fund)
;
;~ Author(s)........: Kleiner (http://www.autoit.de) # 19.11.2010 14:00 #
;====================================================================================================================================#

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

Local $F
Local $FN
Local $RAS
Local $Verz
Local $Expan
global $sDelim = '\'
global $sDelim1 = '|'

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

$path = "d:\"

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

$avarray = _FileListToRekursiv($path)
_ArrayDisplay($avarray)

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

Func _FileListToRekursiv($Pfad, Const $Wildc = '*', Const $Flag = 0, Const $Mehr = 0)
If Not $Mehr Then $RAS = ''
$Pfad = StringRegExpReplace($Pfad, '[\\/]+\z', $sDelim) & $sDelim
If Not FileExists($Pfad) Then Return SetError(1, 0, '')
If StringRegExp($Wildc, '[\\/:><\|]|(?s)\A\s*\z') Then Return SetError(1, 0, '')
If Not ($Flag = 0 Or $Flag = 1 Or $Flag = 2 Or $Flag = 3) Then Return SetError(1, 0, '')
ToRekursiv($Pfad, StringReplace(StringReplace($Wildc, '*', ''), ',', $sDelim1), $Flag)
If Not $RAS Then Return SetError(4, 4, '')
Return StringSplit(StringTrimLeft($RAS, 1), $sDelim1)
EndFunc ;==>_FileListToRekursiv

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

Func ToRekursiv($Pfad, $Wildc, $Flag)
Local $FL
$F = FileFindFirstFile($Pfad & '*')
If ($F <> -1) Then
Do
$FN = FileFindNextFile($F)
If @error Then ExitLoop
$Expan = @extended
Switch $Flag
Case 0
Switch $Expan
Case 0
$RAS &= $sDelim1 & $Pfad & $FN
Case 1
$FL &= $sDelim1 & $FN & $sDelim
$RAS &= $sDelim1 & $Pfad & $FN
EndSwitch
Case 1
Switch $Expan
Case 0
$RAS &= $sDelim1 & $Pfad & $FN
Case 1
$FL &= $sDelim1 & $FN & $sDelim
EndSwitch
Case 2
If Not $Expan Then ContinueLoop
$FL &= $sDelim1 & $FN & $sDelim
$RAS &= $sDelim1 & $Pfad & $FN
Case 3
If $Expan Then $FL &= $sDelim1 & $FN & $sDelim
If StringRegExp($FN, $Wildc) Then $RAS &= $sDelim1 & $Pfad & $FN
EndSwitch
Until False
EndIf
FileClose($F)
If Not $FL Then Return True
$Verz = StringSplit(StringTrimLeft($FL, 1), $sDelim1, 2)
For $For In $Verz
If Not IsReparsePoint($Pfad & $For) Then ToRekursiv($Pfad & $For, $Wildc, $Flag)
Next
EndFunc ;==>ToRekursiv

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

Func IsReparsePoint($FLS);progandy
Dim Static $K32 = DllOpen('kernel32.dll')
Dim $DA = DllCall($K32, 'dword', 'GetFileAttributesW', 'wstr', $FLS)
If @error Then Return SetError(0, @error, 0)
Return BitAND($DA[0], 1024) = 1024
EndFunc ;==>IsReparsePoint

[/autoit]

nuts

Das versuch ich mal.
Oder kennt jemand die windowseigenen Funktionen um Festplatten schlafen zu legen?

nuts

Gibt es sowas auch um die Platte "schlafen zu legen" bzw. aufzuwecken?

nuts

Aso da musst man wohl etwas tricksen.

[autoit]

dim $ergebnis
dim $areadini=IniReadSection(@ScriptDir &"\log.ini", "Wertnummern")

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

IniWrite(@ScriptDir &"\log.ini", "Wertnummern", "Ergebnis"&$areadini[0][0]+1, $ergebnis )

[/autoit]

nuts

Mein Skript gesehen?

nuts

[autoit]

$a_ergebnis[3]
for $i=0 to 2
$a_ergebnis[$i]=Random(1, 10)
next

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

For $i=0 To 2
IniWrite(@ScriptDir &"\log.ini", "Wertnummern", "Nummer"&$i, $a_ergebnis[$i])
Next

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

ShellExecute(@ScriptDir &"\log.ini")

[/autoit]

So ca?

Beiträge von nuts

Angeklickte ListView ermitteln (@GUI_CtrlId??)

Umfrage für CPU-Kauf

PC-Kaufberatung

Die Logik mal wieder

Die Logik mal wieder

XML Dateien auslesen und erzeugen

S-Video Adapter für Laptop ?

_HextoString vs. FileRead

_HextoString vs. FileRead

_HextoString vs. FileRead

S-Video Adapter für Laptop ?

_HextoString vs. FileRead

_HextoString vs. FileRead

_HextoString vs. FileRead

_FileListToRekursiv Update: 08.07.2011

HDD Partition erstellen

HDD Partition erstellen

Problem mit IniWrite

Problem mit IniWrite

Problem mit IniWrite