| |
| |
|
Thomas
Freier | Finde simplemente no Solución una automatischen Zeilenumbruch beim MultiEdit. Kennt de euch uno una?
$H windows.ph
$H structs.ph
$H messages.ph
$H RichEdit.ph
cls
var a$="MMMMMMMMM NNNNNNNNNNNNN HHHHHHHHHHHHH GGGGGGGGGGGGGGG VVVVVVVV"
Var R_Fuss& = @Crear("RichEdit", %hwnd ,"" ,0,0,0,0)
Settext R_Fuss&,a$
Var R_Kopf& = @Crear("MultiEdit", %hwnd ,"" ,0,0,0,0)
Settext R_Kopf&,a$
SetWindowPos R_Fuss& = 10,60 - 400,120
SendMessage(R_Fuss&,~EM_SETTARGETDEVICE,0,0)
SetWindowPos R_Kopf& = 10,200 - 400,120
SendMessage(R_Kopf&,~EM_SETTARGETDEVICE,0,0)' va natürlich no
Mientras que 1
Waitinput
EndWhile
End
|
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Yo weiß sí no, por qué Usted el Edits sólo con Größe Null erstellst aber qué es hiermit?
Profano-Ayuda
Wird Y2 como negativer Valor angegeben, así zwar trotzdem el absolute Valor como Größe genommen, aber gleichzeitig el automatische Wortumbruch-Función aktiviert: |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ...  | 17.11.2011 ▲ |
|
| |
|
|
RGH | Und por qué machst Usted no simplemente ya que en el Ayuda es?
Bitte muy:
Hilfedatei
Wird Y2 como negativer Valor angegeben, así zwar trotzdem el absolute Valor como Größe genommen, aber gleichzeitig el automatische Wortumbruch-Función aktiviert: Der horizontale Scrollbalken no es adecuado y una Wort, el no mehr en un Línea paßt se automáticamente en el nächste Línea gebracht.
Das funktioniert einwandfrei:
cls
var a$="MMMMMMMMM NNNNNNNNNNNNN HHHHHHHHHHHHH GGGGGGGGGGGGGGG VVVVVVVV"
Var R_Fuss& = @Crear("RichEdit", %hwnd ,"" ,10,60,400,-120)
Settext R_Fuss&,a$
Var R_Kopf& = @Crear("MultiEdit", %hwnd ,"" ,10,200,400,-120)
Settext R_Kopf&,a$
Mientras que 1
Waitinput
EndWhile
End
Saludo
Roland
Verd....! Jörg war más rápido! |
|
| |
| 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 | 17.11.2011 ▲ |
|
| |
|
|
Thomas
Freier | Weil Yo en el Ventana una Gridbox habe, el se verkleinert , si z.B. el Fußzeilentext bearbeitet se. In el Freiraum se el Editbox. Ist el Bearbeitung final, kommt el Gridbox otra vez en volle Größe. Möchte kein zusätzliches Diálogo-Ventana oder el Ventana teilen.
Der Texto el Editbox se später beim Drucken gebraucht con el automatischen y erzwungenen Zeilenumbrüchen. |
|
| |
| |
| |
|
|
Jörg
Sellmeyer | Dann erstelle Edit doch sólo así:
Var R_Kopf& = @Crear("MultiEdit", %hwnd ,"" ,10,200 , 0,-120)
SetWindowPos ha en el automatischen Umbruch no Einfluß.
Außerdem könntest Usted doch auch ShowWindow() uso, oder?
Verd....! Jörg war más rápido!
Hehe... |
|
| |
| Windows XP SP2 XProfan X4... und hier mal was ganz anderes als Profan ... | 17.11.2011 ▲ |
|
| |
|
|
 | [OFFTOPIC] Oder schwer kewl enhanced: o cls
long r_kopf=createMultiEdit(hWnd,"",,,,-1)
setWindowPos r_kopf,10,10,100,100
setText r_kopf,"Nihil novi sub sole"
waitinput
end
 ^ ^ [/OFFTOPIC] |
|
| |
| |
| |
|
|
Thomas
Freier | Gracias para el Sugerencias. In Jörgs Richtung Tuve auch ya getestet. Aber:
Var R_vor& =Crear("MultiEdit",dlg&, "",0,0,0 ,-0)
Var R_vor& =Crear("MultiEdit",dlg&, "",0,0,0 ,-1)
|
|
| |
| |
| |
|
(909)
Deutsch
English
Français
Español
Italia