HiAsm
HiAsm
Вверх ↑
ФорумыПомощь по пакетуПрошу помощи разбирающихся ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 38
Рейтинг: 8
#1: 2010-07-13 18:13:51 ЛС | профиль | цитата
Имеется схема:

code_19403.txt

Не могу в ней соединить основную схему с конечным полем ввода так, чтобы при условии совпадения IF в конечное поле ввода загружался текстовый документ 1.txt, лежащий рядом с программой, а при несовпадении 2.txt, тоже там же лежащий.
Помогите, пожалуйста

Со списками строк намаялся, не могу понять как это организовать...

З.ы. в текстовых документах по несколько строк имеется, надо чтоб все в поле ввода конечное разом залезли.
карма: 1

0
файлы: 1code_19403.txt [935B] [108]
Ответов: 51
Рейтинг: 0
#2: 2010-07-13 18:45:11 ЛС | профиль | цитата
Сори,не могу разобратся,что должна делать программа?
------------ Дoбавленo в 18.42:
Сори,не могу разобратся,что должна делать программа?
------------ Дoбавленo в 18.45:
Могу чтото путать но сейчас IF исполняется всегда...
карма: 0

0
Ответов: 38
Рейтинг: 8
#3: 2010-07-13 18:49:22 ЛС | профиль | цитата
По схеме:

При вводе в левое поле ввода цыфр 123, они попадают в листбокс, затем в поле ввода, после которого они сравниваются, если значение 123 совпадает с IF, то прога открывает во что-то (не могу понять во что) тектовый документ 1.тхт и затем забивает его в конечное поле ввода, если в IF не совпало, то открывает 2.тхт и так же его забивает в конечное поле ввода.

и да, IF забыл настроить
карма: 1

0
Ответов: 51
Рейтинг: 0
#4: 2010-07-13 18:57:38 ЛС | профиль | цитата
code_19408.txt
------------ Дoбавленo в 18.57:
точнее так 

Add(Edit,14422557,91,189)
{
 Left=30
 Top=30
 Width=115
 Text=""
}
Add(ListBox,9883173,189,224)
{
 Left=26
 Top=61
 Width=120
 Height=160
 DataType=1
 SelectAdd=0
 Point(String)
 link(onChange,8375889:doData,[(243,230)(243,293)])
}
Add(If_else,10927599,385,287)
{
 Op1=String()
 Op2=String(123)
 link(onTrue,5465266:doData,[(443,293)(443,265)])
 link(onFalse,10358269:doData,[(443,300)(443,335)])
 link(Op1,12177141:Text,[(391,275)(349,275)(349,387)(307,387)])
 link(Op2,11591780:Var,[(398,249)(391,249)])
}
Add(InfoTip,10186285,14,133)
{
 Info=#14:Основная схема|
 Width=365
 Height=284
}
Add(Button,9555490,70,252)
{
 Left=160
 Top=30
 link(onClick,16595537:doData,[])
}
Add(DoData,16595537,112,252)
{
 link(onEventData,9883173:doAdd,[(166,258)(166,230)])
 link(Data,14422557:Text,[(118,236)(97,236)])
}
Add(DoData,8375889,252,287)
{
 link(onEventData,12177141:doText,[(292,293)(292,349)])
 link(Data,9883173:String,[(258,278)(216,278)])
}
Add(Memo,2250164,616,280)
{
 Left=390
 Top=280
}
Add(Hub,1712225,588,280)
{
 InCount=2
 OutCount=1
 link(onEvent1,2250164:doLoad,[(605,286)(605,314)])
}
Add(DoData,5465266,483,259)
{
 link(onEventData,1712225:doEvent1,[(551,265)(551,286)])
}
Add(DoData,10358269,483,329)
{
 link(onEventData,1712225:doEvent2,[(551,335)(551,293)])
}
Add(Edit,12177141,301,343)
{
 Left=290
 Top=305
 link(onChange,10927599:doCompare,[(359,349)(359,293)])
}
Add(GlobalVar,11591780,385,196)
{
 Name="IF"
}
карма: 0

0
файлы: 1code_19408.txt [1.3KB] [107]
Ответов: 3349
Рейтинг: 233
#5: 2010-07-13 18:58:03 ЛС | профиль | цитата
andryyo, error, просьба перезалить.
карма: 1

