| |
|
|
Uwe ''Pascal'' Niemeier | Hi Roland!
Mir es antes kurzem aufgefallen, el Profans Crear("RichEdit"...) una Control el "alten" Klasse RICHEDIT anlegt anstatt el neuere Richedit20A utilizarse: KompilierenMarcaSeparaciónwindow 400,400
var a&=create("RichEdit",%hwnd,"",10,30,200,50)
settext a&,classof(a&)
sendmessage(a&,1087,0,1)--EM_HIDESELECTION => none
sendmessage(a&,177,0,-1)--EM_SETSEL => alles markieren
var b&=control("RichEdit20A","",getstyle(a&),10,120,200,50,%hwnd,1,0)
settext b&,classof(b&)
sendmessage(b&,1087,0,1)--EM_HIDESELECTION => none
sendmessage(b&,177,0,-1)--EM_SETSEL => alles markieren
while 1
waitinput
beep
| 05.04.2010 ▲ | |
|
|
|
|
Uwe ''Pascal'' Niemeier | * a Erinnerung *
Ist dieses Feature a Kompatiblität wirklich todavía nötig?
SeeYou Pascal |
|
|
| |
|
|
|
RGH | ¡Hola Pascal, en el nächsten (vermutlich heutigen) Subscriptionsversion kann en lugar de des initialen Textes (el eh' kaum alguien brauchtr y verwendet) una Modus angegeben voluntad: Modus 0 = Alte Versión ("RICHEDIT" ) Modus 1 = Neue Versión ("RICHEDIT20A" ) Wird como bisher una initialer Texto angegeben, se automáticamente Modus 0 gewählt.
Bitte veces testen!
(Früher Tuve lo veces así eingerichtet, dass RICHEDIT20A verwendet wurde si la zugehörige RICHED20.DLL gefunden wurde, ansonstenm el RIOCHEDIT de el RICHED32.DLL. Aus una desafortunadamente vergessenen Grund Tuve el Codeteil para el neuere RichEdit seit algunos Versionen auskommentiert.
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 | 29.09.2010 ▲ |
|
|
|
|
Uwe ''Pascal'' Niemeier | Hi Roland!
Der Vollständigkeit halber solltest du auch el Typ RichEdit50W (RichEdit 4.1) zulassen: KompilierenMarcaSeparaciónwindow 500,300
var Edit1&=create("RichEdit",%hwnd,1,10,10,200,200)'--RichEdit20A
settext Edit1&,classof(Edit1&)
var dll&=usedll("Msftedit.dll")
var Edit2&=control("RichEdit50W","",getstyle(Edit1&,0),220,10,200,200,%hwnd,1234,0,getstyle(Edit1&,1))
settext Edit2&,classof(Edit2&)
while 1
waitinput
e e
Wozu al brauchen kann o. wo el Vorteile mentira weiß Yo auch todavía no, aber uno de hecho puede nie wissen...
BTW: Falls el jeweilige Versión no verfügbar es debería tal vez una entsprechende Warnung tener lugar.
SeeYou Pascal |
|
|
| |
|
|
|
RGH | Ok, con Modus 2 bekommt uno de el nächsten Release-Kandidaten, si está disponible, el RichEdit50W, ansonsten va el Fallback encima RichEdit20A para alten RichEdit. Un Warnung möchte Yo eigentlich no ausgeben, como Yo z.B. auch en el endgültigen Programmcode el Warnungen eingeschaltet lasse y luego el User älterer Windowsversionen "grundlose" Warnungen erhält. Lo es sí el Programmierer frei, por ClassOf() a überprüfen, welche Versión nun disponible es.
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 | 30.10.2010 ▲ |
|
|
|