/*
    +++
    
    TMDomLib.js Version 0.6.1
    DHTML-Bibliothek
    
    Diese DHTML-Bibliothek stellt grundlegende Crossbrowser-DHTML-Funktionen bereit.
    Beruecksichtigt werden nur Browser, die die W3C-DOM-Syntax weitgehend verstehen.
    
    Kompatible Browser (Liste u.U. unvollstaendig):
    -   Mozilla-basierte Browser (Mozilla, Firefox/Firebird/Phoenix, Netscape 6+ etc.)
    -   Internet Explorer 5+
    -   Opera 6 (teilweise)
    -   Opera 7+
    -   Safari/KHTML
    
    Code:   Tobias Mueller 2004
    
    +++
    
    Die Funktionen im Ueberblick:

    TMDomInit()
        Ermittelt anhand unterstuetzter Methoden, ob der Browser des Benutzers ausreichend DOM-kompatibel ist und ermittelt in diesem Fall auch den Browser.


    TMSucheElem(el)
        Regelt den Elementzugriff je nach uebergebenen Argumenten:
        -   Elementzugriff per getElementById, wenn nur ein Argument als String uebergeben wird
            Beispiel: TMSucheElem('elementID'); --> Greift auf das Objekt mit der id 'elementID' zu.
        -   Elementzugriff per getElementsByName, wenn drei Argumente uebergeben werden, davon die ersten beiden als String wobei das zweite Argument 'name' lauten muss. Das dritte Argument muss die Indexnummer sein.
            Beispiel: TMSucheElem('elementNAME','name',0);  --> Greift auf das erste Objekt mit dem Namen 'elementNAME' zu.
        -   Elementzugriff per getElementsByTagName, wenn drei Argumente uebergeben werden, davon die ersten beiden als String wobei das zweite Argument 'tagname' lauten muss. Das dritte Argument muss die Indexnummer sein.
            Beispiel: TMSucheElem('img','tagname',3);  --> Greift auf das vierte img-Objekt(Bild) innerhalb des Dokuments zu.
        -   Wenn das erste Argument kein String, sondern vom Typ 'object' ist, wird es unveraendert zurueckgegeben.
            Beispiel: TMSucheElem(document); --> gibt document zurueck
    
    
    TMCSS(el)
        Regelt den Zugriff auf die CSS-Eigenschaften eines Elements
        -   Dabei gilt im Prinzip das selbe wie bei TMSucheElem(el), nur dass zusätzlich zum Element .style zurueckgeben wird.
            Beispiel: TMCSS('elementID').backgroundColor; --> gibt document.getElementById('elementID').style.backgroundColor; zurueck.
    

    TMCSSVisibility()
        Setzt die CSS-Visibility-Eigenschaft eines oder mehrerer Elemente je nach uebergebenen Argumenten.
        Benoetigt TMSucheElem(el)
        -   Pro Element muessen der Funktion in dieser Reihenfolge zwei Argumente uebergeben werden:
            -   Die ID des Elements.
            -   Der String 'ein', um das Element sichtbar zu machen, oder der String 'aus', um das Element unsichtbar zu machen.
        -   Es koennen der Funktion beliebig viele dieser Argumentpaare uebergeben werden und somit beliebig viele Elemente in ihrer Sichtbarkeit veraendert werden.
            Beispiel: TMCSSVisibility('element1','ein','element2','aus'); --> Blendet Das Element mit der ID 'element1' ein und das mit der ID 'element2' aus.


    TMCSSDisplay()
        Setzt die CSS-Display-Eigenschaft eines oder mehrerer Elemente je nach uebergebenen Argumenten.
        Benoetigt TMSucheElem(el)
        -   Pro Element muessen der Funktion in dieser Reihenfolge zwei Argumente uebergeben werden:
            -   Die ID des Elements.
            -   Ein String mit der gewuenschten Display-Eigenschaft.
        -   Es koennen der Funktion beliebig viele dieser Argumentpaare uebergeben werden und somit die Display-Eigenschaft beliebig vieler Elemente veraendert werden.
            Beispiel: TMSetDisplay('element1','block','element2','none','element3','inline'); --> Setzt das Element mit der ID 'element1' auf display:block, das mit der ID 'element2' auf display:none und das mit der ID 'element3' auf display:inline.


    TMCSSPosition()
        Setzt die X- und Y-Position eines oder mehrerer per CSS positionierter Elemente je nach uebergebenen Argumenten.
        Benoetigt TMSucheElem(el)
        -   Pro Element muessen der Funktion in dieser Reihenfolge drei Argumente uebergeben werden:
            -   Die ID des Elements.
            -   Die gewuenschte X-Position des Elements als Ganzzahl.
            -   Die gewuenschte Y-Position des Elements als Ganzzahl.
        -   Es koennen der Funktion beliebig viele dieser Argumentpaare uebergeben werden und somit die Position beliebig vieler Elemente veraendert werden.
            Beispiel: TMCSSPosition('element1',100,50,'element2',400,100); --> Setzt das Element mit der ID 'element1' auf die Position left:100px und top:50px und das mit der ID 'element2' auf die Position left:400px und top:100px.


    TMCSSClip()
        Setzt die CSS-Clip-Werte eines oder mehrerer Elemente je nach uebergebenen Argumenten.
        Benoetigt TMSucheElem(el)
        -   Pro Element muessen der Funktion in dieser Reihenfolge fuenf Argumente uebergeben werden:
            -   Die ID des Elements.
            -   Der obere ClipWert als Ganzzahl.
            -   Der rechte ClipWert als Ganzzahl.
            -   Der untere ClipWert als Ganzzahl.
            -   Der linke ClipWert als Ganzzahl.
        -   Es koennen der Funktion beliebig viele dieser Argumentpaare uebergeben werden und somit die Clip-Werte beliebig vieler Elemente veraendert werden.
            Beispiel: TMCSSClip('element1',0,300,200,0); --> Setzt den Clip-Bereich des Elements mit der ID 'element1' auf clip:rect(0px, 300px, 200px, 0px).


    TMCSSZindex()
        Setzt den CSS-Z-Index eines oder mehrerer Elemente je nach uebergebenen Argumenten.
        Benoetigt TMSucheElem(el)
        -   Pro Element muessen der Funktion in dieser Reihenfolge zwei Argumente uebergeben werden:
            -   Die ID des Elements.
            -   Der gweuenschte Z-Index als Ganzzahl.
        -   Es koennen der Funktion beliebig viele dieser Argumentpaare uebergeben werden und somit die Z-Index-Werte beliebig vieler Elemente veraendert werden.
            Beispiel: TMCSSZindex('element1',10,'element2',20); --> Setzt den Z-Index des Elements mit der ID 'element1' auf z-index:10 und den des Elements mit der ID 'element2' auf z-index:20.


    TMGetElemPosY(el)
        Ermittelt die Y-Position eines Elements und gibt diese zurueck.


    TMGetElemPosX(el)
        Ermittelt die X-Position eines Elements und gibt diese zurueck.


    TMErstelleEvent(obj,handler,funktion)
        Registriert einen Event-Handler an einem Element je nach uebergebenen Argumenten entweder nach dem Event-Modell des DOM-Level 0 oder dem des W3C-DOM-Level 2 bzw. im Falle des IE nach dem Microsoft-Event-Modell.
        Benoetigt TMSucheElem(el)
        -   Event-Registrierung nach dem Model des DOM-Level 0:
            Der Funktion muessen in dieser Reihenfolge die drei im Folgenden beschriebenen Argumente uebergeben werden:
                -   Das Element, dem ein Event-Handler hinzugefuegt werden soll als String (ID des Elements) oder Objektreferenz (z.B. document).
                -   Der Event-Handler, der dem Element hinzugefuegt werden soll als String in Kleinschreibweise und ohne die Vorsilbe 'on'.
                -   Die Funktion, die bei Eintreten des Events aufgerufen werden soll als Objektreferenz.
                Beispiel: TMErstelleEvent(document,'mousemove',TMSucheMaus);
        -   Event-Registrierung nach dem Model des DOM-Level 2:
            Zusatzlich zu den drei oben genannten Argumenten muss der Funktion folgendes viertes Argument uebergeben werden:
                -   Ein Boolescher Wert (true oder false), der beim Event-Modell des W3C das Event-Bubbling bestimmt.
                Beispiel: TMErstelleEvent(document,'mousemove',TMSucheMaus,false);


    TMEntferneEvent(obj,handler,funktion)
        Entfernt einen Event-Handler von einem Element je nach uebergebenen Argumenten entweder nach dem Event-Modell des DOM-Level 0 oder dem des W3C-DOM-Level 2 bzw. im Falle des IE nach dem Microsoft-Event-Modell.
        Benoetigt TMSucheElem(el)
        -   Event-Deregistrierung nach dem Model des DOM-Level 0:
            Der Funktion muessen in dieser Reihenfolge die zwei im Folgenden beschriebenen Argumente uebergeben werden:
                -   Das Element, von dem ein Event-Handler entfernt werden soll als String (ID des Elements) oder Objektreferenz (z.B. document).
                -   Der Event-Handler, der von dem Element entfernt werden soll als String in Kleinschreibweise und ohne die Vorsilbe 'on'.
                Beispiel: TMEntferneEvent(document,'mousemove');
        -   Event-Deregistrierung nach dem Model des DOM-Level 2:
            Zusatzlich zu den zwei oben genannten Argumenten muessen der Funktion folgende zwei Argumente in dieser Reihenfolge uebergeben werden:
                -   Die Funktion, die bei Registrierung des Events angegeben wurde als Objektreferenz.
                -   Ein Boolescher Wert (true oder false), der beim Event-Modell des W3C das Event-Bubbling bestimmt.
                Beispiel: TMEntferneEvent(document,'mousemove',TMSucheMaus,false);


    TMSucheMaus(e)
        Ermittelt die Mauspostion bei einem zu uebergebenden Event und gibt diese zurueck.
        Beruecksichtigt wird dabei die veraenderte Position durch eventuelles Scrollen des sichtbaren Bereichs.
        -   Die X- und Y-Position wird in einem Objekt gespeichert, das zurückgegeben wird. Zugriff auf X- und Y-Position siehe Beispiele.
            Beispiele:  var MausPosX = TMSucheMaus(e).x; (X-Position OHNE Beruecksichtigung des Scrollens der Seite)
                        var MausPosY = TMSucheMaus(e).y; (Y-Position OHNE Beruecksichtigung des Scrollens der Seite)
                        var MausPosXPlusScrollPosition = TMSucheMaus(e).xo; (X-Position unter Beruecksichtigung des Scrollens der Seite)
                        var MausPosYPlusScrollPosition = TMSucheMaus(e).yo; (Y-Position unter Beruecksichtigung des Scrollens der Seite)


    TMSchreibeZeile(text)
        Schreibt beim Rendern dynamisch Text oder Markup in das Dokument, wenn der Brwoser DOM unterstuetzt.
        -   Der Funktion muss als String der zu schreibenede Text uebergebenen werden
            Beispiel: SchreibeZeile('<link rel="stylesheet" type="text/css" href="stil.css"/>'); --> Innerhalb eines Javascript-Bereichs im Head einer HTML-Datei notiert, wird in diesem Fall dynamisch ein Stylesheet eingebunden.

*/