0
Ответов: 51
Рейтинг: 0
#6: 2010-07-13 19:03:02 ЛС | профиль | цитата
Кстати от чего зависит появление code XXXXX.txt или спойлера?
------------ Дoбавленo в 19.03: 
Add(Edit,14422557,91,189)
{
 Left=30
 Top=30
 Width=115
 Text=""
}
Add(ListBox,9883173,189,224)
{
 Left=26
 Top=61
 Width=120
 Height=160
 DataType=1
 SelectAdd=0
 Point(String)
 link(onChange,8375889:doData,[(243,230)(243,293)])
}
Add(If_else,10927599,385,287)
{
 Op1=String()
 Op2=String(123)
 link(onTrue,5465266:doData,[(443,293)(443,265)])
 link(onFalse,10358269:doData,[(443,300)(443,335)])
 link(Op1,12177141:Text,[(391,275)(349,275)(349,387)(307,387)])
 link(Op2,11591780:Var,[(398,249)(391,249)])
}
Add(InfoTip,10186285,14,133)
{
 Info=#14:Основная схема|
 Width=365
 Height=284
}
Add(Button,9555490,70,252)
{
 Left=160
 Top=30
 link(onClick,16595537:doData,[])
}
Add(DoData,16595537,112,252)
{
 link(onEventData,9883173:doAdd,[(166,258)(166,230)])
 link(Data,14422557:Text,[(118,236)(97,236)])
}
Add(DoData,8375889,252,287)
{
 link(onEventData,12177141:doText,[(292,293)(292,349)])
 link(Data,9883173:String,[(258,278)(216,278)])
}
Add(Memo,2250164,616,280)
{
 Left=260
 Top=25
 Width=380
 Height=235
}
Add(Hub,1712225,588,280)
{
 InCount=2
 OutCount=1
 link(onEvent1,2250164:doLoad,[(605,286)(605,314)])
}
Add(DoData,5465266,483,259)
{
 link(onEventData,1712225:doEvent1,[(551,265)(551,286)])
}
Add(DoData,10358269,483,329)
{
 link(onEventData,1712225:doEvent2,[(551,335)(551,293)])
}
Add(Edit,12177141,301,343)
{
 Left=25
 Top=255
 Width=110
 link(onChange,10927599:doCompare,[(359,349)(359,293)])
}
Add(GlobalVar,11591780,385,196)
{
 Name="IF"
}
карма: 0

0
Ответов: 38
Рейтинг: 8
#7: 2010-07-13 19:08:20 ЛС | профиль | цитата
Вобщем суть еще раз попробую обьяснить:

Имеется поле ввода, куда будут приходить цыферки.
Мы ждём цифру 123.
Попала в поле ввода цифра 122, попала в листбокс, оттуда в промежуточное поле ввода, из которого в IF, где IF понял, что не выполнилось условие и засунул в конечное поле ввода многострочный текст из файла 222.тхт (222 на любое можно сменить)
Попала в поле ввода цифра 123, попала в листбокс, оттуда в промежуточное поле ввода, из которого в IF, где IF понял, что выполнилось условие и засунул в конечное поле ввода многострочный текст из файла 111.тхт (111 на любое можно сменить)
ТОесть в поле ввода будут попадать абсолютно любые цыфры и в конечное поле будет соваться 222.тхт, а как попадётся 123, то уже в конечное поле ввода засунется 111.тхт

файлы 111.тхт и 222.тхт должны лежать рядом с программой.
карма: 1

0
Ответов: 51
Рейтинг: 0
#8: 2010-07-13 19:14:07 ЛС | профиль | цитата
code_19410.txt
------------ Дoбавленo в 19.13:
Добавил коменты)
------------ Дoбавленo в 19.14:
Поравьте если неправ,при указании просто имени файли оно будет искать его в папке с прогой
карма: 0

0
файлы: 1code_19410.txt [2KB] [106]
Ответов: 38
Рейтинг: 8
#9: 2010-07-13 19:20:04 ЛС | профиль | цитата
Это всё верно, но последнее Memo надо соединить с Edit, который у Вас на схеме куда-то делся 

