Text sichtbar aber nicht zu makieren

  • Hallo.

    Ich würde gerne einen Text (ca. acht DIN-A4 Seiten lang) in einem Fenster 600 x 400 anzeigen lassen (scroller erlaubt).
    Bedingung soll aber sein, das der Text nicht markiert und dann kopiert werden kann.

    Ist das möglich und wenn ja, wie?

    LG, Crazy-A.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    k3mrwmIBHejryPvylQSFieDF5f3VOnk6iLAVBGVhKQegrFuWr3iraNIblLweSW4WgqI0SrRbS7U5jI3sn50R4a15Cthu1bEr

  • also :)

    wiso machst du den text net in ein label? das lässt sich net markieren ;)

    MFG Fire

    MFG FireFlyer

    *Paradox ist, wenn man sich im Handumdrehen den Fuss bricht* :D

    Einmal editiert, zuletzt von FireFlyer (14. Juli 2008 um 02:26)

    • Offizieller Beitrag

    Alles in ein großes Editfeld schreiben. Genau über das Edit (außer Scroll-Leiste) legst du ein transparentes, TopMost- PopUp-Window (als Child) .
    Hier mal als Bsp.:

    Spoiler anzeigen
    [autoit]

    #include<GUIConstantsEx.au3>
    #include<WindowsConstants.au3>
    #include<EditConstants.au3>
    Opt("GUIOnEventMode", 1) ; OnEventMode = EIN

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

    $gui1 = GUICreate('GUI 1', 400, 400, -1, -1, Default, $GUI_WS_EX_PARENTDRAG)
    GUISetOnEvent($GUI_EVENT_CLOSE, 'GUI1_close')
    $e = GUICtrlCreateEdit('Die Winkelfunktionen können aber als Sekanten-'& @CRLF& _
    'und Tangentenabschnitte am Einheitskreis auch'& @CRLF& 'auf größere Winkel erweitert werden. '& @CRLF& _
    'Vom Schnittpunkt des einen Winkelschenkels'& @CRLF& 'mit dem Einheitskreis werden die Lote'& @CRLF& _
    'auf die beiden Koordinatenachsen gefällt'& @CRLF& 'und liefern Sinus und Kosinus des Winkels.'& @CRLF& _
    'Die Tangenten in den Punkten x = 1 bzw. y = 1'& @CRLF& 'schneiden den Schenkel ebenfalls und liefern dann'& @CRLF& _
    'in der Projektion auf die Achsen den Tangens'& @CRLF& 'und den Kotangens. Dabei muss der Schenkel'& @CRLF& _
    'gegebenenfalls rückwärts verlängert werden,'& @CRLF& 'um einen Schnittpunkt zu erzielen.'& @CRLF& _
    'Auf diese Weise können jedem Winkel von 0 bis 360 Grad Werte der Winkelfunktionen zugeordnet werden,'& @CRLF& _
    'die nun freilich auch negativ werden können (siehe Abbildung).'& @CRLF& _
    'Die oben angegebenen Beziehungen gelten dabei weiterhin.'& @CRLF& 'In der Analysis werden Sinus und Kosinus'& @CRLF& _
    'in der Regel über Potenzreihen definiert,'& @CRLF& 'wobei der Winkel im Bogenmaß angegeben wird.'& @CRLF& _
    'Näheres siehe in den Artikeln Sinus und Kosinus'& @CRLF& 'sowie Tangens.', _
    5, 5, 390, 200, BitOR($WS_VSCROLL, $WS_HSCROLL, $ES_READONLY), $ES_MULTILINE)
    $bt = GUICtrlCreateButton('Ende', 170, 240, 60, 20)
    GUICtrlSetOnEvent(-1, 'GUI1_close')
    ControlFocus('','',$bt)

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

    $trans = GUICreate('',375, 180, 5, 5,$WS_POPUP, BitOR($WS_EX_TOPMOST, $WS_EX_MDICHILD), $gui1)
    WinSetTrans($trans,'',10)
    GUISetState(@SW_SHOW, $trans)

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

    GUISetState(@SW_SHOW, $gui1)

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

    While True
    Sleep(100)
    WEnd

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

    Func GUI1_close()
    Exit
    EndFunc

    [/autoit]
  • Hallo Bug.

    Hatte schon das Script so weit, das ich ein transparentes Bild (Art: Glasscheibe) drüber gelegt habe.
    Aber Deine ID ist ja bei weitem besser und das auch weil es kleiner ist ;)

    Kleine Leute, große Script?
    Große Leute, kleine Scripte?

    Aber schön das die körperliche Größe nicht von der geistigen abhängig :rofl:

    Merci und lg, Crazy-A.

    Lieben Gruß,
    Alina

    ~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~~

    Geheime Information: ;)
    k3mrwmIBHejryPvylQSFieDF5f3VOnk6iLAVBGVhKQegrFuWr3iraNIblLweSW4WgqI0SrRbS7U5jI3sn50R4a15Cthu1bEr