Вверх ↑
Этот топик читают: Гость
Ответов: 278
Рейтинг: 6
#1: 2010-09-12 11:42:47 ЛС | профиль | цитата
Как правильно и без большого числа компонентов поменять данные между двумя компонентами "Memory"
карма: 0

0
Ответов: 397
Рейтинг: 34
#2: 2010-09-12 11:47:55 ЛС | профиль | цитата
Если я правильно понял (для наглядности использовал Edit):
Add(Button,9426172,266,308){
Left=20
Top=10
link(onClick,7749055:doString,[])
}
Add(FormatStr,7749055,308,308)
{
Mask="%1;%2"
link(onFString,9591103:doSplit,[])
link(Str1,8552922:Text,[(314,289)(300,289)])
link(Str2,5494918:Text,[(321,289)(349,289)])
}
Add(MultiStrData,9591103,350,308)
{
link(onPart1,5494918:doText,[(415,314)(415,231)(331,231)(331,244)])
link(onPart2,8552922:doText,[(428,321)(428,220)(282,220)(282,244)])
}
Add(Edit,8552922,294,238)
{
Left=125
Top=10
Text="1"
}
Add(Edit,5494918,343,238)
{
Left=195
Top=10
Text="2"
}
карма: 0

1
Голосовали:igr
Ответов: 3349
Рейтинг: 233
#3: 2010-09-12 11:55:37 ЛС | профиль | цитата
code_20561.txt
------------ Дoбавленo в 11.55:
Black-Light, А если stream поток? Или картинка?
карма: 1

1
файлы: 1code_20561.txt [564B] [159]
Голосовали:igr
Ответов: 397
Рейтинг: 34
#4: 2010-09-12 12:00:27 ЛС | профиль | цитата
Ivann,
[offtop]ну в задаче это не указано [/offtop]
карма: 0

0
Ответов: 3349
Рейтинг: 233
#5: 2010-09-12 12:07:39 ЛС | профиль | цитата
igr писал(а):
поменять данные между двумя компонентами "Memory"

А в Memory может храниться все что угодно.
карма: 1

0
Ответов: 1376
Рейтинг: 198
#6: 2010-09-12 12:22:24 ЛС | профиль | цитата
Вот ещё чуток короче
code_20563.txt
карма: 1

0
файлы: 1code_20563.txt [661B] [204]
Ответов: 3349
Рейтинг: 233
#7: 2010-09-12 12:35:03 ЛС | профиль | цитата
foksov, Короче?
карма: 1

0
Ответов: 1376
Рейтинг: 198
#8: 2010-09-12 12:41:50 ЛС | профиль | цитата
Элементов меньше
------------ Дoбавленo в 12.41:
Задача стояла
igr писал(а):
Как правильно и без большого числа компонентов поменять данные между двумя компонентами "Memory"

------------ Дoбавленo в 12.41:

Add(Button,8355821,301,154)
{
Left=65
Top=35
link(onClick,8636015:doEvent1,[])
}
Add(Hub,8636015,420,154)
{
OutCount=3
link(onEvent1,6932733:doValue,[])
link(onEvent2,471167:doValue,[(444,167)(444,111)])
link(onEvent3,8017784:doValue,[(443,174)(443,201)(366,201)(366,111)])
}
Add(Memory,6932733,455,154)
{
Default=Integer(0)
Point(Data)
link(Data,471167:Value,[])
}
Add(Memory,8017784,378,105)
{
Default=Integer(1)
Point(Data)
link(Data,6932733:Value,[(384,86)(502,86)(502,199)(461,199)])
}
Add(Memory,471167,455,105)
{
Default=Integer(2)
Point(Data)
link(Data,8017784:Value,[(461,93)(423,93)(423,149)(384,149)])
}


карма: 1

0
Ответов: 4641
Рейтинг: 334
#9: 2010-09-12 22:35:49 ЛС | профиль | цитата
igr писал(а):
поменять данные между двумя компонентами "Memory"

ГДЕ СХЕМА В ВИДЕ ВОПРОСА.?? Почему все должны догадываться??

Black-Light, Ivann, foksov, не надо плодит тысячу схем пока не будет ясна точная суть проблемы!
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26324
Рейтинг: 2147
#10: 2010-09-12 22:40:58 ЛС | профиль | цитата
Ravilr писал(а):
Почему все должны догадываться??

А что тут догадыватьс-то. Вопрос конкретный, вот только схемы нет, это да
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#11: 2010-09-12 23:28:53 ЛС | профиль | цитата
nesco писал(а):
Вопрос конкретный,
только неизвестно - ему нужны точки Value или onData? Может там Memory вообще трогать не надо.
------------ Дoбавленo в 23.28:
nesco, [flood]будь другом, убери из
var
I:integer;

#pas
G:\HiAsm184\Elements\delphi\code\hiStr_Enum.pas(92) Hint: Variable 'I' is declared but never used in 'RParse'
G:\HiAsm184\Elements\delphi\code\hiStr_Enum.pas(114) Hint: Variable 'I' is declared but never used in 'FParse'
Не люблю я лишних сообщений. [/flood]
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26324
Рейтинг: 2147
#12: 2010-09-12 23:48:44 ЛС | профиль | цитата
Tad писал(а):
Не люблю я лишних сообщений

Обновись.
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#13: 2010-09-12 23:58:22 ЛС | профиль | цитата
Спасибо!
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
13
Сообщение
...
Прикрепленные файлы
(файлы не залиты)