XProfan

Jörg
Sellmeyer

i know Yes not, why you The Edits first with Size zero erstellst but What is herewith?

Profan-Help

becomes Y2 as negativer worth indicated, so becomes of course nevertheless the absolute worth as Size taken, but at the same time The automatic Wortumbruch-function activate:

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

RGH

and Why make You not simply as it in the Help standing?

here you are:

Helpfile

becomes Y2 as negativer worth indicated, so becomes of course nevertheless the absolute worth as Size taken, but at the same time The automatic Wortumbruch-function activate: The horizontale Scroll bar won't displayed and a word, not More in a row fits becomes automatically into next row brought.

the functions correct:

cls
var a$="MMMMMMMMM NNNNNNNNNNNNN HHHHHHHHHHHHH GGGGGGGGGGGGGGG VVVVVVVV"
Var R_Fuss& = @Create("RichEdit", %hwnd ,"" ,10,60,400,-120)
Settext R_Fuss&,a$
Var R_Kopf& = @Create("MultiEdit", %hwnd ,"" ,10,200,400,-120)
Settext R_Kopf&,a$

While 1

    Waitinput

EndWhile

End

Greeting
Roland

Verd....! Jörg was faster!

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

Thomas
Freier

because I in the Window a GridBOX have, The becomes minimizes , if z.B. the Fußzeilentext machine becomes. in the Freiraum should The Editbox. is The edit exits, comes The GridBOX again on filled Size. want no zusätzliches dialog-Window or the window share.
The Text the Editbox becomes later at Print used with the automatischen and erzwungenen Zeilenumbrüchen.

Gruß Thomas
Windows XP SP2, XProfan X2

Jörg
Sellmeyer

then create the Edit still first so:

Var R_Kopf& = @Create("MultiEdit", %hwnd ,"" ,10,200 , 0,-120)

SetWindowPos has on the automatischen Umbruch none influence.
Also could You still too ShowWindow() use, or?

Verd....! Jörg was faster!

Hehe...

Windows XP SP2 XProfan X4
... und hier mal was ganz anderes als Profan ...

[OFFTOPIC]
or heavy kewl enhanced:

long r_kopf=createMultiEdit(hWnd,"",,,,-1)

or.

XProfan X2
Vista (TM) Home Premium, SP2, Core(TM)2 Duo P8600 @ 2.40GHz

cls
long r_kopf=createMultiEdit(hWnd,"",,,,-1)
setWindowPos r_kopf,10,10,100,100
setText r_kopf,"Nihil novi sub sole"
waitinput
end

^^
[/OFFTOPIC]

~~zwischenablage01.jpg~~	5 kB

Hochgeladen:	11/17/11

Downloadcounter:
		~~Download~~

Thomas
Freier

thanks for suggestions. In Jörgs direction I had already tested. but:

Var R_vor& =Create("MultiEdit",dlg&, "",0,0,0 ,-0)

went not. however:

Var R_vor& =Create("MultiEdit",dlg&, "",0,0,0 ,-1)

Gruß Thomas
Windows XP SP2, XProfan X2