function TMDomInit() {
    var agent = navigator.userAgent.toLowerCase();
    var os = navigator.platform.toLowerCase();
    var mac = (os.indexOf('mac') != -1) ? true : false;
    var isW3CDOM = (document.getElementById) ? true : false;
    if (window.opera && isW3CDOM) {
        isOPERA = true;
        isOPERA6 = (document.createElement && !document.addEventListener) ? true : false;
        isOPERA7 = (document.createElement && document.addEventListener) ? true : false;
    } else {
        isOPERA = false;
        isOPERA6 = false;
        isOPERA7 = false;   
    }
    if (document.all && isW3CDOM && !isOPERA) {
        isIE = true;
        isIE5 = (!document.createEventObject && !mac) ? true : false;
        isIE55 = (document.createEventObject && !document.compatMode && !mac) ? true : false;
        isIE6 = (document.compatMode && !mac) ? true : false;
        isIE5MAC = (mac) ? true : false;
    } else {
        isIE = false;
        isIE5 = false;
        isIE55 = false;
        isIE6 = false;
        isIE5MAC = false;
    }
    isKHTML = (isW3CDOM && document.clientWidth) ? true : false;
    isGECKO = (isW3CDOM && !isKHTML && !isIE && !isOPERA) ? true : false;
    isGECKOPR = (isGECKO && (agent.indexOf('rv') == -1) && !document.compatMode) ? true : false;
    isDOM = (isGECKO || isKHTML || isIE || isOPERA6 || isOPERA7) ? true : false;
}

