HiAsm
HiAsm
Вверх ↑
ФорумыОшибки в компонентахFTCG замена ← Ctrl1Ctrl →
Этот топик читают: Гость
Ответов: 387
Рейтинг: 34
#1: 2009-07-25 17:12:54 ЛС | профиль | цитата
Удаление перевода строки в FTCG не работает. 


Add(MainForm,2953706,217,210)
{
 Position=1
}
Add(FTCG_Tools,11458095,308,105)
{
}
BEGIN_SDK
  Add(EditMultiEx,12566168,21,21)
  {
   WorkCount=#9:doReplace|
   EventCount=#9:onReplace|
   Width=503
   link(doReplace,16387258:doLoad,[(67,27)(67,118)])
  }
  Add(FT_Replace,14788980,175,112)
  {
   link(onReplace,11439410:doReplace,[])
   link(SrcStr,16387258:Str,[(181,100)(153,100)(153,156)(125,156)])
   link(SubStr,4451444:Value,[])
  }
  Add(FT_Memory,4451444,182,49)
  {
   Default=String(
)
   Extern=1
  }
  Add(FT_Message,5519270,308,112)
  {
   link(Message,11439410:Result,[(314,100)(282,100)(282,156)(244,156)])
  }
  Add(FT_StringToArray,16387258,112,112)
  {
   link(onLoad,14788980:doReplace,[])
  }
  Add(FT_Replace,11439410,238,112)
  {
   link(onReplace,5519270:doMessage,[])
   link(SrcStr,14788980:Result,[(244,100)(212,100)(212,156)(181,156)])
   link(SubStr,14254662:Value,[])
  }
  Add(FT_Memory,14254662,245,49)
  {
   Default=String(13)
   Extern=1
  }
END_SDK
Add(Memo,15639135,217,35)
{
 Left=105
 Top=20
 Width=265
 Height=160
 Strings=#8:GHKHgygy|8:HUHUIHUI|2:gh|
}
Add(Button,5680155,161,105)
{
 Left=15
 Top=20
 Caption="go"
 link(onClick,5109324:doData,[])
}
Add(DoData,5109324,217,105)
{
 link(onEventData,897591:doEvent1,[])
 link(Data,15639135:Text,[])
}
Add(Replace,11457966,301,210)
{
 link(onReplace,6824814:doReplace,[])
 link(Sub_str,14576529:Value,[])
}
Add(Memory,14576529,308,154)
{
 Default=String(
)
}
Add(Message,1439958,441,210)
{
}
Add(Replace,6824814,371,210)
{
 link(onReplace,1439958:doMessage,[])
 link(Sub_str,10427865:Value,[])
}
Add(Memory,10427865,378,154)
{
 Default=String(13)
}
Add(Hub,897591,266,105)
{
 link(onEvent1,11458095:doReplace,[])
 link(onEvent2,11457966:doReplace,[(290,118)(290,216)])
}

ПЕРЕЗАЛИЛ
карма: 0

0
Администрация
Ответов: 15295
Рейтинг: 1519
#2: 2009-07-25 19:04:38 ЛС | профиль | цитата
удаление-то работает прекрасно, а вот замены спец символов такой нет
code_14264.txt

карма: 27
https://hiasm.com
0
файлы: 1code_14264.txt [641B] [212]
Ответов: 1304
Рейтинг: 405
#3: 2009-07-25 19:07:53 ЛС | профиль | цитата
Karl, ссылка битая, попробуй перезалить.
карма: 3

0
Ответов: 387
Рейтинг: 34
#4: 2009-07-25 19:19:17 ЛС | профиль | цитата
Dilma писал(а):
удаление-то работает прекрасно, а вот замены спец символов такой нет

спасибо
но как быть? (как найти зти символы)
может имеет смысл добавить для стандартизации?
карма: 0

0
файлы: 1code_14263.txt [1.6KB] [146]
Администрация
Ответов: 15295
Рейтинг: 1519
#5: 2009-07-26 13:03:35 ЛС | профиль | цитата
для этого в пакете нужно вставлять парсинг строк, принимаемых от среды и заменять там спец символы на их реальные коды.
карма: 27
https://hiasm.com
0
Ответов: 1304
Рейтинг: 405
#6: 2009-07-26 15:42:21 ЛС | профиль | цитата
Karl, спецсимволы доставили мне немало мороки при обработке текста в FTCG, решение было простое заменить спец символы на определённые разделители в классической схеме, а уж потом обрабатывать текст в FTCG. В твоём случае избавиться от спецсимволов в рамках схемы FTCG, можно наверное только используя словарь для сравнения. Набросок схемы с использованием словаря(без обнулений). 