Add(Edit,14422557,98,266)
{
 Left=30
 Top=30
 Width=115
 Text=""
}
Add(ListBox,9883173,196,301)
{
 Left=26
 Top=61
 Width=120
 Height=160
 DataType=1
 SelectAdd=0
 Point(String)
 link(onChange,8375889:doData,[(250,307)(250,370)])
}
Add(If_else,10927599,392,364)
{
 Op1=String()
 Op2=String(123)
 link(onTrue,5465266:doData,[(450,370)(450,342)])
 link(onFalse,10358269:doData,[(450,377)(450,412)])
 link(Op1,12177141:Text,[(398,352)(356,352)(356,464)(314,464)])
 link(Op2,11591780:Var,[(405,326)(398,326)])
}
Add(InfoTip,10186285,21,210)
{
 Info=#14:Основная схема|
 Width=365
 Height=284
}
Add(InfoTip,15780859,609,336)
{
 Info=#24:Конечный редактор текста|0:|
 Width=127
 Height=88
}
Add(Button,9555490,77,329)
{
 Left=160
 Top=30
 link(onClick,16595537:doData,[])
}
Add(DoData,16595537,119,329)
{
 link(onEventData,9883173:doAdd,[(173,335)(173,307)])
 link(Data,14422557:Text,[(125,313)(104,313)])
}
Add(DoData,8375889,259,364)
{
 link(onEventData,12177141:doText,[(299,370)(299,426)])
 link(Data,9883173:String,[(265,355)(223,355)])
}
Add(Memo,2250164,623,357)
{
 Left=260
 Top=25
 Width=380
 Height=235
}
Add(Hub,1712225,595,357)
{
 InCount=2
 OutCount=1
 link(onEvent1,2250164:doLoad,[(612,363)(612,391)])
}
Add(DoData,5465266,490,336)
{
 Data=String(111.txt)
 link(onEventData,1712225:doEvent1,[(558,342)(558,363)])
}
Add(DoData,10358269,490,406)
{
 Data=String(222.txt)
 link(onEventData,1712225:doEvent2,[(558,412)(558,370)])
}
Add(Edit,12177141,308,420)
{
 Left=25
 Top=255
 Width=110
 link(onChange,10927599:doCompare,[(366,426)(366,370)])
}
Add(GlobalVar,11591780,392,273)
{
 Name="IF"
 Data=String(123)
}
Add(PointHint,3433356,399,455)
{
 Info=#51:тут вводиш путь к файлу если условие не выполняется|
 Width=288
}
Add(PointHint,10475304,371,301)
{
 Info=#33:Тут путь если условие выполняется|
 Width=316
}
Add(PointHint,8162080,266,231)
{
 Info=#52:тут в свойствах переменной пишеш то,с чем сравниваеш|
 Width=309
}
Add(Edit,12278711,833,385)
{
 Left=30
 Top=30
 Width=115
 Text=""
}
Add(InfoTip,1124872,791,350)
{
 Info=#28:Конечный конечное поле ввода|0:|
 Width=127
 Height=88
}

Чтоб вбивалось содержимое из Memo в Edit...
карма: 1

0
Ответов: 51
Рейтинг: 0
#10: 2010-07-13 19:24:23 ЛС | профиль | цитата
Ну если текст то его нелогично в едит совать....

Мможно так

code_19413.txt
карма: 0

0
файлы: 1code_19413.txt [2KB] [148]
Ответов: 38
Рейтинг: 8
#11: 2010-07-13 19:33:56 ЛС | профиль | цитата
Никак они не грузятся в последний Edit...
code_19415.txt
Попробуй скомпилить и два текстовых сделать в корне проги. 1.txt и 2.txt с несколькими строчками внутри.
Никак не хочет текст в последний эдит лезть из тектовых этих файлов...
карма: 1

0
файлы: 1code_19415.txt [2.2KB] [129]
Ответов: 51
Рейтинг: 0
#12: 2010-07-13 19:39:19 ЛС | профиль | цитата
code_19416.txt
------------ Дoбавленo в 19.39:
У меня такое заработало
карма: 0

0
файлы: 1code_19416.txt [2.2KB] [100]
Ответов: 38
Рейтинг: 8
#13: 2010-07-13 19:42:15 ЛС | профиль | цитата
Всё, заработало!
Спасибо огромное!

Весь вечер мучаюсь с этим...
карма: 1

0
13
ФорумыПомощь по пакетуПрошу помощи разбирающихся ← Ctrl1Ctrl →
Сообщение
...
Прикрепленные файлы
(файлы не залиты)
HiAsm Studio 2003 - 2025
Пользовательское соглашение | support@hiasm.com
Яндекс.Метрика