TMDomInit();

function TMSucheElem(obj) {
    if (isDOM) {
        var a = arguments;
        if (typeof obj == 'string') {
            if (a.length == 1) {
                return document.getElementById(obj);
            } else if (a.length == 3 && typeof a[1] == 'string' && typeof a[2] == 'number') {
                if (a[1].toLowerCase() == 'name') {
                    return document.getElementsByName(obj)[a[2]];
                } else if (a[1].toLowerCase() == 'tagname') {
                    return document.getElementsByTagName(obj)[a[2]];
                }
            }
        } else if (typeof obj == 'object') {
            return obj;
        }
    }
}

function TMCSS(obj) {
    if (isDOM) {
        var a = arguments;
        if (typeof obj == 'string') {
            if (a.length == 1) {
                return TMSucheElem(obj).style;
            } else if (a.length == 3 && typeof a[1] == 'string' && typeof a[2] == 'number') {
                return TMSucheElem(obj,a[1],a[2]).style;
            }
        } else if (typeof obj == 'object') {
            return obj.style;
        }
    }
}
                
function TMCSSVisibility() {
    if (isDOM) {
        var a = arguments;
        for (var i = 0; i<a.length-1; i+=2) {
            if (typeof a[i] == 'string' || typeof a[i] == 'object') {
                var objCSS = TMSucheElem(a[i]).style;
                if (a[i+1].toLowerCase() == 'ein') {
                    objCSS.visibility = 'visible';
                } else {
                    objCSS.visibility = 'hidden';   
                }
            }
        }
    }
}

