Вверх ↑
Этот топик читают: Гость
Ответов: 294
Рейтинг: 64
#16: 2009-11-29 15:15:27 ЛС | профиль | цитата
Немного не по теме, но дабы новую не создавать.

Вопрос в следующем (баг это или я чего-то недопонимаю, или обновиться надо):
HiAsm 4.03 b181, WinXP-SP3.
Необходимо в RichEdit (или HiligthMemo) заключать выделенный текст в определенные тэги, но столкнулся со следующем:
1. При обработке в FormatStr строки взятой с точки SelText в RichEdit - подставляет знак процента "%" в конце строки (можно конечно удалять, но в исходном тексте знаки процента могут быть нужны).
2. В HiligthMemo этой проблемы нет, но есть другая - при компиляции (Delphi) с подведенной связью к точке doReplaceSelect (в ини кстати doRepalace) - отладчик выдает: "Elements\delphi\code\hiMainForm_16211B0.pas(315) Error: Undeclared identifier: '_work_doRepalaceSelect'"

Пример (выделить фрагмент текста в обоих полях и нажать Push):

Add(MainForm,2953706,63,77)
{
Width=207
Height=180
}
Add(RichEdit,1275108,161,98)
{
Top=5
Width=95
Height=100
Strings=#11:ggg hhh jjj|
Point(SelText)
Point(doSetSelect)
}
Add(Edit,10589475,259,294)
{
Left=100
Top=105
Width=95
}
Add(Button,6959507,63,161)
{
Top=125
Width=195
link(onClick,2997181:doEvent1,[])
}
Add(FormatStr,5644284,182,161)
{
DataCount=1
Mask="vvv%1vvv"
link(onFString,16151585:doEvent1,[])
link(Str1,1275108:SelText,[])
}
Add(HilightMemo,487084,161,217)
{
Left=100
Top=5
Width=95
Height=100
Font=[Courier New,8,0,0,1]
Strings=#11:ggg hhh jjj|
HilightFont=[Courier New,8,0,0,1]
Point(SelText)
Point(doRepalaceSelect)
}
Add(Edit,7486348,259,168)
{
Top=105
Width=95
}
Add(FormatStr,11885873,182,287)
{
DataCount=1
Mask="vvv%1vvv"
link(onFString,8191049:doEvent1,[])
link(Str1,487084:SelText,[])
}
Add(Hub,2997181,112,161)
{
link(onEvent1,5644284:doString,[])
link(onEvent2,11885873:doString,[(136,174)(136,293)])
}
Add(Hub,16151585,224,161)
{
link(onEvent1,1275108:doSetSelect,[(250,167)(250,75)(149,75)(149,139)])
link(onEvent2,7486348:doText,[])
}
Add(Hub,8191049,224,287)
{
link(onEvent1,7119812:doWork2,[(255,293)(255,206)(145,206)(145,265)])
link(onEvent2,10589475:doText,[])
}
Add(HubEx,7119812,147,259)
{
}



Если это действительно ошибка, а не проблема в моем железе/софте/руках - можно будет и в Баг трекер тогда...
карма: 0

0
Ответов: 4641
Рейтинг: 334
#17: 2009-11-29 16:11:40 ЛС | профиль | цитата
Quest писал(а):
Немного не по теме

совсем не по теме.
выход через Ж...
code_15844.txt

карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
файлы: 1code_15844.txt [1.4KB] [137]
Ответов: 294
Рейтинг: 64
#18: 2009-11-29 17:08:58 ЛС | профиль | цитата
Ravilr писал(а):
совсем не по теме

Согласен, каюсь, но поместил только для подтверждения/опровержения бага... думаю не критично.

Ravilr писал(а):
выход через Ж...

Там еще есть способы через другие органы... )))
Например так:

Add(MainForm,13246011,413,217)
{
Width=160
Height=190
}
Add(RichEdit,1275108,490,154)
{
Top=5
Width=95
Height=100
Strings=#11:ggg hhh jjj|
Point(SelText)
Point(doSetSelect)
}
Add(Button,6959507,469,217)
{
Top=125
Width=95
link(onClick,2154219:doCharset,[])
}
Add(FormatStr,5644284,553,217)
{
DataCount=1
Mask="vvv%1vvv"
link(onFString,16151585:doEvent1,[])
}
Add(Edit,7486348,630,224)
{
Top=105
Width=95
}
Add(Hub,16151585,595,217)
{
link(onEvent1,1275108:doSetSelect,[(620,223)(620,131)(478,131)(478,195)])
link(onEvent2,7486348:doText,[])
}
Add(Charset,2154219,511,217)
{
Type=3
link(onCharset,5644284:doString,[])
link(Text,1275108:SelText,[])
}


Правда тогда с кирилицой проблемы...

А по второму пункту подтверждается? Если да, то помещу в Баг трекер, а отсюда можно будет удалить...
карма: 0

0
Ответов: 4641
Рейтинг: 334
#19: 2009-11-29 17:18:24 ЛС | профиль | цитата
Quest писал(а):
А по второму пункту подтверждается?

подтверждается, но не на последнем свн.
Попробуй обновиться с SVN, и если подтвердится то в БАГ!
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Ответов: 294
Рейтинг: 64
#20: 2009-11-29 17:26:41 ЛС | профиль | цитата
Ok.

