Вверх ↑
Ответов: 16884
Рейтинг: 1239
#1: 2017-05-01 08:02:04 ЛС | профиль | цитата
Схема

Add(MainForm,2953706,98,112)
{
Width=173
Height=116
BorderStyle=1
Position=1
}
Add(Edit,5473322,147,112)
{
Left=10
Top=10
TabOrder=1
Text=" 123"
ClearAfterEnter=1
link(onEnter,7260478:doConvert,[])
}
Add(Edit,5119407,231,119)
{
Left=85
Top=10
TabOrder=-1
Text=""
}
Add(Convertor,7260478,189,119)
{
Mode=10
link(onResult,5119407:doText,[])
}
Add(Edit,529902,147,168)
{
Left=10
Top=50
TabOrder=2
Text=" 123"
ClearAfterEnter=1
link(onEnter,391494:doConvert,[])
}
Add(Edit,1054332,231,175)
{
Left=85
Top=50
TabOrder=-1
Text=""
}
Add(ConvertorEx,391494,189,175)
{
Mode=10
link(onResult,1054332:doText,[])
}

Delphi4, FPC
Работает правильно при компиляции с Delphi7.
Delphi4 и FPC - бред какой-то.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Редактировалось 3 раз(а), последний 2017-05-01 10:11:31