MLE aufbohren ... Schrift in FETT und ROT

Grafische Primitive, XbaseParts und Darstellungsfragen allgemein.

Moderator: Moderatoren

Antworten
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15689
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

MLE aufbohren ... Schrift in FETT und ROT

Beitrag von brandelh »

ich möchte in einem Feld MLE oder Static (?) Text mit HTML Steuerzeichen <b> und Schriftfarbe rot, sowie Absatz <p> und <br> sauber formatiert anzeigen.

Aber irgendwie stehe ich auf dem Schlauch, die eingebaute Website eventuell oder MLE aufbohren ... da war doch was aber ich find mal wieder die richtige Stelle nicht ...
Gruß
Hubert
Benutzeravatar
Jan
Marvin
Marvin
Beiträge: 14641
Registriert: Fr, 23. Sep 2005 18:23
Wohnort: 49328 Melle
Hat sich bedankt: 21 Mal
Danksagung erhalten: 87 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von Jan »

Hubert,

so ganz versteht ich Deine Frage nicht. Aber wenn ich mal rate: Mit welcher Version? In 1.9 kann ich Dir XbpFormattedLabel() aus dem XbPack 2 empfehlen - das kann zwar keine HTML-Formatierungen, aber Fett und Farbe kann das. Mit 2.0 wäre XbpHtmlWindows() genau das Richtige. Mit beidem habe ich schon gearbeitet, funktioniert 1a.

Jan
Mitglied der XUG Osnabrück
Mitglied der XUG Berlin/Brandenburg
Mitglied des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15689
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von brandelh »

2.0 wäre kein Problem, das Window sehr ich mir mal an.
Gruß
Hubert
Benutzeravatar
Jan
Marvin
Marvin
Beiträge: 14641
Registriert: Fr, 23. Sep 2005 18:23
Wohnort: 49328 Melle
Hat sich bedankt: 21 Mal
Danksagung erhalten: 87 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von Jan »

Hubert,

das ist total einfach:

Code: Alles auswählen

oHtml := XbpHtmlWindow():new(oParent, , sStart, aSize)
oHtml:html := cHtmlText
oHtml:create()
Und schon wird das sauber formatiert angezeigt.

Jan
Mitglied der XUG Osnabrück
Mitglied der XUG Berlin/Brandenburg
Mitglied des Deutschsprachige Xbase-Entwickler e. V.
Benutzeravatar
AUGE_OHR
Marvin
Marvin
Beiträge: 12903
Registriert: Do, 16. Mär 2006 7:55
Wohnort: Hamburg
Hat sich bedankt: 19 Mal
Danksagung erhalten: 44 Mal

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von AUGE_OHR »

brandelh hat geschrieben:ich möchte in einem Feld MLE oder Static (?) Text mit HTML Steuerzeichen <b> und Schriftfarbe rot, sowie Absatz <p> und <br> sauber formatiert anzeigen.
mit HTML geht es in einem XbpMLE wohl nicht aber mit RTF Text und

Code: Alles auswählen

   oMLE:Format := 3
gruss by OHR
Jimmy
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15689
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von brandelh »

Mit ritch Text will ich nicht mehr anfangen, aber die neue 2.0 Funktion gefällt mir gut,
Hier meine Umsetzung, aktuell mit CODES per Hand Eingabe, aber Schaltflächen die das wie hier machen sind ja kein Problem ...

Code: Alles auswählen

#include "Common.ch"
#pragma library( "xppwui.lib" )

/* Overloaded AppSys which does nothing
 */

PROCEDURE Main
    LOCAL cHTML
    LOCAL oXbp, oPB, oMLE, cText

    SET CHARSET TO ANSI

    cText := "Dies ist normaler unformatiertert Text mit fetter Schrift ... Neuer Absatz"
    cHTML := cText

    // Create the HTML window object
    // and assign the HTML markup
    oXbp := XbpHTMLWindow():new()
    oXbp:HTML := strtran(cHTML,"#text#","") // cHTML
    oXbp:create( , , {10,70}, {200,200} )

    // Create first pushbutton, specify position using :create()
    oPB := XbpPushButton():new()
    oPB:caption  := "Vorschau"
    oPB:create( , , {10,20}, {100,30} )
    oPB:activate := {|| cText := oMLE:getData(),oXbp:html := code2html("NEU##"+cText), oXbp:configure()  }

    oMLE          := XbpMLE():new()
    oMLE:horizScroll := .f.
    oMLE:wordWrap :=.t.
    oMLE:create( , , {250,70}, {200,200} )
    oMLE:setData(cText)

    SetAppWindow():showModal()
RETURN

function code2html(cTxt) // meine eigenen [b]kurzen[/b] Steuerzeichen 
   if "##" $ cTxt .and. ! cTxt = "##" // kein Anfangsabsatz
      cTxt := "##" + cTxt
   endif
   cTxt := strtran(cTxt,"##","<p>")
   cTxt := strtran(cTxt,"#","<br>")
   cTxt := strtran(cTxt,"[b]","<b>")
   cTxt := strtran(cTxt,"[B]","<b>")
   cTxt := strtran(cTxt,"[/b]","</b>")
   cTxt := strtran(cTxt,"[/B]","</b>")
   // <font color="#FF0000">Dies ist ein roter Text, der links ausgerichtet ist.</font>
   cTxt := strtran(cTxt,"[r]",'<font color="#FF0000">')
   cTxt := strtran(cTxt,"[R]",'<font color="#FF0000">')
   cTxt := strtran(cTxt,"[/r]","</font>")
   cTxt := strtran(cTxt,"[/R]","</font>")
return cTxt
Gruß
Hubert
Benutzeravatar
Tom
Der Entwickler von "Deep Thought"
Der Entwickler von "Deep Thought"
Beiträge: 9345
Registriert: Do, 22. Sep 2005 23:11
Wohnort: Berlin
Hat sich bedankt: 100 Mal
Danksagung erhalten: 359 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von Tom »

Mache beides (RTF, HTML und viele weitere Formate) schon seit Jahren, mit TX Text Control - und einem wesentlichen Unterschied: Es kann auch bearbeitet werden. :wink:
Herzlich,
Tom
Benutzeravatar
brandelh
Foren-Moderator
Foren-Moderator
Beiträge: 15689
Registriert: Mo, 23. Jan 2006 20:54
Wohnort: Germersheim
Hat sich bedankt: 65 Mal
Danksagung erhalten: 33 Mal
Kontaktdaten:

Re: MLE aufbohren ... Schrift in FETT und ROT

Beitrag von brandelh »

das sieht schon super aus, aber für meine Zwecke ziemlich teuer und wohl auch zu mächtig ;-)
Gruß
Hubert
Antworten