Вверх ↑
Этот топик читают: Гость
Ответов: 44
Рейтинг: 3
#1: 2012-08-24 18:58:10 ЛС | профиль | цитата
Расскажите, пожалуйста, на стандартном примере (он ниже) как сделать чтобы писалось разными стилями ? (жирный, курсив)
На выходе в этой схеме идет 3 части. 1. Hiasm. 2. super. 3. !!!

Вот как сделать чтобы Hiasm написался жирным, а super курсивом?

Add(MainForm,5646764,273,196)
{
Caption="Пример использования FormatStr"
}
Add(Edit,12980779,329,196)
{
Left=105
Top=35
Text="Hiasm"
}
Add(Button,517459,273,252)
{
Left=170
Top=80
link(onClick,10274204:doString,[])
}
Add(Label,1634708,448,252)
{
Left=5
Top=140
Width=380
Height=36
Font=[MS Sans Serif,20,0,0,1]
Caption="!"
AutoSize=1
Alignment=2
}
Add(FormatStr,10274204,371,252)
{
DataCount=3
Mask="%1 %2 %3"
link(onFString,1634708:doText,[])
link(Str1,12980779:Text,[(377,237)(335,237)])
link(Str2,3504255:Text,[])
link(Str3,606511:Text,[(391,233)(433,233)])
}
Add(Edit,3504255,378,196)
{
Left=175
Top=35
Text=" super"
}
Add(Edit,606511,427,196)
{
Left=245
Top=35
Text=" !!!!!!"
}

карма: 0

0
Ответов: 1173
Рейтинг: 49
#2: 2012-08-24 19:11:48 ЛС | профиль | цитата
В одном Label не может быть несколько стилей, если выбран жирный, то весь текст в Label будет жирный. Используйте RichEdit или несколько Label'ов. А код вставляется

Вот так
карма: 0

0
Ответов: 1043
Рейтинг: 33
#3: 2012-08-24 19:15:34 ЛС | профиль | цитата
Saget13 писал(а):
на стандартном пример

шрифт устанавливается на сам label, а не текст
------------ Дoбавленo в 19.15:
Ex_, опередил
карма: 0

0
Гость
Ответов: 17029
Рейтинг: 0
#4: 2012-08-24 19:18:50 правка | ЛС | профиль | цитата


Редактировалось 2 раз(а), последний 2025-01-12 09:11:35
карма: 0

0
Ответов: 1043
Рейтинг: 33
#5: 2012-08-24 19:23:40 ЛС | профиль | цитата
вот так с RichEdit

Add(MainForm,5646764,175,91)
{
Caption="Пример использования FormatStr"
}
Add(Edit,12980779,259,91)
{
Left=105
Top=35
Text="Hiasm"
}
Add(Button,517459,175,189)
{
Left=170
Top=80
link(onClick,12914807:doString,[])
}
Add(Edit,3504255,301,91)
{
Left=175
Top=35
Text=" super"
}
Add(Edit,606511,343,91)
{
Left=245
Top=35
Text=" !!!!!!"
}
Add(RichEdit,1551587,385,189)
{
Left=10
Top=125
Width=365
Height=125
link(Style,8383438:NumSubStr,[(405,177)(367,177)(367,233)(328,233)])
}
Add(FormatStr,12914807,259,189)
{
DataCount=3
Mask="%1+%2+%3"
link(onFString,8383438:doEnum,[])
link(Str1,12980779:Text,[])
link(Str2,3504255:Text,[(272,156)(307,156)])
link(Str3,606511:Text,[(279,156)(349,156)])
}
Add(Str_Enum,8383438,322,189)
{
Delimiter="+"
link(onEnum,1551587:doAdd,[])
}


------------ Дoбавленo в 19.23:
г. ость, CounterEx лишний
карма: 0

0
файлы: 1code_28869.txt [826B] [125]
Ответов: 1173
Рейтинг: 49
#6: 2012-08-24 19:37:27 ЛС | профиль | цитата
ashkalov, зачем повторяться? Всё есть в справке:
code_28870.txt
карма: 0

0
файлы: 1code_28870.txt [1.7KB] [130]
Ответов: 1043
Рейтинг: 33
#7: 2012-08-24 19:42:28 ЛС | профиль | цитата
Ex_, я не повторялся

