Вверх ↑
Разработчик
Ответов: 26163
Рейтинг: 2127
#1: 2007-08-09 23:13:51 ЛС | профиль | цитата
Galkov,
а действительно потерялось второе значение. Вот этот кусок из обучалки
Add(MainForm,9800947,385,196)
{
Left=20
Top=105
}
Add(DoData,15890442,581,315)
{
link(onEventData,9687686:doGet,[])
link(Data,1379067:Value,[])
}
Add(MT_Add,9256836,532,259)
{
Data=String(Title)
link(onAdd,1379067:doValue,[])
}
Add(Message,5809713,686,364)
{
Caption="Element 1"
}
Add(MT_Get,9687686,630,315)
{
link(onData,13391606:doGet,[])
link(onGet,5809713:doMessage,[(674,328)(674,370)])
}
Add(MT_Get,13391606,686,315)
{
link(onGet,5717753:doMessage,[(733,328)(733,370)])
}
Add(Message,5717753,749,364)
{
Caption="Element 2"
}
Add(Button,1093677,385,259)
{
Left=30
Top=85
Caption="Example3"
link(onClick,10302722:doEvent1,[])
}
Add(MT_Add,1377252,483,259)
{
Data=String(Hello world)
link(onAdd,9256836:doAdd,[])
}
Add(MT_Memory,1379067,581,259)
{
}
Add(Hub,10302722,434,259)
{
link(onEvent1,1377252:doAdd,[])
link(onEvent2,15890442:doData,[(523,272)(523,321)])
}

[size=-2]------ Добавлено в 23:13
Galkov, а вот это у тебя нормально компилит? code_1799.txt У меня выдает вот это
Build start...
Generated code
Create project...
Command line: dcc32.exe "W:\Elements\delphi\code\Project2.dpr" "-UW:\Elements\delphi\code\." -Q "-EW:\
Borland Delphi Version 12.0 Copyright (c) 1983,98 Inprise Corporation

W:\Elements\delphi\code\Project2.dpr(139) Error: Undeclared identifier: '_data_Data'
Compress code
End build

карма: 22

0
файлы: 1code_1799.txt [965B] [315]