Add(MainForm,5114806,105,224)
{
 Position=1
}
Add(FTCG_Tools,11458095,196,119)
{
}
BEGIN_SDK
Pos(1,0)
  Add(EditMultiEx,12566168,20,21)
  {
   WorkCount=#9:doReplace|
   EventCount=#9:onReplace|
   Width=377
   Height=326
   link(doReplace,12826260:doEvent1,[(34,27)(34,48)])
  }
  Add(FT_Message,5519270,335,287)
  {
   Caption="FTCG"
  }
  Add(FT_StringToArray,16387258,76,42)
  {
   link(onLoad,10886214:doLength,[])
  }
  Add(ArrayRead,9657637,174,105)
  {
   link(onRead,13003378:doFor,[])
   link(Array,16387258:Array,[(180,86)(82,86)])
  }
  Add(FT_Length,10886214,118,42)
  {
   link(SrcStr,16387258:Str,[(124,35)(112,35)(112,81)(89,81)])
  }
  Add(FT_For,16503481,118,105)
  {
   End=100
   link(onEvent,9657637:doRead,[])
   link(onStop,5522465:doData,[(157,118)(157,293)])
   link(End,10886214:Result,[])
  }
  Add(FT_Hub,12826260,48,42)
  {
   link(onEvent1,16387258:doLoad,[])
   link(onEvent2,16503481:doFor,[(67,55)(67,111)])
  }
  Add(FT_If_else,5466570,216,182)
  {
   link(onTrue,3905011:doEvent1,[])
   link(Op1,10664833:Var3,[(222,163)])
   link(Op2,8821186:Item,[(229,164)(299,164)])
  }
  Add(StrArray,11020621,293,42)
  {
   Strings=#1:а|1:б|1:в|1:г|1:д|
   ItemType=1
  }
  Add(ArrayRead,8821186,293,105)
  {
   link(Array,7624883:Var2,[])
  }
  Add(FT_For,13003378,216,105)
  {
   link(onEvent,7200010:doEvent1,[])
   link(End,1680469:Size,[])
  }
  Add(FT_Hub,7200010,258,105)
  {
   link(onEvent1,8821186:doRead,[])
   link(onEvent2,15435186:doData,[(290,118)(290,158)(166,158)(166,188)])
  }
  Add(FT_DoData,15435186,174,182)
  {
   link(onEventData,5466570:doCompare,[])
   link(Data,10664833:Var2,[])
  }
  Add(GetDataEx,10664833,167,154)
  {
   link(Data,9657637:Item,[])
  }
  Add(FT_StrCat,9530653,293,231)
  {
   link(Str1,3360646:Value,[])
  }
  Add(FT_Memory,3360646,293,182)
  {
   link(Data,1744141:Var1,[(299,170)(287,170)])
  }
  Add(FT_Hub,3905011,258,182)
  {
   link(onEvent1,3360646:doValue,[])
   link(onEvent2,9530653:doStrCat,[(282,195)(282,237)])
  }
  Add(FT_DoData,5522465,286,287)
  {
   link(onEventData,5519270:doMessage,[])
   link(Data,1744141:Var2,[])
  }
  Add(GetDataEx,1744141,279,266)
  {
   Angle=1
   link(Data,9530653:Result,[(299,275)])
  }
  Add(ArraySize,1680469,216,42)
  {
   link(Array,7624883:Var1,[(222,33)(289,33)(289,86)])
  }
  Add(GetDataEx,7624883,286,77)
  {
   link(Data,11020621:Array,[])
  }
END_SDK
Add(Memo,15639135,105,49)
{
 Left=105
 Top=20
 Width=265
 Height=160
 Strings=#2:аб|2:вг|1:д|
}
Add(Button,5680155,49,119)
{
 Left=15
 Top=20
 Caption="go"
 link(onClick,5109324:doData,[])
}
Add(DoData,5109324,105,119)
{
 link(onEventData,897591:doEvent1,[])
 link(Data,15639135:Text,[])
}
Add(Replace,11457966,189,224)
{
 link(onReplace,6824814:doReplace,[])
 link(Sub_str,14576529:Value,[])
}
Add(Memory,14576529,196,168)
{
 Default=String(
)
}
Add(Message,1439958,329,224)
{
}
Add(Replace,6824814,259,224)
{
 link(onReplace,1439958:doMessage,[])
 link(Sub_str,10427865:Value,[])
}
Add(Memory,10427865,266,168)
{
 Default=String(13)
}
Add(Hub,897591,154,119)
{
 link(onEvent1,11458095:doReplace,[])
 link(onEvent2,11457966:doReplace,[(178,132)(178,230)])
}
карма: 3

