ein bischen Philosophie ...
na warum auch nicht 
Ich denke wir werden wiedergeboren.
Meiner Ansicht nach ist der Unterschied zwischen Mensch und Tier das Vorhandensein einer Seele.
(das mit dem Intellekt ist ja manchmal nicht so weit her 
)
Daher glaube ich nur an die Wiedergeburt als Mensch, oder respektive ein Wesen, das "beseelt" werden kann.
Aber wer sagt, dass das unbedingt auf der Erde sein muß.
Schade, dass der Mensch immer so begrenzt denkt 
ich perönlich umgehe solche Probleme, indem ich innerhalb von Funktionen
Local einmalige Variablennamen verwende.
Man verliert sowieso die Übersicht, wenn man für 2 unterschiedliche Aufgaben
die selben Variablennamen verwendet...
mal was zum "rumspielen"...
#include <ButtonConstants.au3>
#include <GUIConstantsEx.au3>
#include <GuiListBox.au3>
#include <WindowsConstants.au3>
#include <StaticConstants.au3>
;
Opt("GUIOnEventMode", 1)
#Region Variablen definieren --- Texte
Global $title = "der titel"
Global $tit_m1 = "Menü 1", $tit_m2 = "Menü 2"
Global $sw_mm
Global $childgui_x = "136", $childgui_y = "72", $childgui_w = "802", $childgui_h = "622" ; Position und Maße der Child-Gui's
Global $main_form = GUICreate($title, 951, 701, 192, 99) ; Programmfenster
Global $b_nav[2] = [GUICtrlCreateButton($tit_m1, 10, 75, 110, 20, 0), GUICtrlCreateButton($tit_m2, 10, 98, 110, 20, 0)]
Global $sub_Form[2] ; Definition der Child-Gui's
GUISetOnEvent($GUI_EVENT_CLOSE, "_exit")
GUICtrlSetOnEvent($b_nav[0], "_nav")
GUICtrlSetOnEvent($b_nav[1], "_nav")
#Region Child-GUI 1
$sub_Form[0] = GUICreate("", $childgui_w, $childgui_h, $childgui_x, $childgui_y, $WS_CHILD, -1, $main_form); Child-Fenster 1
GUISetBkColor(0xFFFFFF)
GUICtrlCreateGroup($tit_m1, 9, 3, 783, 610)
GUICtrlCreateGroup("", -99, -99, 1, 1)
#EndRegion Child-GUI 1
;
#Region Child-GUI 2
$sub_Form[1] = GUICreate("", $childgui_w, $childgui_h, $childgui_x, $childgui_y, $WS_CHILD, -1, $main_form); Child-Fenster 2
GUISetBkColor(0xFFFFFF)
GUICtrlCreateGroup($tit_m2, 9, 3, 783, 610)
GUICtrlCreateGroup("", -99, -99, 1, 1)
#EndRegion Child-GUI 2
;
GUISetState(@SW_SHOW, $main_form)
GUISetState(@SW_SHOW, $sub_Form[0])
While 1
Sleep(10)
WEnd
Func _nav()
Local $pb = @GUI_CtrlId - $b_nav[0]
If $pb <> $sw_mm Then
Switch $pb
Case "0"
GUISetState(@SW_SHOW, $sub_Form[0])
Case "1"
GUISetState(@SW_SHOW, $sub_Form[1])
EndSwitch
EndIf
If $pb <> $sw_mm Then
GUISetState(@SW_HIDE, $sub_Form[$sw_mm])
$sw_mm = $pb
EndIf
EndFunc ;==>_nav
Func _exit() ; Exit
Exit
EndFunc ;==>_Exit
hab mal einen Auszug aus der deutsch Hilfe:
Gültigkeitsbereich
Der Gültigkeitsbereich einer Variablen wird gesteuert durch die Tatsache, wann und wie man die Variable deklariert. Deklariert man eine Variable am Anfang eines Skripts und außerhalb von Funktionen, existiert sie in dem Gültigkeitsbereich Global und kann von überall aus dem Skript gelesen oder geändert werden.Deklariert man eine Variable innerhalb einer Funktion, befindet sie sich in dem Gültigkeitsbereich Local und kann nur innerhalb dieser einen Funktion genutzt werden. Variablen, die innerhalb einer Funktion erstellt wurden, werden automatisch am Ende dieser Funktion zerstört.
Werden Variablen über Dim deklariert oder innerhalb einer Funktion zugewiesen, haben sie standardmäßig den Gültigkeitsbereich Local, es sei denn, es gibt eine globale Variable des selben Namens (in diesem Fall wird die globale Variable verwendet). Dies kann geändert werden, indem man die Schlüsselwörter Local und Global benutzt, um Variablen zu deklarieren, und um so den gewünschten Gültigkeitsbereich zu erzwingen.
mal ein einfacher Ansatz ohne groß drüber nachgedacht zu haben ...
#include <ButtonConstants.au3>
#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
#include <file.au3>
#include <string.au3>
HotKeySet("{F4}", "schliessen")
MsgBox(48, "Information", "Zum schließen des Schul-Chats einfach nur <F4> drücken")
$pfad = @desktopdir&"\NetControl.new"
$user = @UserName
#Region ### START Koda GUI section ### Form=
Global $Form1 = GUICreate("Schul-Chat", 467, 442, 405, 112)
Global $Edit1 = GUICtrlCreateEdit("", 9, 6, 442, 298, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_READONLY,$ES_WANTRETURN,$WS_VSCROLL))
Global $Edit2 = GUICtrlCreateEdit("", 12, 318, 442, 73, BitOR($ES_AUTOVSCROLL,$ES_AUTOHSCROLL,$ES_WANTRETURN,$WS_VSCROLL))
Global $Button1 = GUICtrlCreateButton("Senden", 351, 405, 103, 25, $WS_GROUP)
Global $Button2 = GUICtrlCreateButton("Löschen", 151, 405, 103, 25, $WS_GROUP)
Global $read , $read2, $readfile
Global $pass = "mein_pass"
GUICtrlSetData($Edit1, "")
GUISetState(@SW_SHOW)
Global $Form1_AccelTable[1][2] = [["{ENTER}", $Button1]]
GUISetAccelerators($Form1_AccelTable)
#EndRegion ### END Koda GUI section ###
While 1
Sleep(10)
$readfile = _StringEncrypt(0,fileread($pfad),$pass,1)
If $read2 <> $readfile Then
$read2 = $readfile
GUICtrlSetData($Edit1, $read2)
EndIf
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Button1
$read = GUICtrlRead($Edit2)
If $read = "" then
msgbox(48, "Information", "Du kannst keine Nachricht ohne Inhalt senden!")
else
FileDelete($pfad)
FileWrite($pfad,_StringEncrypt(1,$readfile&@CRLF&$user&": "&$read,$pass,1))
GUICtrlSetData($Edit2, "")
EndIf
Case $Button2
FileDelete($pfad)
EndSwitch
WEnd
func schliessen()
Exit
EndFunc
zu 2.
schau Dir mal die Funktion AdlibEnable() in der Hilfe an.
zu 3.
#include <GUIConstantsEx.au3>
#include <SliderConstants.au3>
#include <WindowsConstants.au3>
$Fenster = GUICreate("Fenster", 152, 46, 456, 225)
$Slider = GUICtrlCreateSlider(0, 0, 150, 45)
GUISetState(@SW_SHOW)
While 1
$nMsg = GUIGetMsg()
Switch $nMsg
Case $GUI_EVENT_CLOSE
Exit
Case $Slider
MsgBox(0, '', GUICtrlRead($Slider) )
EndSwitch
WEnd
Du kannst es auch so versuchen:
entweder das Script im autoit-Ordner ausführen, oder den Pfad zur autoit.chm anpassen
Const $HH_DISPLAY_TOPIC = 0x0 ; select last opened tab, [display a specified topic]
Const $HH_DISPLAY_TOC = 0x1 ; select contents tab, [display a specified topic]
Const $HH_DISPLAY_INDEX = 0x2 ; select index tab and searches for a keyword
Const $HH_DISPLAY_SEARCH = 0x3 ; select search tab and perform a search
Const $HH_HELP_CONTEXT = 0xF ; display mapped numeric value in dwData
;~ HWND WINAPI HtmlHelpA(
;~ HWND hwndCaller,
;~ LPCSTR pszFile,
;~ UINT uCommand,
;~ DWORD_PTR dwData
;~ );
$sfunc = "_StringEncrypt"
$hwndHelp = DllCall("hhctrl.ocx","hwnd","HtmlHelpA","hwnd",0,"str","Autoit.chm","int",$HH_DISPLAY_INDEX,"str",$sfunc)
if WinWaitActive($hwndHelp[0],"",5) Then Send("{ENTER}")
While WinExists($hwndHelp[0])
Sleep(250)
WEnd
Beispiel für eine allgemeine Hilfe Datei unabhängig des Ordners in dem das Script liegt...
Const $HH_DISPLAY_TOPIC = 0x0 ; select last opened tab, [display a specified topic]
Const $HH_DISPLAY_TOC = 0x1 ; select contents tab, [display a specified topic]
Const $HH_DISPLAY_INDEX = 0x2 ; select index tab and searches for a keyword
Const $HH_DISPLAY_SEARCH = 0x3 ; select search tab and perform a search
Const $HH_HELP_CONTEXT = 0xF ; display mapped numeric value in dwData
;~ HWND WINAPI HtmlHelpA(
;~ HWND hwndCaller,
;~ LPCSTR pszFile,
;~ UINT uCommand,
;~ DWORD_PTR dwData
;~ );
$sfunc = "Dr. Watson für Windows, Protokolldateien"
$hwndHelp = DllCall("hhctrl.ocx","hwnd","HtmlHelpA","hwnd",0,"str",@WindowsDir&"\help\drwtsn32.chm","int",$HH_DISPLAY_INDEX,"str",$sfunc)
if WinWaitActive($hwndHelp[0],"",5) Then Send("{ENTER}")
While WinExists($hwndHelp[0])
Sleep(250)
WEnd
lies dir mal den Thread durch.
Ich denke die Antwort steckt in Zedna's Post
http://www.autoitscript.com/forum/index.php?showtopic=27108&st=20&p=195394&hl=open%20chm%20file%20at%20keyword&fromsearch=1&#entry195394
jetzt dachte ich, ich bin auf dem richtigen Weg.
Jetzt verstehe ich leider nichts mehr. 
Du musst der IP-Adresse schon ein Protokoll voranstellen, das zum verbinden verwendet werden soll.
TCPStartup()
$ip = TCPNameToIP("www.autoit.de")
TCPShutdown()
MsgBox(0, "IP",$ip)
ShellExecute("http://"&$ip)
Herzlich willkommen,
bist als Oldie nicht alleine hier 
; *******************************************************
; Example 1 - Create a browser window and navigate to a website
; *******************************************************
;
#include <IE.au3>
$oIE = _IECreate ("www.autoitscript.com",0,0)
_IEAction($oIE,"visible")
Exit
Naja, zu langsam...
dafür mit Beispiel
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>
;Fenster erstellen
GUICreate("Programm vorzeitig beenden", 520, 360)
GUISetBkColor("0xFFFFCA")
GUISetFont(9, 400, 0, "Arial")
Global $lauf, $count = 1
;Fenster aufrufen
GUISetState(@SW_SHOW)
HotKeySet('!e', '_ende') ; Hotkey zum vorzeitigen Beenden: ALT + e
[/autoit] [autoit][/autoit] [autoit][/autoit] [autoit]GUICtrlCreateLabel("Anzahl Läufe: 10", 10, 40)
$lauf = GUICtrlCreateLabel("Lauf:", 10, 80,100,20)
$btn_Start = GUICtrlCreateButton("Start", 270, 50, 60, 20)
$msg = 0
While 1
$msg = GUIGetMsg()
Select
Case $msg = $GUI_EVENT_CLOSE
ExitLoop
Case $msg = $btn_Start
AdlibEnable('_repeat', 1000)
EndSelect
WEnd
Func _repeat()
guICtrlSetData($lauf,"Lauf: " & $count)
$count += 1
If $count = 10 Then AdlibDisable()
EndFunc
Func _ende()
ConsoleWrite("vorzeitig beendet" & @CRLF)
AdlibDisable()
EndFunc
Exit
[/autoit]was heißt "wieder" sichtbar machen.
In welchem Zustand ist das Fenster denn?
feine Sache. 
Aber bei der Vorlage wird es nicht einfach das zu toppen. 
Da klinke ich mich aus
weil es grad so ruhig ist, mach ich mal den Anfang...
Ist wahrscheinlich nicht besonders gut (mit dem Laptop auf den Beinen auf dem Sofa erstellt),
aber vielleicht bricht es ja das Eis
auch von mir ein Herzlich willkommen,
wer hat Dinosaurier gesehen? 
du kannst nach öffnen des Codes mit Shift - Ctrl - Klick auf ein - Alle Gruppen zusammenfalten
Ode runter View mit "Toggle all folds"
Andy,
ich liebe Deine Geschichten.
Möchtest Du nicht mal ein Buch über Computer / Internet / oder so schreiben.
Ich bin sicher für Anfänger / Kinder / Ältere Menschen wäre das eine leicht verständliche Kost,
die zudem auch noch in sehr ansprechender Weise geschrieben ist.
Habe selten eine so schöne Erklärung über TCP Paket-geschubse gelesen...
Freue mich schon auf Deinen nächsten Roman
zum Beispiel so:
#Include <Constants.au3>
#include <GUIConstants.au3>
#NoTrayIcon
Opt("TrayMenuMode",1) ; Default tray menu items (Script Paused/Exit) will not be shown.
[/autoit] [autoit][/autoit] [autoit]$settingsitem = TrayCreateMenu("Settings")
$displayitem = TrayCreateItem("Display", $settingsitem)
$printeritem = TrayCreateItem("Printer", $settingsitem)
TrayCreateItem("")
$aboutitem = TrayCreateItem("About")
TrayCreateItem("")
$exititem = TrayCreateItem("Exit")
TraySetState()
#include <GUIConstants.au3>
GUICreate('')
GUISetState()
$msgbox = GUICtrlCreateButton("meine MSgBox",10,10,80,20)
While 1
$msg = TrayGetMsg()
$msg1 = GUIGetMsg()
Switch $msg
Case $aboutitem
Msgbox(64,"about:","AutoIt3-Tray-sample")
Case $exititem
ExitLoop
EndSwitch
Switch $msg1
Case $GUI_EVENT_CLOSE
Exit
Case $msgbox
MsgBox(0, '', "meine MsgBox")
EndSwitch
WEnd
