Français
Forum

Escape à/aus hilft pas pour la ligne dans Richedit

 

Christof
Neuß
Salut,

maintenant knabbere je encore une Ewigkeit à quelque chose (probablement) entier leichtem herum.
Folgendes: j'ai un Richedit avec formatiertem Text. Alles prima. là voudrais je maintenant une neue la ligne à-/insérer. Funktioniert aussi. cet la ligne bzw. une partie en, voudrais je fett drucken. en supplément brauche je qui Sequenzen \b et \b0 zum un-/ausschalten. Alle Versuche, une passenden String zur Disposition trop se mettre sommes bisher gescheitert.
Set("Escape",0)
Re_Text$ = "\b code banque: \b0"+Chr$(9)+Trim$(GetText $(Te_Stamm_01&))+Chr$(10)
SendMessage(Re_AGK_01&, 177, $FFFF, $FFFF)' EM_SETSEL
SendMessage(Re_AGK_01&, 194, 0, Addr(Re_Text$))' EM_REPLACESEL
RTF("SaveRTF",Re_AGK_01&,"Test.rtf")
RTFPrn(Re_AGK_01&)
Set("Escape",1)

chez cette variante erhalte je dans einer Messagebox une richtige Anzeige avec einfachen Backslashes. alors: \b code banque: \b0...
Drucke je cela Richedit, wird cela aussi genauso gedruckt ne...aucune change zum Fettdruck.

cela Richeditelement muss ici eigentlich pas gespeichert volonté. avec cela veux je seulement qui Einträge vérifier. vais alors anschließend hin et ouvre qui RTF-Dossier avec dem Editor. et quoi vois je là?
\par
.....
\par
\par
\par
\par \\b code banque: \\b0\tab 212223
\par

\par }


qui erklärt mir cela? et quoi muss je 1faire, um sur "BOLD" umzuschalten?
Wieder la fois un gaaaaanz großes DANKESCHÖN pour chacun Unterstützung.
 
Win10 16 GB RAM
05.01.2011  
 




Jörg
Sellmeyer
si Dueinen Backslash Montrer veux, dois Du ihn doppelt écrivons:

"\\" ergibt comme Ausgabe "\"
"\\b" devrait alors comme Ausgabe "\b" ergeben.
 
Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...
05.01.2011  
 




Peter
Max
Müller
Versuch la fois Wordpad trop ouvrir. Schreibe y deinen fetten Text.
Abspeichern comme rtf. cet Dossier eh bien avec dem Editor ouvrir et tu vois quoi là alles pour Steuerzeichen gebraucht volonté.

Salut
 
XProfan X3, X4ß, Win 10.1
05.01.2011  
 




Christof
Neuß
Sorry gens.
j'ai oui pas trop wenig Backslashes mais trop viele. Es venons IMMER 2, aussi si je Set("Escape",0) fais.
j'ai qui RTF-Dossier oui déjà avec dem Editor ouvert. je sais, dass je \b et \b0 brauche (s.o.). cela "komische" ist oui, dass Je l' String avec einer Messagebox richtig Montrer peux. chez qui Message à Re_AGK_01& erscheint ensuite là mais qui falsche la ligne.

lente verzweifle je.
Hab' déjà gedacht, dass peut-être RTF("SaveRTF"... qui Übeltäter ist. Ist il pas! si je cela Richedit anzeige, erscheint qui eingefügte la ligne. mais plan pas richtig. Grrrrr....
 
Win10 16 GB RAM
05.01.2011  
 




ByteAttack
allez cela avec chr$(92) ?

Beispiel:
Re_Text$ = chr$(92)+"b code banque: "+chr$(92)+"b0"+Chr$(9)+Trim$(GetText $(Te_Stamm_01&))+Chr$(10)
 
Website:  [...] 
Facebook:  [...] 
05.01.2011  
 




Christof
Neuß
non, malheureusement pas. Habe je aussi déjà ausprobiert. Es landet quand même "\\" im Richedit.
 