1
Голосовали:Karl
Ответов: 387
Рейтинг: 34
#7: 2009-07-26 19:07:40 ЛС | профиль | цитата
MAV, спасибо)
пришел к аналогичным результатам
code_14272.txt

для кириллицы нужно добавить еще два условия...
карма: 0

1
файлы: 1code_14272.txt [2.3KB] [146]
Голосовали:MAV
Ответов: 1304
Рейтинг: 405
#8: 2009-07-26 21:36:46 ЛС | профиль | цитата
Karl, чего-то я усложнил с применением словаря, в твоём примере всё гораздо проще. +
Немного дополнил пример. 


Add(MainForm,5114806,112,196)
{
 Position=1
}
Add(FTCG_Tools,11458095,203,91)
{
}
BEGIN_SDK
Pos(39,0)
  Add(EditMultiEx,12566168,-32,21)
  {
   WorkCount=#9:doReplace|
   Width=503
   Height=242
   VOffset=21
   link(doReplace,12826260:doEvent1,[])
  }
  Add(FT_Message,5519270,129,175)
  {
   Caption="FTCG"
   link(Message,9530653:Result,[(135,156)(373,156)])
  }
  Add(FT_StringToArray,16387258,17,42)
  {
   link(onLoad,10886214:doLength,[])
  }
  Add(ArrayRead,9657637,129,105)
  {
   link(onRead,3825090:doCompare,[])
   link(Array,16387258:Array,[(135,89)(23,89)])
  }
  Add(FT_Length,10886214,73,42)
  {
   link(SrcStr,16387258:Str,[(79,35)(62,35)(62,83)(30,83)])
  }
  Add(FT_For,16503481,73,105)
  {
   End=100
   link(onEvent,9657637:doRead,[])
   link(onStop,5519270:doMessage,[(117,118)(117,181)])
   link(End,10886214:Result,[])
  }
  Add(FT_Hub,12826260,-18,42)
  {
   link(onEvent1,16387258:doLoad,[])
   link(onEvent2,16503481:doFor,[(8,55)(8,111)])
  }
  Add(FT_StrCat,9530653,367,105)
  {
   link(onStrCat,3360646:doValue,[(409,111)(409,96)(355,96)(355,62)])
   link(Str1,3360646:Value,[])
  }
  Add(FT_Memory,3360646,367,56)
  {
  }
  Add(FT_If_else,3825090,185,105)
  {
   Type=4
   Op2=String( )
   link(onTrue,10995010:doWork2,[])
   link(onFalse,1281907:doCompare,[(225,118)(225,125)])
   link(Op1,9657637:Item,[(191,93)(173,93)(173,149)(135,149)])
  }
  Add(FT_If_else,1281907,234,119)
  {
   link(onTrue,2399257:doWork,[(278,125)(278,78)(111,78)(111,62)])
   link(onFalse,10995010:doWork3,[(350,132)])
  }
  Add(HubEx,10995010,346,98)
  {
   link(onEvent,9530653:doStrCat,[])
  }
  Add(FT_DoData,13227317,290,98)
  {
   Data=String( )
   link(onEventData,10995010:doWork1,[(350,104)])
  }
  Add(Check,2399257,136,56)
  {
   Check=1
   Caption="Пробел заместо символа переноса"
   link(onEvent,13227317:doData,[(350,62)(350,80)(284,80)(284,104)])
  }
END_SDK
Add(Memo,15639135,112,21)
{
 Left=105
 Top=20
 Width=265
 Height=160
 Strings=#9:GHG HDSK+|12:kjdjk K LDS/|5:OP ыы|10:фф Ё!!#$"@|
}
Add(Button,5680155,56,91)
{
 Left=15
 Top=20
 Caption="go"
 link(onClick,5109324:doData,[])
}
Add(DoData,5109324,112,91)
{
 link(onEventData,897591:doEvent1,[])
 link(Data,15639135:Text,[])
}
Add(Replace,11457966,196,196)
{
 link(onReplace,6824814:doReplace,[])
 link(Sub_str,14576529:Value,[])
}
Add(Memory,14576529,203,140)
{
 Default=String(
)
}
Add(Message,1439958,336,196)
{
}
Add(Replace,6824814,266,196)
{
 link(onReplace,1439958:doMessage,[])
 link(Sub_str,10427865:Value,[])
}
Add(Memory,10427865,273,140)
{
 Default=String(13)
}
Add(Hub,897591,161,91)
{
 link(onEvent1,11458095:doReplace,[])
 link(onEvent2,11457966:doReplace,[(185,104)(185,202)])
}
карма: 3

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