Вверх ↑
Ответов: 5446
Рейтинг: 323
#1: 2012-01-16 21:36:57 ЛС | профиль | цитата
Poproshaika, в самом начале работы один раз вызываешь initscr, полученный указатель (целое число по сути) дальше используешь.
С GPF - нужно использовать компилятор FPC
------------ Дoбавленo в 21.36:
P.S. Схема:
Add(CallDllEx,2633612,385,245)
{
DLLName=".\gpcomms.dll"
Point(onProc)
Point(onLog)
link(onFunc,15989795:doMessage,[])
link(onLog,1226891:doMessage,[(450,265)(450,307)])
}
Add(Button,10104658,14,140)
{
Left=200
Top=115
Data=String(Hello)
link(onClick,15901611:doEvent1,[])
}
Add(FormatStr,14081912,315,245)
{
DataCount=1
Mask="GPSL_SetTextLineData;BWWIIbBbB;b;0;10;10;%1;4278190335;0;20;0;1"
link(onFString,2633612:doCallFuncStr,[])
link(Str1,8328997:Memory,[])
}
Add(MemoryStream,8328997,301,140)
{
Point(Memory)
}
Add(Hub,15901611,126,140)
{
link(onEvent1,6355597:doConvert,[])
link(onEvent2,14081912:doString,[(166,153)(166,251)])
}
Add(StreamConvertor,6355597,196,140)
{
Mode=7
link(onResult,8328997:doCopy,[])
}
Add(Message,15989795,483,245)
{
Caption="Result"
}
Add(Message,1226891,483,301)
{
Caption="Error"
}
карма: 1

0