Win10 16 GB RAM
05.01.2011  
 




Dieter
Zornow
Um quelque chose fett dans einem Richedit darzustellen gibt es doch genügend Quellcodes. qui ist glaube je de Pascal
window 50,50-500,400
settruecolor 1
usefont "ms sans serif",15,7,0,0,0
setdialogfont 1
declare Edit&,dll&,Test1%,Test2%,Test3%
'dim rtf#,60
dll&=usedll("riched32.dll")
Edit&=control("RichEdit",»,$54315004,180,10,300,200,%hwnd,100,%HINSTANCE,$200)
settext Edit&,"Test: LaberLaberLaber"
'sendmessage(Edit&,1087,0,1)'----------EM_HIDESELECTION => none

proc rtf-SetFormat'-----------------------------------------------------------------SetFormat

    parameters d%
    declare a%,rtf#
    dim rtf#,60
    long rtf#,0=60
    long rtf#,4=31
    sendmessage(Edit&,$043A,1,rtf#)'-EM_GETCHARFORMAT
    a%=byte(rtf#,8)

    si testbit(a%,d%)

        byte rtf#,8=setbit(a%,d%,0)
        long rtf#,4=setbit(a%,d%,1)

    d'autre

        byte rtf#,8=setbit(a%,d%,1)
        long rtf#,4=setbit(a%,d%,1)

    endif

    sendmessage(Edit&,1092,1,rtf#)'-EM_SETCHARFORMAT
    dispose rtf#
    setfocus(Edit&)

endproc'------------------------------------------------------------------------ ------------

sendmessage(Edit&,$00B1,0,11)'markieren
rtf-SetFormat 0
sendmessage(Edit&,$00B1,0,0)'démarquer

tandis que 1

    waitinput

endwhile

destroywindow(Edit&)
cas dll&:freedll dll&

ou bien verstehe je quelque chose faux ?
 
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
05.01.2011  
 




Christof
Neuß
oui, cela funktioniert aussi. mais qui Vorgehensweise ist oui ensuite une autre. j'ai déjà Text im Richedit, muss ensuite savons, quoi je wohin markieren et anschl. fett mettons muss. Wäre une Possibilité.

je voulais es einfacher avons et déjà beim insérer des Textes qui Formatierung mitgeben. dans den RTF-Fichiers ist cela oui rien d'autre comme une Kombination de "\" et entsprechenden marque. je krieg's arrêt simple seulement pas hin, cette Backslash EINZELN dans cela Richedit trop intégrer.
qui Clou ist, si je Escape sur 0 mets et ensuite \\ angebe. ensuite plonger im Richedit sogar 4 (!) Backslashes sur.
 
Win10 16 GB RAM
06.01.2011  
 




Dieter
Zornow
Du müsstest ensuite wohl den Voir le texte source eines Richedits direct Travailler, car beim insérer wird oui Text eingefügt et aucun Steuerzeichen. Steuerzeichen volonté par qui Formatmessages ensuite dans den Voir le texte source eingefügt. exposition dir la fois den Quellcode eines Richedits à et versuche es avec Blockwrite

So sieht Text aus wohin cela mittlere Test fett ist avec 2 Zeilen. Du müsstest alors deinen Text avec Blockwrite toujours derrière den letzten écrivons alors cela
\par Test\b Test\b0 Test mais avant dem }

{\rtf1\ansi\ansicpg1252\deff0\deflang1031{\fonttbl{\f0\fnil\fcharset0 ;}}
{\colortbl ;\red0\green0\blue160;}
\viewkind4\uc1\pard\cf1\f0\fs24 Test\b Test\b0 Test
\par Test\b Test\b0 Test
\par
\par }
 
Er ist ein Mann wie ein Baum. Sie nennen ihn Bonsai., Win 7 32 bit und Win 7 64 bit, mit XProfan X2
06.01.2011  
 




RGH
Salut,
alors XProfan scheint ici pas schuld trop son.

Es sieht so aus, comme si avec den genutzten Messages plan seulement un Ersetzen de Text sans Formatierungen possible ist.et avec cela ensuite Dein "\b" aussi im RichEdit so angezeigt wird, sorgt arrêt cela RichEdit selbst pour, dass qui Backslash "maskiert" wird (alors avec einem weiteren Backslash ergänzt wird) et somit aussi "korrekt" angezeigt wird. cela RichEdit veux alors exakt cela Montrer, quoi Du ihm übermittelst.

mon Vorschlag: Den Text avant dem Einlesen dans cela RichEdit verändern.

Salut
Roland
 
Intel Duo E8400 3,0 GHz / 4 GB RAM / 1000 GB HDD - ATI Radeon HD 4770 512 MB - Windows 7 Home Premium 32Bit - XProfan X4
06.01.2011  
 




Christof
Neuß
allô Dieter, allô Roland,

je wusste, dass je es avec Aider aus dem Forum hinkriege. DANKE!

@Roland: oui, dass scheint wohl so trop son. Ist oui aussi logisch, dass cela Richedit ici meinen Text redonner voudrais. Habe arrêt toujours versucht, cela Ding auszutricksen. allez mais pas. Hab' la fois wieder à qui falschen Stelle rumgebastelt.

@Dieter: qui Voir le texte source hat geholfen. je schalte maintenant simple Fettdruck un, schiebe ensuite meinen Text par qui Leitung et schalte ensuite Fettdruck wieder aus. qui le détour sur qui Dossier ist ici pas sinnvoll. qui Textes liegen anschl. dans einer Access-banque de données. cela Richedit wird seulement angezeigt bzw. gedruckt. pas gespeichert. si je dans einer la ligne Fett- et Normaldruck habe, muss je maintenant arrêt mindestens zweimal Messages avec le texte verschicken. J'ai pensé, je pourrait cela par Einbinden qui Formatierungszeichen dans einem Glissement erledigen.

avec den Messages et den Bereichsvariablen et so einigen anderen "Spezialitäten" habe je encore mon Probleme. mais es pouvoir riesigen Amusement, avec XProfan trop travailler. je werde dranbleiben...
 
Win10 16 GB RAM
06.01.2011  
 



répondre


Topictitle, max. 100 marque.
 

Systemprofile:

ne...aucune Systemprofil angelegt. [anlegen]

XProfan:

 Posting  Font  Smilies  ▼ 

s'il te plaît s'inscrire um une Beitrag trop verfassen.
 

Options du sujet

9.721 Views

Untitledvor 0 min.
Sven Bader19.11.2023
RudiB.28.08.2021
Matthias Arlt22.06.2020
Andreas Koch05.06.2019
plus...

Themeninformationen



Admins  |  AGB  |  Applications  |  Auteurs  |  Chat  |  protection des données  |  Télécharger  |  Entrance  |  Aider  |  Merchantportal  |  Empreinte  |  Mart  |  Interfaces  |  SDK  |  Services  |  Jeux  |  cherche  |  Support

un projet aller XProfaner, qui il y a!


Mon XProfan
Privé Nouvelles
Eigenes Ablageforum
Sujets-La liste de voeux
Eigene Posts
Eigene Sujets
Zwischenablage
Annuler
 Deutsch English Français Español Italia
Traductions

protection des données


Wir verwenden Cookies seulement comme Session-Cookies à cause de qui technischen Notwendigkeit et chez uns gibt es aucun Cookies de Drittanbietern.

si du ici sur unsere Webseite klickst ou bien navigierst, stimmst du unserer Erfassung de Informationen dans unseren Cookies sur XProfan.Net trop.

Weitere Informationen trop unseren Cookies et en supplément, comment du qui Kontrolle par-dessus behältst, findest du dans unserer nachfolgenden Datenschutzerklärung.


d'accordDatenschutzerklärung
je voudrais keinen Cookie