Вверх ↑
Ответов: 1304
Рейтинг: 405
#1: 2008-12-20 18:26:05 ЛС | профиль | цитата
Подскажите пожайлуста, в обновлённой версии New_Year_OpenGL, запихнул в схему мидюшку в TempFileStream, если собирать под делфи всё нормально, если под FPS ошибка.
Собрал вариант под FPS на MemoryStream, но схемка получается слегка усложнённая. вопрос можно ли заставить TempFileStream работать под FPS, или это только у меня ошибка.

Add(MainForm,2953706,21,56)
{
Width=253
Height=268
Position=1
}
Add(Button,14904893,77,56)
{
Left=10
Top=5
Width=100
Caption="TempFileStream"
link(onClick,7383528:doEvent1,[])
}
Add(TempFileStream,15953776,182,14)
{
Stream=[ZIP0400000078DABBF4F4E3270008CF039B]
Extention="txt"
}
Add(Memo,330443,175,56)
{
Left=10
Top=30
Width=220
link(FileName,15953776:TempFName,[])
}
Add(Hub,7383528,119,56)
{
link(onEvent1,15953776:doCreate,[(167,62)(167,20)])
link(onEvent2,330443:doLoad,[(163,69)(163,90)])
}
Add(FileStream,12751024,256,168)
{
Mode=2
AutoCopy=0
Point(doPosition)
Point(doCopyFromStream)
link(FileName,2122353:Value,[])
}
Add(MemoryStream,13578150,172,133)
{
Stream=[ZIP0400000078DABBF4F4E3270008CF039B]
Point(doPosition)
}
Add(DoData,14119307,172,175)
{
Data=Integer(0)
link(onEventData,12751024:doCopyFromStream,[(230,181)(230,195)])
link(Data,13578150:Stream,[])
}
Add(Hub,9241067,109,168)
{
OutCount=4
link(onEvent1,12751024:doOpen,[])
link(onEvent2,14119307:doData,[])
link(onEvent3,12751024:doClose,[(199,188)(199,181)])
link(onEvent4,15546860:doLoad,[(147,195)(147,321)])
}
Add(Memory,2122353,256,119)
{
Default=String(555.txt)
}
Add(Button,11625718,70,168)
{
Left=10
Top=115
Width=90
Caption="MemoryStream"
link(onClick,9241067:doEvent1,[])
}
Add(Memo,15546860,210,287)
{
Left=10
Top=145
Width=220
link(FileName,8122284:Value,[(223,279)(220,279)])
}
Add(Memory,8122284,214,238)
{
Default=String(555.txt)
}


карма: 3

0