function TMCSSDisplay() {
    if (isDOM) {
        var a = arguments;
        for (var i = 0; i<a.length-1; i+=2) {
            if (typeof a[i] == 'string' || typeof a[i] == 'object') {
                TMSucheElem(a[i]).style.display = a[i+1];
            }
        }
    }
}

function TMCSSPosition() {
    if (isDOM) {
        var a = arguments;
        for (var i = 0; i<a.length-2; i+=3) {
            if (typeof a[i] == 'string' || typeof a[i] == 'object') {
                var objCSS = TMSucheElem(a[i]).style;
                objCSS.left = a[i+1] + 'px';
                objCSS.top = a[i+2] + 'px';
            }
        }
    }
}

function TMCSSClip() {
    if (isDOM) {
        var a = arguments;
        for (var i = 0; i<a.length-4; i+=5) {
            if (typeof a[i] == 'string' || typeof a[i] == 'object') {
                TMSucheElem(a[i]).style.clip = 'rect('+ a[i+1] +'px, ' + a[i+2] + 'px, ' + a[i+3] + 'px, ' + a[i+4] + 'px)';
            }
        }
    }
}

function TMCSSZindex() {
    if (isDOM) {
        var a = arguments;
        for (var i = 0; i<a.length-1; i+=2) {
            if (typeof a[i] == 'string' || typeof a[i] == 'object') {
                TMSucheElem(a[i]).style.zIndex = a[i+1];
            }
        }
    }
}