Saget13, можно еще самому отрисовывать, но это сложнее
Add(MainForm,5646764,161,112)
{
Caption="Пример использования FormatStr"
}
Add(Edit,12980779,217,112)
{
Left=105
Top=35
Text="Hiasm"
}
Add(Button,517459,161,168)
{
Left=170
Top=80
link(onClick,10274204:doString,[])
}
Add(FormatStr,10274204,259,168)
{
DataCount=3
Mask="%1 +%2 +%3"
link(onFString,14409753:doEvent1,[])
link(Str1,12980779:Text,[(265,153)(223,153)])
link(Str2,3504255:Text,[])
link(Str3,606511:Text,[(279,149)(321,149)])
}
Add(Edit,3504255,266,112)
{
Left=175
Top=35
Text="super"
}
Add(Edit,606511,315,112)
{
Left=245
Top=35
Text="!!!!!"
}
Add(PaintBox,4025743,434,168)
{
Left=120
Top=135
Width=175
Height=65
}
Add(MultiElementEx,14409753,385,168)
{
link(onEvent1,4025743:doRefresh,[])
link(onEvent11,4025743:doClear,[])
link(Bitmap,4025743:Bitmap,[(391,148)(480,148)(480,212)(440,212)])
}
BEGIN_SDK
Add(EditMultiEx,894064,21,21)
{
WorkCount=#8:doEvent1|
EventCount=#8:onEvent1|9:onEvent11|
DataCount=#6:Bitmap|
Width=601
Height=347
link(doEvent1,14775164:doEvent1,[(31,27)(31,139)])
}
Add(Img_Text,3500681,371,140)
{
Point(doFont)
Point(X)
link(onDraw,13139461:doEvent1,[])
link(Bitmap,894064:Bitmap,[(377,80)(27,80)])
link(Text,4427632:Part,[(384,121)(185,121)(185,175)(90,175)])
link(X,3004349:Var2,[(391,114)(468,114)])
}
Add(Str_Enum,4427632,77,140)
{
Delimiter="+"
MakeExt(Delimiter,,Delimiter)
link(onEnum,4461951:doEvent1,[(177,146)(177,48)])
}
Add(IndexToChanel,13585270,182,203)
{
Count=4
Point(Index)
link(onEvent2,13834535:doFont,[])
link(onEvent3,4221612:doFont,[(240,223)(240,265)])
link(onEvent4,6725604:doFont,[(234,230)(234,314)])
link(Index,4427632:NumSubStr,[(188,187)(83,187)])
}
Add(Font,13834535,252,210)
{
Font=[Arial,12,1,0,204]
link(onFont,715218:doWork2,[(300,216)(300,153)])
}
Add(Hub,4461951,245,42)
{
link(onEvent1,13585270:doEvent,[(271,48)(271,128)(170,128)(170,209)])
link(onEvent2,3500681:doDraw,[(315,55)(315,146)])
}
Add(Font,4221612,252,259)
{
Font=[Arial,12,2,0,204]
link(onFont,15245793:doWork2,[])
}
Add(HubEx,715218,315,147)
{
link(onEvent,3500681:doFont,[])
}
Add(Font,6725604,252,308)
{
Font=[Arial,12,0,0,204]
link(onFont,15245793:doWork3,[(319,314)])
}
Add(HubEx,15245793,315,259)
{
Angle=3
link(onEvent,715218:doWork3,[])
}
Add(Hub,13139461,427,140)
{
link(onEvent1,894064:onEvent1,[(531,146)(531,27)])
link(onEvent2,14136768:doOperation,[(453,153)(453,27)(373,27)(373,62)])
}
Add(Math,14136768,385,56)
{
link(onResult,6919368:doValue,[])
link(Op1,3500681:TextWidth,[(391,44)(360,44)(360,182)(377,182)])
link(Op2,3004349:Var1,[(398,44)(432,44)(432,103)])
}
Add(Hub,14775164,42,133)
{
link(onEvent1,9223051:doEvent1,[(266,139)(266,153)])
link(onEvent2,4427632:doEnum,[])
}
Add(Hub,9223051,490,147)
{
link(onEvent1,894064:onEvent11,[(563,153)(563,34)])
link(onEvent2,6919368:doClear,[(516,160)(516,35)(446,35)(446,69)])
}
Add(Memory,6919368,462,56)
{
}
Add(GetDataEx,3004349,462,98)
{
link(Data,6919368:Value,[])
}
END_SDK

карма: 0

2
файлы: 1code_28871.txt [2.2KB] [105]
Голосовали:Ex_, Saget13
Ответов: 44
Рейтинг: 3
#8: 2012-08-24 20:12:53 ЛС | профиль | цитата
[flood]Ex_, загнался чет, и вставил неправильно код)[/flood]
Ex_, ashkalov, огромное спасибо!!!!!! завтра на работе буду пробовать)
------------ Дoбавленo в 20.12:
ashkalov писал(а):
шрифт устанавливается на сам label, а не текст

это я знаю, поэтому и возник такой вопрос) например, всё жирным не надо, а ток кусок
карма: 0

0
Ответов: 44
Рейтинг: 3
#9: 2012-08-29 15:58:16 ЛС | профиль | цитата
Ex_ писал(а):
ashkalov, зачем повторяться? Всё есть в справке:
code_28870.txt

подскажите, почему при попытки вставить изображение выходит такая ошибка идет?

карма: 0

0
Ответов: 1173
Рейтинг: 49
#10: 2012-08-29 16:02:05 ЛС | профиль | цитата
Saget13, это из-за компилятора FPC, используйте Delphi.
карма: 0

0
Ответов: 44
Рейтинг: 3
#11: 2012-08-29 16:08:30 ЛС | профиль | цитата
Ex_ писал(а):
Saget13, это из-за компилятора FPC, используйте Delphi.

Спасибо)
карма: 0

0
11
Сообщение
...
Прикрепленные файлы
(файлы не залиты)