| |
|
|
funkheld | Hello, how can one whom Text in the one Createedit with the input limit, zb only 5 letters ?
Thank you.
greeting
{$cleq}
Declare Ende&, Edit&, win&
win& = @Create("Window", 0, "Parent", 20, 20, 300,200)
Edit& = @Create("Edit", win&, "", 10, 10, 200, 24)
Ende& = Create("Button", win&, "Ende", 10, 50, 80, 30)
SetStyle Edit&, @GetStyle(Edit&) | ~ES_UPPERCASE
WhileNot @Clicked(Ende&)
WaitInput
EndWhile
End
|
|
|
| |
|
|
|
Detlef Jagolski |
{$cleq}
Declare Ende&, Edit&, win&
win& = @Create("Window", 0, "Parent", 20, 20, 300,200)
Edit& = @Create("Edit", win&, "", 10, 10, 200, 24)
SendMessage(Edit&,$0C5,5,0)' EM_LIMITTEXT
Ende& = Create("Button", win&, "Ende", 10, 50, 80, 30)
SetStyle Edit&, @GetStyle(Edit&) | ~ES_UPPERCASE
WhileNot @Clicked(Ende&)
WaitInput
EndWhile
End
|
|
|
| XProfan X4, PRFellow, Profan2Cpp - Version 2.0c-pre5, Windows 11 | 05/25/12 ▲ |
|
|
|
|
funkheld | Jup, thanks. functions wonderful.
greeting |
|
|
| |
|
|