function TMGetElemPosY(el) {
    var yPosEl = 0, element = el;
    while (typeof element == 'object') {
        yPosEl += element.offsetTop;
        if (element.tagName.toLowerCase() == 'body' || ((isIE6 && document.documentElement) && element.tagName.toLowerCase() == 'html')) {
            element = 0;
        }
        if (typeof(el.offsetParent) == 'object') {
            element = element.offsetParent;
        }
    }
    return yPosEl;
}
                
function TMGetElemPosX(el) {
    var xPosEl = 0, element = el;
    while (typeof element == 'object') {
        xPosEl += element.offsetLeft;
        if (element.tagName.toLowerCase() == 'body' || ((isIE6 && document.documentElement) && element.tagName.toLowerCase() == 'html')) {
            element = 0;
        }
        if (typeof(el.offsetParent) == 'object') {
            element = element.offsetParent;
        }
    }
    return xPosEl;
}

function TMErmittleMasse(obj) {
    if (isDOM) {
        var obj = TMSucheElem(obj);
        var masse = new Object();
        masse.b = obj.offsetWidth;
        masse.h = obj.offsetHeight;
        return masse;
    }
}

function TMErstelleEvent(obj,handler,funktion) {
    if (isDOM) {
        var a = arguments;
        var obj = TMSucheElem(obj);
        if (a.length == 4) {
            if (obj.addEventListener) {
                return obj.addEventListener(handler,funktion,a[3]);
            } else if (obj.attachEvent) {
                return obj.attachEvent('on' + handler,funktion);
            }
        } else {
            return obj['on' + handler] = funktion;
        }
    }
}

function TMEntferneEvent(obj,handler) {
    if (isDOM) {
        var a = arguments;
        var obj = TMSucheElem(obj);
        if (a.length == 4) {
            if (obj.removeEventListener) {
                return obj.removeEventListener(handler,a[2],a[3]);
            } else if (obj.detachEvent) {
                return obj.detachEvent('on' + handler,a[2]);
            }
        } else {
            return obj['on' + handler] = null;
        }
    }
}

function TMUnterbindeStandard(e) {
    var e = e ? e : event;
    if (e.preventDefault) {
        e.preventDefault();
    } else if (isIE) {
        e.returnValue = false;
    } else {
        return false;
    }
}

function TMUnterbindeAusbreitung(e) {
    var e = e ? e : event;
    if (e.stopPropagation) {
        e.stopPropagation();
    } else if (isIE) {
        e.cancelBubble = true;
    }
}

function TMSucheMaus(e) {
    if (isDOM) {
        var xOffset, yOffset;
        var e = e ? e : window.event;
        if (isIE) {
            if (document.documentElement && (document.documentElement.scrollLeft || document.documentElement.scrollTop)) {
                xOffset = document.documentElement.scrollLeft;
                yOffset = document.documentElement.scrollTop;
            } else if (document.body) {
                xOffset = document.body.scrollLeft;
                yOffset = document.body.scrollTop;
            }
        } else {
            xOffset = window.pageXOffset;
            yOffset = window.pageYOffset;
        }
        var mausPos = new Object();
        mausPos.x = e.clientX;
        mausPos.y = e.clientY;
        mausPos.xo = mausPos.x + xOffset;
        mausPos.yo = mausPos.y + yOffset;
        return mausPos;
    }
}

function TMSchreibeZeile(text) {
    if (isDOM) {
        document.writeln(text);
    }
}