| |
|
|
Christof Neuß | ¡Hola,
ahora knabbere Yo ya otra vez una Ewigkeit a algo (vermutlich) bastante leichtem herum. Folgendes: Yo habe una Richedit con formatiertem Texto. Alles prima. Dort möchte Yo ahora una neue Línea a-/einfügen. Funktioniert auch. Diese Línea o. una Teil su, möchte Yo fett drucken. Dazu brauche Yo el Sequenzen \b y \b0 para una-/ausschalten. Alle Versuche, una passenden String disponible a stellen son bisher gescheitert.
Conjunto("Escape",0)
Re_Text$ = "\b Bankleitzahl: \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&)
Conjunto("Escape",1)
En dieser Variante erhalte Yo en uno Messagebox una richtige Anzeige con einfachen Backslashes. Also: \b Bankleitzahl: \b0... Drucke Yo el Richedit, se el auch genauso gedruckt Kein Wechsel para Fettdruck.
Das Richeditelement muss hier eigentlich no gespeichert voluntad. Damit voluntad Yo sólo el Einträge prüfen. Gehe also anschließend hin y öffne el RTF-Expediente con el Editor. Und qué sehe Yo como?
Wer erklärt me? Und qué muss Yo tun, en en "BOLD" umzuschalten? Wieder veces una gaaaaanz großes DANKESCHÖN para jede Unterstützung. |
|
|
| |
|
|
|
Jörg Sellmeyer | Wenn Dueinen Backslash Mostrar willst, mußt Usted ihn doppelt escribir:
"\\" ergibt como Edición "\" "\\b" müßte also como Edición "\b" ergeben. |
|
|
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 05.01.2011 ▲ |
|
|
|
|
Peter Max Müller | Intento veces Wordpad a abierto. Schreibe en él deinen fetten Texto. Abspeichern como rtf. Diese Expediente nun con el Editor abierto y du siehst qué como alles para Steuerzeichen gebraucht voluntad.
Saludo |
|
|
| |
|
|
|
Christof Neuß | Sorry Personas. Yo habe sí no a wenig Backslashes pero a viele. Lo kommen IMMER 2, auch si yo Conjunto("Escape",0) mache. Yo habe el RTF-Expediente sí ya con el Editor geöffnet. Yo weiß, dass Yo \b y \b0 brauche (s.o.). Das "komische" es sí, dass Yo, el String con uno Messagebox correcto Mostrar kann. En Message a Re_AGK_01& erscheint entonces hay aber el falsche Línea.
Langsam verzweifle Yo. Hab' ya pensamiento, dass tal vez RTF("SaveRTF"... el Übeltäter es. Ist él no! Wenn Yo el Richedit anzeige, erscheint el eingefügte Línea. Aber eben no correcto. Grrrrr.... |
|
|
| |
|
|
|
ByteAttack | Geht el con chr$(92) ?
Ejemplo:
|
|
|
| |
|
|
|
Christof Neuß | Nein, por desgracia, no. Posesiones Yo auch ya ausprobiert. Lo landet trotzdem "\\" en el Richedit. |
|
|
| |
|
|
|
Dieter Zornow | Um algo fett en un Richedit darzustellen hay doch genügend Quellcodes. Der es glaube Yo de Pascal
window 50,50-500,400
settruecolor 1
usefont "ms sans serif",15,7,0,0,0
setdialogfont 1
declarar 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
parámetros d%
declarar a%,rtf#
dim rtf#,60
long rtf#,0=60
long rtf#,4=31
sendmessage(Edit&,$043A,1,rtf#)'-EM_GETCHARFORMAT
a%=byte(rtf#,8)
if testbit(a%,d%)
byte rtf#,8=setbit(a%,d%,0)
long rtf#,4=setbit(a%,d%,1)
más
byte rtf#,8=setbit(a%,d%,1)
long rtf#,4=setbit(a%,d%,1)
endif
sendmessage(Edit&,1092,1,rtf#)'-EM_SETCHARFORMAT
disponer rtf#
setfocus(Edit&)
ENDPROC'------------------------------------------------------------------------ ------------
sendmessage(Edit&,$00B1,0,11)'marca
rtf-SetFormat 0
sendmessage(Edit&,$00B1,0,0)'demarkieren
mientras que 1
waitinput
endwhile
destroywindow(Edit&)
caso dll&:freedll dll&
oder verstehe Yo algo falso ? |
|
|
| 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ß | Sí, el funktioniert auch. Aber el Vorgehensweise es sí entonces una otro. Yo habe ya Texto en el Richedit, muss entonces wissen, Yo wo marca y anschl. fett conjunto muss. Wäre una Möglichkeit.
Yo quería lo einfacher haben y ya beim Einfügen des Textes el Formatierung mitgeben. In el RTF-Archivos es el sí nichts más como una Kombination de "\" y entsprechenden Signo. Yo krieg's sólo simplemente sólo no hin, esta Backslash EINZELN en el Richedit a integrieren. Der Clou es, si yo Escape en 0 poner y luego \\ angebe. Dann tauchen en el Richedit incluso 4 (!) Backslashes en. |
|
|
| |
|
|
|
Dieter Zornow | Usted müsstest entonces wohl el Ver código fuente uno Richedits direkt bearbeiten, porque beim Einfügen se sí Texto eingefügt y no Steuerzeichen. Steuerzeichen voluntad por el Formatmessages entonces en el Ver código fuente eingefügt. Schau dir veces el Quellcode uno Richedits a y versuche lo con Blockwrite
So sieht Texto de wo el mittlere Test fett es con 2 Zeilen. Usted müsstest also deinen Texto con Blockwrite siempre hinter el letzten escribir also el \par Test\b Test\b0 Test aber antes el }
{\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 | ¡Hola, also XProfan scheint hier no schuld a ser.
Lo sieht así de, como si con el genutzten Messages eben sólo una Ersetzen de Texto sin Formatierungen posible es.Und así entonces Su "\b" auch en el RichEdit así adecuado se, sorgt sólo el RichEdit incluso dafür, dass el Backslash "maskiert" se (also con un más Backslash ergänzt se) y somit auch "korrekt" adecuado se. Das RichEdit voluntad also exakt el Mostrar, qué Usted ihm übermittelst.
Mein Vorschlag: Den Texto antes el Einlesen en el RichEdit verändern.
Saludo 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ß | ¡Hola Dieter, hallo Roland,
Yo wusste, dass Yo con Ayuda de el Foro hinkriege. DANKE!
@Roland: Sí, dass scheint wohl así a ser. Ist en efecto logisch, dass el Richedit hier media Texto wiedergeben möchte. Posesiones sólo siempre intenta, lo auszutricksen. Geht pero no. Hab' veces otra vez a el falschen Punto rumgebastelt.
@Dieter: Der Ver código fuente ha geholfen. Yo schalte ahora simplemente Fettdruck una, schiebe entonces media Texto por el Leitung y schalte entonces Fettdruck otra vez de. Der Umweg en Expediente es hier no sinnvoll. El Textos mentira anschl. en uno Access-Datenbank. Das Richedit se sólo adecuado o. gedruckt. No gespeichert. Wenn Yo en uno Línea Fett- y Normaldruck habe, muss Yo ahora sólo mindestens zweimal Messages con texto verschicken. Pensé, Yo podría el por Einbinden el Formatierungszeichen en un Resbalón erledigen.
Mit el Messages y el Bereichsvariablen y así algunos otro "Spezialitäten" Todavía mi Problemas. Aber lo macht riesigen Spaß, con XProfan a trabajo. Yo voluntad dranbleiben... |
|
|
| |
|
|