Вверх ↑
Этот топик читают: Гость
Ответов: 2
Рейтинг: 0
#1: 2010-10-28 12:49:24 ЛС | профиль | цитата
Это моя проба пера. Первый проект. Не работает и все, кажется все элементарно, но...не работает.
Что я делаю не так? загрузить с файл с проектом не могу, поэтому публикую код.
code_21283.txt

Это должно открывать файл, писать в него и закрывать.
карма: 0

0
Ответов: 356
Рейтинг: 31
#2: 2010-10-28 13:05:29 ЛС | профиль | цитата
Среда HiAsm это сама программа HiAsm, и всё что нужно для её работы.
Создаваемые проекты относятся к различным пакетам, в данном случае Пакет Windows.

Ostroga писал(а):
Что я делаю не так?
Справка
карма: 0

0
Ответов: 416
Рейтинг: 57
#3: 2010-10-28 13:07:07 ЛС | профиль | цитата
Ostroga,

Add(MainForm,7179480,273,196)
{
}
Add(Label,16468967,273,147)
{
Left=35
Top=160
Width=245
Caption="Внесите данные для записи в файл"
}
Add(Edit,14761741,378,147)
{
Left=30
Top=185
Width=310
Height=30
Color=-16777201
Ctl3D=1
Text="Проверка"
}
Add(Button,6631041,329,203)
{
Left=230
Top=70
Height=40
Caption="Записать"
link(onClick,7746996:doConvert,[])
}
Add(FileStream,16606883,427,189)
{
FileName="C:\test.txt"
Mode=1
AutoCopy=0
Point(doCopyFromStream)
}
Add(Convertor,7746996,378,203)
{
Mode=12
link(onResult,16606883:doCopyFromStream,[])
link(Data,14761741:Text,[])
}




Add(MainForm,2953706,322,84)
{
Width=391
Height=148
}
Add(Hub,7734710,287,182)
{
OutCount=4
link(onEvent1,15109978:In,[])
link(onEvent2,2711550:In,[])
link(onEvent3,16131733:In,[])
link(onEvent4,15670861:In,[])
}
Add(FileStream,5843333,742,154)
{
FileName="D:\test.txt"
Mode=2
Point(doPosition)
Point(doCopyFromStream)
}
Add(DoData,5961953,749,203)
{
link(onEventData,5843333:doPosition,[(793,209)(793,191)(730,191)(730,174)])
link(Data,5843333:Size,[])
}
Add(Convertor,7988050,588,175)
{
Mode=12
link(onResult,5843333:doCopyFromStream,[])
link(Data,11908867:Text,[])
}
Add(LineBreak,1686866,637,154)
{
Caption="Open"
link(Out,5843333:doOpen,[])
Primary=[15109978,-322,28]
}
Add(LineBreak,10782422,686,161)
{
Caption="Close"
link(Out,5843333:doClose,[])
Primary=[15670861,-217,42]
}
Add(LineBreak,5296098,686,203)
{
Caption="Position"
link(Out,5961953:doData,[])
Primary=[2711550,-329,-14]
}
Add(LineBreak,797390,518,175)
{
Caption="Convert"
link(Out,7988050:doConvert,[])
Primary=[16131733,-105,21]
}
Add(Button,14622955,231,182)
{
Left=10
Top=15
Width=70
Caption="Добавить"
link(onClick,7734710:doEvent1,[])
}
Add(Edit,11908867,588,126)
{
Left=90
Top=15
Width=285
Text="Данные для добавления в файл"
}


карма: 0

0
Ответов: 2
Рейтинг: 0
#4: 2010-10-29 14:20:15 ЛС | профиль | цитата
olDjeka писал(а):
Справка

Право, не стоило утруждать себя написанием подобного поста.
Poputchik
ОГРОМНОЕ спасибо за примеры!
карма: 0

0
файлы: 1code_21283.txt [985B] [106]
4
Сообщение
...
Прикрепленные файлы
(файлы не залиты)