ich würde das Array sofern es eins ist mit
[autoit]_ArrayToString(Const ByRef $avArray, $sDelim = "|", $iStart = 0, $iEnd = 0)
[/autoit]umwandeln, dann hat man auch gleich die Pipes als Trenner
ich würde das Array sofern es eins ist mit
[autoit]_ArrayToString(Const ByRef $avArray, $sDelim = "|", $iStart = 0, $iEnd = 0)
[/autoit]umwandeln, dann hat man auch gleich die Pipes als Trenner
Zitatgeht für FTP Verbindungen nicht. Das wäre dann eine Share Freigabe ala Samba.
FullAck oder SMB wie es in der WinWelt heisst. Lass mich aber gerne eines Besseren belehren.
Das mit FTP sind dann auch keine Netzlaufwerke sondern Netzverknüpfungen oder so ähnlich heissen die, die heissen anders &ticken vermutlich auch anders.
FTP Ordner wohl nicht mit Backslashes aber IP wird wohl zutreffen.
Rechner aus oder schon mit anderen Benutzerkontext Zugriff auf die oder eine andere Freigabe von dem PC?
Klar geht das, am besten gleich bei der Namensgebung drauf achten
SVR-MAIL-01 (Typ-Funktion-ff)
Thinkpad-DR (Modell-Initialen des Users)
Computer-ABC (Modell-Initialen des Users)
Oder im AD passend in einem freien Feld nachtragen was für ein Typ es ist.
Notebook kann man zumindest noch am Akkupack im Gerätemanager erkennen.
Ob Server oder Desktop lässt sich doch eigentlich vom OS ableiten, oder?
Hinzu kommen evtl. noch virtuelle Systeme.
Gruß Dietmar
Bei DDWRT kann man sich die Bandbreite schön anzeigen lassen,
ich meine auch in Auszügen ohne Login auf der Statusseite , sieht dann so wie im Anhang aus.
In dem Fall ist ein Buffalo WZR-HP-G300NH. Ein würdiger Nachfolgher meines Linksys WR54GL
Verstehe nur nicht, was da manche zu beanstanden hatten, der Grobmotoriker der in der Lan Buchse was abgebrochen hat.
Habe ich nicht hinbekommen mit div. Kabeln ausprobiert. Kopfschüttel :pinch: Alles in allem ein Top Gerät.
Allerdings bei drei Leuten richte QOS ein damit nicht ein gieriger Leecher das Internet für sich alleine beansprucht
und evtl. nen Proxy damit man weiß wer evtl. "Blödsinn im Sinne der Rechtsprechung" gamacht hat bzw. es im Keim erstickt.
Nehmen würde ich dann ein kleines Debiansystem mit NAT, Squid,openvpn usw. oder den oben genannten Router.
da dort auch schon alles und noch viel mehr direkt mögllich ist (ProFTP, OPenVPN Server/Client,WOL,SSH,NAS,Multiple WLAN incl. VLAN usw.).
Gruß Dietmar
Wozu eigentlich die Anzeige, wenn man prophylaktisch mittels QOS alles regeln kann
Außerdem erfordert die Anzeige mitunter einen zusätzliche Rechner.
Gibt aber auch schicke Linuxcomp. USB Displays (Linux4media u.a.) welche man auch an den Buffalo o.ä. hängen kann.
NAS auf nem Router ist ja eigentich auch ne Funktion die da nicht unbedingt draufgehört.
Anbieten kann man da in Kombination noch ne Seagate Dockstar 4xUSB Gbit LAN 1Ghz Arm Prozessor 128MB RAM
macht bei mir Openvpn (für externe also alle <> ich) Proftp und intern NAS. DAs System braucht mit Platte 7Watt.
Oder mein zuhause zweitsparsamstes Gerät ein HP Book PC P3-1200Mhz incl HD ~22Watt mit Notbooknetzteil.
Sowas gibts bei Ebay um 30~. Ein Atom etc ist teurer in derAnschaffung und bis man die Differenz von ~10Watt merkt.
Also im Vergleich zum Anschaffungspreis das wird dauern.
ZitatDeine Aussage ist schwach. Bei einem netten Heimkino ist 3D sicherlich ein grösseres vergnügen als ein normaler Film. Warum sollte es ablenken? -.-"
Du willst mir also sagen, ich soll auf meinem 63" einen 700mb XVID anschauen? 1080p ist neben Untouched die beste Quali welche vorhanden ist.
Du oder Ihr habt mich dahingehend falsch verstanden, das ich meine das viele aktuelle Filme es nicht wert wären überhaupt angesehen zu werden.
Vom Aufwand der Produktion mal abgesehen. Und das der eigentliche Inhalt "die Message des Films, sofern der überhaupt eine hat" zu kurz kommt und man einfach sagt ich schau mal das weil "es so schön bunt ist".
Oder kannst Du mir sagen wofür es Kabel1 in HD gibt, EdgarWallace in s/w sieht da schon recht scharf aus
Bin kein HD Hasser bei weiten nicht aber bei vielen siegt halt Form über Funktion (im übertragenden Sinne)
Und zu 3D im Kino finde ich es ok, wenn alle in Reihe sitzen mit Blickrichtung zur Leinwand.
So ist aber selten ein Wohnzimmer gefertigt und alle im Kreis sitzend mit so einer Brille stelle ich mir sehr albern vor.
Ich denke auch das da noch einiges passieren muss, angefangen natürlich mit HDMI 1.4a und natürlich muss es der Verstärker auch wieder können usw.
Ich persönlich mach den Wahnsinn zumindest nicht mit und erfeue mit einem angemessen großen Bild auch gern in HD ohne überladenes Dolby 27.3³ usw.
Mit wenigen Worten nur weil es eine HD Ausstrahlung / Aufnahme ist wird der Inhalt nicht besser oder anders was in sd schon schlecht war wird nicht besser in HD:
OT aber SCNR nach nem Gespräch mit nem Kollegen gestern abend kann ich nicht anders.
ZitatAusserdem hat er 3D
Hihi, der nächste Hype der uns von der inhaltlichen Qualität der aktuellen Filme ablenkt.
Na klar sieht es mit HD netter aus aber intelligenter wird der Inhalt auch da nicht.
Soll heissen, es ist schon beängstigend was sie die Mehrheit fürn nen Stuss ansieht hauptsache es setht 1080p drauf,
natürlich ist es auch egal welche Datenrate das Material hat, es ist ja FullHD da fällt so etwas ja nicht ins Gewicht.
Ich weiß z.B. nicht was bei HD-BOX HD sein soll außer evtl der Codec. Da ist Arte SD schärfer
Hinzu kommen ja Aspekte wie ,will ich von verschiedenen Perpektiven (wie z.B. Gun-Food) TV schauen können.
Dann gibts Drehteller (evtl. instabil) oder ne gute Halterung. Damit kommt auch die Höhe und weitere Kosten zum Tragen.
In dem Fall hängt der TV meist höher weil sonst von anderer Position der TV evtl. verdeckt wird (Stühle etc.)
Wenn Du die Möglichkeit hast in erst einfach hinzustellen kannst Du es ja immer noch nachholen, in an de Wand zu bringen.
Oder hängt die Montage von der Kaufentscheidung ab?
Gruß Dietmar
Bei mir sind es sind es 3-3,5m bis zum Phillips 42".
Mit der Größe und Quali bin ich gut zufrieden, anfangs wollte ich ihn an die Wand hängen:
a.) damit ihn keiner umläuft
b.) er etwas dezenter wirkt, wollte das Wohnzimmer nicht auf den LCD reduzieren
c.) ich die Höhe von den momentan gängigen TV Möbel zu niedrig fand
Allerdings ist der Gehäuserand beim Phillips aber minimal und wirkt so schon recht kompakt und außerdem
wollte ich aber auch noch ~350 LPs (ja die großen schwarzen) unterbringen und auch andere HIFI Komponenten mussten Platz finden.
Also habe ich mir bei IKea 2 imho "Benny" Regale geholt und etwas umgebastelt. Halt die Rückwände etwas beschnitten.
Da steht er nun drauf und ich musste keine Kabel mehr verstecken. Höhe finde ich auch ideal, alles andere ist shoegazing.
Sonst bekommste es ja im Nacken, immer nach unten starren.
Gruß Dietmar
OT: wegen UAC
ZitatDas einzige was wegfällt ist die Passworteingabe, das ist alles
Das ist so nicht gabz richtig, es wird sehr wohl zum Kennwort aufgefordert wenn der User nicht die notwendigen Rechte verfügt.
Sofern durch Manifest Dateien "angefordert". Störend finde ich es genauso so wie bei ubuntu sudo
Habe es aber trotzdem aktiv, um zu merken wo unsere Kunden mitunter anecken können.
Es ist ja eher dazu da um Veränderungen an System und Programmordnern zu bemerken.
Zum Beispiel TotalCommander V7 schlampt da noch gut rum, die Ini die nicht gefunden wird um Einstellungen zu speichen,
ist sehr wohl vorhanden und das speichen gelingt auch als "admin".
Warum ? Weil die Ini im Windows Ordner liegt und nicht unter %Program/Appdata%.
Muss allerdings dazu sagen das es vpm Stick ohne Setup gestartet wird, denke aber mal das sich das Verhalten mit Installation nicht ändert
Sinn / Unsinn kann man also werten wie man will aber so wird endlich so programmiert das auch User mit normalen Berechtigungen Programme starten und konfigurieren können.
Ansonsten stolpert man immer wieder über Programme die evtl. Adminrechte oder angepasste NTFS Permissions für den Programordner benötigen.
Ich sehe es also als erzieherische Massnahme und in bestimmten Scenarien durchaus als sinnvoll.
Scripten muss man dann halt so das es auch bei Leuten klappt wo UAC aktiv ist.
Gruß Dietmar
Do
Sleep(20)
Until ((Winexists("Update ", "")) = 1 Or (WinExists("Win (276","")) = 1)
If WinExists("Win (276","") = 1 Then WinClose("Win (276","")
Wenn du preislich Dich für eine bessere CPU oder Graka entscheiden musst.
Dann kannst du entweder:
eine günstigere CPU nehmen und die gegen eine beseere in ~1Jahr tauschen
oder das gleiche mit der Graka (bessere CPU und günstigere Graka).
Je nachdem was man später besser verwerten / verkaufen kann.
Man kann ja auch noch wenn man so verfährt Preis/Verlust berechen also die Differenz zwischen Aufpreis CPU/GRAKA usw.
Werten würde ich es je nachdem was Du überwiegend mit dem PC vorhast,
also hauptsächlich spielen, dann die bessere Graka (die macht dann eh fast die ganze Arbeit).
Ansonsten die bessere CPU um halt ein schnelles Grundsystem zu haben.
Ich habe mich vor gut einem Jahr auch neu ausgestattet, geworden ist es ein
I5@750 ~175€
Intel DP55WB http://www.intel.com/content/www/us…ard-dp55wb.html ~60€
Einfaches aber zuverlässiges Board USB 3 war zu der ZEit noch kein Thema
4GB RAM
Quad weil ich halt viel mit vmware mache und weil falls man sich evtl. verbessern will wandert die CPU in den sep. ESX Server.
Dort habe ich zu dem Zeitpunkt nen aktuellen Celeron verbastelt und bin überrascht wie wacker er sich schlägt.
Bin mit beiden Systemen so zufrieden das da auf lange Sicht nix getauscht wird.
Ach ja im I5 Sys steckt ne Ati5770 leise und für meines Erachtens für aktuelle Spiele gut geeignet.
Kann es aber nur so wieder geben wie ein Kollege (mit der selben Karte) es sagt, ich selber zocke kaum noch.
Und günstig war sie auch, ich persönlilch würde keine > 200€ für ne Graka ausgeben dafür fallen da die Preise viel zu schnell.
In denke in beiden Konstellationen wird es stimmig laufen musst halt nur überlegen was Dir wichtiger ist.
Evtl. sind auch noch bestimmte Grafikkartengimmicks interessant, sofern die Software die unterstützt (vdpau,vaapi,avivo usw.)
Dann wird wieder direkt auf der Graka geknechtet und die CPU entlastet.
Gruß Dietmar
Zum Monitor, ich habe mir vpor kurzen diesen geholt: http://benq.de/products/LCD/index.cfm/product/1174
Hatte vorher den 2200 HD als 22" aber da dieser nicht höhenverstellbar war, gabs es nun nen neuen.
Zocken tue ich nur noch sporadisch TO und da kann ich keine Probkleme feststellen, Graka habe ich ne 5770 von Ati
die 400er NV Serie gabs da noch nicht und geräuschtechnisch will ich die Karte den PC insgesamt nicht mehr missen.
Glaube mir, der Monitor ist mit das Wichtigste, denn kauft man sich weniger oft, außer beim Fehlkauf.
Analog wie Lautsprecher bei ner guten HI-FI/High-End Anlage.
Der 2200er HD war sehr tief und ich musste immer nach unten schauen, so tief kommte ich den Stuhl gar nicht einstellen.
Bei dem von mir geposteten Modell habe ich ~20 cm Platz Unterkante Monitor, nach ein paar Tagen hatte sich Ganze rentiert.
Ich konnte wieder geradeausschauen ohne Knacken und Knirschen im Halsbereich
Und für nur 50-100€ sparen, die Gesundheit ruinieren (Nacken/Kopfschmerzen)ist in jedem Fall schlecht angelegtes Geld.
Achja Monior 24" FullHD im Normalbetrieb ~18-25 Watt ebenso die GraKa
$iAnzCol = _GUICtrlListView_GetColumnCount($hLvw_Info)
$iAnzahl = _GUICtrlListView_GetItemCount($hLvw_Info)
Auch die werde ich mal im Auge behalten.
Besten Dank und mal schauen was er da nun macht.
Gruß Dietmar
Da bin ich ja gerade passend zuhause angekommen
Zweimal weil ich beides vorher mal getrennt hatte also eine Funktion für Textexport und einmal für Mail,
Altlasten die für nen test drin geblieben sind.
Die Fehlermeldung zielte dann auf eine Zeilennummer ab die nicht in meiner Macht liegt >10000
Vermutlich durch inrgendein Include.
Die Größe ist denke ich mit 99 schon angemessen momentan sind es im Schnitte ~20 Einträge.
Je Datenbank können es +7 werden. Ich denke da ist erst einmal Luft.
Im Script gab es auch keinen Fehler n der Exe dann wohl allerdings war es auch ein X64 Sys, das sollte aber keine Einfluss haben da als X86 kompiliert
Und die Architektur wird für Regread auch angepasst.
Werde das mal probieren das sieht am harmonischten aus
Local $as_Body = _Listview_2_Array("Mail")
[/autoit]Hallo was mache ich hier falsch
wenn ich es weiß kann man es hier vielleicht auch nachtragen: http://de.wikibooks.org/wiki/AutoIt:_F…Fehlermeldungen
Func _Listview_2_Array($s_Mode)
Local $array
$hLvw_Info = ControlGetHandle("","",$Lvw_Info) ; ListView in 2D Array schreiben
_GUICtrlListView_GetHeader($hLvw_Info)
$iAnzCol = _GUICtrlListView_GetColumnCount($hLvw_Info)
$iAnzahl = _GUICtrlListView_GetItemCount($hLvw_Info)
Local $msg, $array[$iAnzahl+1][$iAnzCol]
For $i = 0 To $iAnzCol -1
$msg = _GUICtrlListView_GetColumn($hLvw_Info, $i)
$array[0][$i] = $msg[5]
Next
For $i = 0 To $iAnzahl - 1
$a = _GUICtrlListView_GetItemTextArray($hLvw_Info, $i)
For $j = 1 To $a[0]
$array[$i+1][$j - 1] = $a[$j]
Next
Next
If $s_Mode = "Mail" Then
Dim $as_Body[99] ; 2D Array für Email Versand zu 1D Array konververtieren <--- hier ist vermutlich die Ursache
For $i = 1 to UBound($array) -1
$as_Body[$i] = $array[$i][0] & " - " & $array[$i][1]
Next
Return $as_Body
Else
$f_exp_file = @DesktopDir & "\InstallUpdateTool-" & @YEAR & "." & @MON & "." & @MDAY & "." & @HOUR & "." & @MIN & "-log.txt"
For $i = 1 to UBound($array,1) -1
FileWriteLine($f_exp_file,$array[$i][0] & " - " & $array[$i][1])
Next
EndIf
EndFunc
Func _Email_Status_Info($s_ToAddress) ; Emailversand der Log/Statusdatei
FileWriteLine($f_log_file,@CRLF & "# Funktion: _Email_Status_Info() ----------------------------------------------------------")
GUICtrlCreateListViewItem(_NowCalc() & "|# Starte Funktion: _Email_Status_Info",$Lvw_Info)
FileWriteLine($f_log_file, _NowCalc() & ": Email wird an " & $s_ToAddress & " versendet.")
GUICtrlCreateListViewItem(_NowCalc() & "|. Email wird an " & $s_ToAddress & " versendet.",$Lvw_Info)
$s_SmtpServer = "192.168.224.16";"192.168.224.16" ;
$s_FromName = @UserName;"Info: " & @ComputerName
$s_FromAddress = @UserName & "@" & @ComputerName
$s_ToAddress = "hall@l.eu"
$s_Subject = "InstallUpdateTool: " & GUICtrlRead($Inp_Version)
Local $as_Body[99]; =
_Listview_2_Array("Mail")
$Response = _INetSmtpMail($s_SmtpServer, $s_FromName, $s_FromAddress, $s_ToAddress, $s_Subject, $as_Body,"EHLO " & @computername, -1) ; Email senden
$err = @error
If $Response = 1 Then
;~ MsgBox(0, "Success!", "Mail sent")
FileWriteLine($f_log_file, _NowCalc() & ": Emailversand erfolgreich")
GUICtrlCreateListViewItem(_NowCalc() & "|. Emailversand erfolgreich",$Lvw_Info)
Else
;~ MsgBox(0, "Error!", "Mail failed with error code " & $err)
GUICtrlCreateListViewItem(_NowCalc() & "|. Emailversand nicht erfolgreich. Fehlercode: " & $err,$Lvw_Info)
FileWriteLine($f_log_file, _NowCalc() & ": Emailversand nicht erfolgreich. Fehlercode: " & $err)
FileWriteLine($f_log_file,@TAB & "1 - Invalid Parameters ")
FileWriteLine($f_log_file,@TAB & "2 - Unable to start TCP ")
FileWriteLine($f_log_file,@TAB & "3 - Unable to resolve IP ")
FileWriteLine($f_log_file,@TAB & "4 - Unable to create socket ")
FileWriteLine($f_log_file,@TAB & "5x - Cannot open SMTP session. x indicates the index number of last command issued to the SMTP server. ")
FileWriteLine($f_log_file,@TAB & "50x - Cannot send body. x indicates the line number of $as_Body (first line is 0). ")
FileWriteLine($f_log_file,@TAB & "5000 - Cannot close SMTP session ")
EndIf
EndFunc
Wie hole ich mir am geschicktesten die Variable aus der einen Funktion in die andere, wie muss ich die zuvor "deklarieren"?
mal im Dos Fenster getestet
Regedit /e C:\Registry\test.reg HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\
Hast Du auch den Ordner "C:\Registry\" sonst gibts nen Zugriffsfehler und passiert auch nix und jeder darf da ohnehin nicht schreiben.
Nen bissel mithelfen Fehlermeldung was man versucht hat.... usw.
Je nachdem wie umfangreich der Export ist und ob Du regedit nutzen darfst/kannst:
http://www.winfaq.de/faq_html/Conte…p?h=tip2045.htm
Mein Fav wäre
Run("Regedit /e C:\Registry\test.reg " & "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Explorer\Taskband")
[/autoit]#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.6.1
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3> ;für IP Box
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Opt('MustDeclareVars', 1)
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]Func Example()
Local $tab, $tab0, $tab0OK, $tab0input
Local $tab1, $tab1combo, $tab1OK
Local $tab2, $tab2OK, $msg
Local $Gui, $Inp_Client_IP, $current ; für IPBox Test
$Gui = GUICreate("Meine GUI mit Tabs", 350, 175); Erstellt ein GUI-Fenster welches mittig ausgerichtet wird
GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)
$tab = GUICtrlCreateTab(10, 10, 300, 100)
[/autoit] [autoit][/autoit] [autoit]$tab0 = GUICtrlCreateTabItem("Tab0")
GUICtrlCreateLabel("Beschriftung0", 30, 80, 80, 20)
$Inp_Client_IP = _GUICtrlIpAddress_Create($Gui, 180, 80, 80, 20)
_GUICtrlIpAddress_Set($Inp_Client_IP, "1.1.1.1")
$tab0OK = GUICtrlCreateButton("OK0", 20, 50, 50, 20)
$tab0input = GUICtrlCreateInput("Standard", 80, 50, 70, 20)
$tab1 = GUICtrlCreateTabItem("Tab----1")
GUICtrlCreateLabel("Beschriftung1", 30, 80, 80, 20)
$tab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon") ; Standardwert Jon
$tab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$tab2 = GUICtrlCreateTabItem("Tab2")
GUICtrlSetState(-1, $GUI_SHOW) ; Erscheint zuerst
GUICtrlCreateLabel("Beschriftung2", 30, 80, 80, 20)
$tab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); Beendet die Tab Definition
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel("Klicke auf einen Tab und dessen Beschriftung wird sichtbar", 20, 130, 250, 40)
[/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit]; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
While 1
$msg = GUIGetMsg()
Switch $msg
Case $tab ; GUI - Durchscheinen des IP Dialoges verhindern
$current = GUICtrlRead($tab)
Switch $current
Case 0
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_SHOW)
Case 1
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_HIDE)
Case 2
_GUICtrlIpAddress_ShowHide ($Inp_Client_IP, @SW_HIDE)
EndSwitch
Case $GUI_EVENT_CLOSE
ExitLoop
;~ If $msg = $GUI_EVENT_CLOSE Then ExitLoop
;~ If $msg = $tab Then
; Der angeklickte Tab erscheint
;~ WinSetTitle("Meine GUI mit Tabs", "", "Meine GUI mit Tabs" & GUICtrlRead($tab))
;~ EndIf
EndSwitch
WEnd
EndFunc ;==>Example
und hier das anfangs von mir gepostete reingebastelt und ip box nur auf dem ersten Tab
Falls du viele controls ausblenden musst empfiehlt es sich das arry tutorial von BugFix einzusehen,
dort werden in einem Beispiel die controls in enem Array verwaltet dann kann man in ener schleife Controls erstellen ausblenden etc
#cs ----------------------------------------------------------------------------
[/autoit] [autoit][/autoit] [autoit]AutoIt Version: 3.3.6.1
Author: myName
Script Function:
Template AutoIt script.
#ce ----------------------------------------------------------------------------
#include <GUIConstantsEx.au3>
#include <GuiIPAddress.au3> ;für IP Box
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]Opt('MustDeclareVars', 1)
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]Func Example()
Local $tab, $tab0, $tab0OK, $tab0input
Local $tab1, $tab1combo, $tab1OK
Local $tab2, $tab2OK, $msg
Local $Gui, $Inp_Client_IP ; für IPBox Test
$Gui = GUICreate("Meine GUI mit Tabs", 350, 175); Erstellt ein GUI-Fenster welches mittig ausgerichtet wird
GUISetBkColor(0x00E0FFFF)
GUISetFont(9, 300)
$tab = GUICtrlCreateTab(10, 10, 300, 100)
[/autoit] [autoit][/autoit] [autoit]$tab0 = GUICtrlCreateTabItem("Tab0")
GUICtrlCreateLabel("Beschriftung0", 30, 80, 80, 20)
$Inp_Client_IP = _GUICtrlIpAddress_Create($Gui, 180, 80, 80, 20)
_GUICtrlIpAddress_Set($Inp_Client_IP, "1.1.1.1")
$tab0OK = GUICtrlCreateButton("OK0", 20, 50, 50, 20)
$tab0input = GUICtrlCreateInput("Standard", 80, 50, 70, 20)
$tab1 = GUICtrlCreateTabItem("Tab----1")
GUICtrlCreateLabel("Beschriftung1", 30, 80, 80, 20)
$tab1combo = GUICtrlCreateCombo("", 20, 50, 60, 120)
GUICtrlSetData(-1, "Trids|CyberSlug|Larry|Jon|Tylo", "Jon") ; Standardwert Jon
$tab1OK = GUICtrlCreateButton("OK1", 80, 50, 50, 20)
$tab2 = GUICtrlCreateTabItem("Tab2")
GUICtrlSetState(-1, $GUI_SHOW) ; Erscheint zuerst
GUICtrlCreateLabel("Beschriftung2", 30, 80, 80, 20)
$tab2OK = GUICtrlCreateButton("OK2", 140, 50, 50)
GUICtrlCreateTabItem(""); Beendet die Tab Definition
[/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel("Klicke auf einen Tab und dessen Beschriftung wird sichtbar", 20, 130, 250, 40)
[/autoit] [autoit][/autoit] [autoit]GUISetState()
[/autoit] [autoit][/autoit] [autoit]; Die Schleife wiederholt sich, bis der Benutzer die Beenden-Aktion der GUI auslöst
While 1
$msg = GUIGetMsg()
If $msg = $GUI_EVENT_CLOSE Then ExitLoop
If $msg = $tab Then
; Der angeklickte Tab erscheint
WinSetTitle("Meine GUI mit Tabs", "", "Meine GUI mit Tabs" & GUICtrlRead($tab))
EndIf
WEnd
EndFunc ;==>Example
hier mal das Beispiel aus der Hilfe um eine IP Box erweitert dann siehst du was ich meine,
zum einen wie das regulär mit den Tabs gemacht wird und zum anderen das es controls gibt die wennn man nix daggegen macht überall zusehen sind.