Кстати, вот такой вариант с кирилицой дружит (при русской раскладке клавы в программе):

Add(MainForm,13246011,413,217)
{
Width=160
Height=190
}
Add(RichEdit,1275108,490,154)
{
Top=5
Width=95
Height=100
Strings=#19:ggg русский hhh jjj|
Point(SelText)
Point(doSetSelect)
}
Add(Button,6959507,469,217)
{
Top=125
Width=95
link(onClick,2154219:doCharset,[])
}
Add(FormatStr,5644284,553,217)
{
DataCount=1
Mask="vvv%1vvv"
link(onFString,16151585:doEvent1,[])
}
Add(Edit,7486348,630,224)
{
Top=105
Width=95
}
Add(Hub,16151585,595,217)
{
link(onEvent1,1275108:doSetSelect,[(621,223)(621,131)(478,131)(478,195)])
link(onEvent2,7486348:doText,[])
}
Add(Charset,2154219,511,217)
{
Type=8
link(onCharset,5644284:doString,[])
link(Text,1275108:SelText,[])
}


карма: 0

0
Ответов: 4641
Рейтинг: 334
#21: 2009-11-29 17:48:40 ЛС | профиль | цитата
Quest писал(а):
В HiligthMemo этой проблемы нет, но есть другая - при компиляции (Delphi) с подведенной связью к точке doReplaceSelect (в ини кстати doRepalace)

вот именно!
Исправил у себя doRepalace на doReplace и все ок!
------------ Дoбавленo в 17.49:
nesco исправь на SVN-не
карма: 1
Время верстки: %cr_time% Текущее время: %time%
0
Разработчик
Ответов: 26304
Рейтинг: 2146
#22: 2009-11-29 19:11:06 ЛС | профиль | цитата
Ravilr писал(а):
исправь на SVN-не

Исправил
карма: 22

0
Ответов: 8954
Рейтинг: 824
#23: 2009-11-29 22:04:48 ЛС | профиль | цитата
nesco, не надо, кому потребуется, может от "События при создании..." отработать. (По теме: Я тоже привык уже )
карма: 19

0
Разработчик
Ответов: 26304
Рейтинг: 2146
#24: 2009-11-29 22:30:28 ЛС | профиль | цитата
Тю! Пока допер к чему вопрос. Да не буду я ничего менять, не критчно все это
карма: 22

0
Ответов: 16884
Рейтинг: 1239
#25: 2009-11-29 23:27:46 ЛС | профиль | цитата
А вот рабочий ComboBox.Text совсем не лишний.
карма: 25
Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!
0
Разработчик
Ответов: 26304
Рейтинг: 2146
#26: 2009-11-30 01:35:10 ЛС | профиль | цитата
Tad писал(а):
А вот рабочий ComboBox.Text совсем не лишний

А вот как раз Text, ни коим образом не связан с полем Edit, за это поле отвечает Caption. Я могу сделать поддержку такой привязки вывода в поле Edit со свойством Text, но лучше подожду решения начальства
карма: 22

0
Разработчик
Ответов: 4698
Рейтинг: 426
#27: 2009-11-30 14:16:10 ЛС | профиль | цитата
nesco писал(а):
А вот как раз Text, ни коим образом не связан с полем Edit

Ну конечно, тогда советую почитать описание этого свойства : "Определяет текст в поле ввода" или по другому в Edit у ComboBox.
Вообще: что такое ComboBox? - да это тот же Ёдит только с возможностью выбора значения, так почему же св-во Text не должно быть связано с полем, когда в простом Ёдит так и есть, скажите мне пожалуйста
карма: 10
0
Администрация
Ответов: 15295
Рейтинг: 1519
#28: 2009-11-30 14:26:42 ЛС | профиль | цитата
чего-то с ComboBox проблему не понял
*Text=Хранит список строк, разделённых символами 10 и 13|3|2


*EditText=Хранит текст в области ввода компонента|3|2


nesco писал(а):
за это поле отвечает Caption.

это чего за свойство?

Assasin писал(а):
Вообще: что такое ComboBox? - да это тот же Ёдит только с возможностью выбора значения

неверно. ComboBox это Edit+ListBox
карма: 27
0
Разработчик
Ответов: 4698
Рейтинг: 426
#29: 2009-11-30 14:33:13 ЛС | профиль | цитата
Dilma писал(а):
*EditText=Хранит текст в области ввода компонента|3|2

Ну и где же мой текст? code_15857.txt
Так или иначе, св-во Text должно быть связано, как я считаю: св-во Text заимствовали из Edit => надо заимствовать функцию этого поля, а не пусть сидит мертвым грузом, св-во как для красоты сейчас стоит, нигде не нашел, как извлечь из него значение и пользу , а св-во Strings заимствовано из ListBox => заимствованы функции этого поля, что соответствует правде
карма: 10
0
файлы: 1code_15857.txt [374B] [148]
Администрация
Ответов: 15295
Рейтинг: 1519
#30: 2009-11-30 14:36:37 ЛС | профиль | цитата
Assasin, Text в выпадающем списке соответствует тексту в ListBox и ничего менять мы сегодня уже не будем
карма: 27
0
Сообщение
...
Прикрепленные файлы
(файлы не залиты)