Dilma писал(а):
ушло на почтуЧто-то, то ли я торможу, то ли не так чего...
Такая схема:
Add(MainForm,2953706,266,63)
{
Width=200
Height=210
}
Add(Charset,13925655,245,196)
{
link(onCharset,11041817:doText,[])
link(Text,16094336:Text,[])
}
Add(Edit,16094336,245,147)
{
Left=80
Top=25
Width=110
Text="Одако тест"
}
Add(Button,6413892,189,196)
{
Left=5
Top=25
Width=70
Height=40
Caption="ANSI_UTF8"
link(onClick,13925655:doCharset,[])
}
Add(Edit,11421339,294,301)
{
Left=80
Top=90
Width=110
Text=""
}
Add(Charset,14104033,245,301)
{
Type=1
link(onCharset,11421339:doText,[])
link(Text,264455:Text,[])
}
Add(Button,10457820,210,84)
{
Left=170
Width=20
Caption="x"
link(onClick,2953706:doClose,[])
}
Add(Edit,11041817,295,196)
{
Left=80
Top=45
Width=110
Text=""
}
Add(Button,16182451,185,301)
{
Left=5
Top=70
Width=70
Height=40
Caption="UTF8_ANSI"
link(onClick,14104033:doCharset,[])
}
Add(Edit,264455,245,253)
{
Left=80
Top=70
Width=110
Text="Одако тест"
}
Add(Edit,5274619,294,409)
{
Left=80
Top=135
Width=110
Text=""
}
Add(Button,10615630,185,409)
{
Left=5
Top=115
Width=70
Height=40
Caption="UNI_UTF8"
link(onClick,13769185:doCharset,[])
}
Add(Edit,10444289,245,361)
{
Left=80
Top=115
Width=110
Text="Одако тест"
}
Add(Charset,13769185,245,409)
{
Type=3
link(onCharset,5274619:doText,[])
link(Text,10444289:Text,[])
}
Add(Edit,10116407,296,514)
{
Left=80
Top=180
Width=110
Text=""
}
Add(Button,7501224,187,514)
{
Left=5
Top=160
Width=70
Height=40
Caption="UTF8_UNI"
link(onClick,6503940:doCharset,[])
}
Add(Edit,7726769,247,466)
{
Left=80
Top=160
Width=110
Text="Одако тест"
}
Add(Charset,6503940,247,514)
{
Type=2
link(onCharset,10116407:doText,[])
link(Text,7726769:Text,[])
}
У меня выдает следующее:
Наверное спать пора... завтра потестим еще)