Количество пробелов в строке

Форумы Помощь по пакетуКоличество пробелов в строке ← Ctrl12 3Ctrl →

Этот топик читают: Гость

Ответов: 37

Рейтинг: 5

#1: 2011-11-02 19:22:13 ЛС | профиль | цитата

Всем опять здарова. Ну вот реально что то туплю. блин тыща всего создал, а вот на элементарном месте запнулся. как зделать так что бы в строке было максимум 4 пробела, что бы программа не позволяла добавить 5 пробел? Зарание спасибо.

карма: 0

Ответов: 8930

Рейтинг: 823

#2: 2011-11-02 19:34:23 ЛС | профиль | цитата

Fidel, не более 4-х подряд, или не более 4-х всего

карма: 19

Ответов: 16884

Рейтинг: 1239

#3: 2011-11-02 19:47:35 ЛС | профиль | цитата

Леонид писал(а):

не более 4-х подряд, или не более 4-х всего

а какая разница? Если

Fidel писал(а):

что бы в строке было максимум 4 пробела

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 8930

Рейтинг: 823

#4: 2011-11-02 21:18:53 ЛС | профиль | цитата

Tad, две большие разницы

если ВСЕГО, в строке не более 5 слов, если только ПОДРЯД -- сколь угодно слов (и все производные от тех же пяти

)

карма: 19

Ответов: 16884

Рейтинг: 1239

#5: 2011-11-02 21:55:38 ЛС | профиль | цитата

Ждём ТС

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 1536

Рейтинг: 176

#6: 2011-11-02 22:16:34 ЛС | профиль | цитата

Fidel,

Add(Memo,11658494,308,77)
{
 Left=70
 Top=75
 Width=255
 Strings=#31:бла бла бла бла бла бла бла бла|34:бла     блю бли, чуть не заругался|25:Здесь пять пробелов . . .|22:Здесь семь . . . . . .|10:а б в г д |
}
Add(Memo,1809028,420,147)
{
 Left=405
 Top=75
 Width=245
}
Add(ArrayEnum,6365414,322,140)
{
 link(onItem,4407853:doCompare,[])
 link(Array,11658494:Array,[])
}
Add(Button,15068539,273,140)
{
 Left=340
 Top=100
 link(onClick,6365414:doEnum,[])
}
Add(StrMask,4407853,371,140)
{
 Mask="* * * * * * *"
 link(onTrue,1809028:doAdd,[])
}

карма: 1

Не так страшна ошибка, как опасность её не заметить.

Ответов: 16884

Рейтинг: 1239

#7: 2011-11-02 23:00:25 ЛС | профиль | цитата

ser_davkin писал(а):

особо не старался.

и внимательно не читал

Fidel писал(а):

что бы в строке было максимум 4 пробела, что бы программа не позволяла добавить 5 пробел

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 1536

Рейтинг: 176

#8: 2011-11-02 23:28:21 ЛС | профиль | цитата

Tad,

Add(Memo,11658494,259,161)
{
 Left=70
 Top=75
 Width=255
 Height=115
 Strings=#31:бла бла бла бла бла бла бла бла|34:бла     блю бли, чуть не заругался|25:Здесь пять пробелов . . .|22:Здесь семь . . . . . .|9:а б в г д|14:(    )4пробела|16:(     )5пробелов|
}
Add(Memo,1809028,490,287)
{
 Left=405
 Top=75
 Width=245
 Height=120
 link(Str,6365414:Item,[(496,279)(279,279)])
}
Add(ArrayEnum,6365414,273,224)
{
 link(onItem,1072478:doEnum,[])
 link(Array,11658494:Array,[])
}
Add(Button,15068539,224,224)
{
 Left=340
 Top=100
 link(onClick,6365414:doEnum,[])
}
Add(Str_Enum,1072478,322,224)
{
 Delimiter=" "
 link(onEnum,16161248:doOperation,[])
 link(onEndEnum,11840435:doEvent1,[(362,237)(362,258)])
}
Add(Math,16161248,420,224)
{
 Op2=1
 ResultType=0
 Point(doClear)
 link(Op1,11723817:Var1,[(426,212)(414,212)(414,268)])
}
Add(If_else,72974,413,287)
{
 Type=1
 Op2=Integer(6)
 link(onTrue,1809028:doAdd,[])
 link(Op1,11723817:Var2,[])
}
Add(GetDataEx,11723817,413,263)
{
 Angle=1
 link(Data,16161248:Result,[(426,268)])
}
Add(Hub,11840435,371,252)
{
 link(onEvent1,72974:doCompare,[(392,258)(392,293)])
 link(onEvent2,16161248:doClear,[(403,265)(403,237)])
}

карма: 1

Не так страшна ошибка, как опасность её не заметить.

Ответов: 16884

Рейтинг: 1239

#9: 2011-11-02 23:35:13 ЛС | профиль | цитата

ser_davkin, человек вводит текст (не переносит из одного Memo в другое

). И хочет контролировать число пробелов - если уже есть 4 пробела ,то запретить ввод пятого.
Я так понял.

карма: 25

Немного терпения! Дежурный экстрасенс скоро свяжется с Вами!

Ответов: 1536

Рейтинг: 176

#10: 2011-11-02 23:42:01 ЛС | профиль | цитата

Ну, смысл, как контролировать я подал, а как прикрутить к чему-нибудь - уже несложно.
Вот например с Edit:

Add(Str_Enum,1072478,364,112)
{
 Delimiter=""
 link(onEnum,6523261:doCompare,[])
 link(onEndEnum,10691196:doEvent1,[(415,125)(415,174)])
}
Add(Math,16161248,504,112)
{
 Op2=1
 ResultType=0
 Point(doClear)
 link(Op1,12898614:Var1,[(510,100)(487,100)(487,155)])
}
Add(Edit,851826,315,112)
{
 Left=195
 Top=210
 Width=95
 link(onChange,1072478:doEnum,[])
}
Add(DoData,10193292,546,210)
{
 link(onEventData,4799003:doWork2,[])
 link(Data,9049160:Value,[])
}
Add(If_else,6523261,427,112)
{
 Op2=String( )
 link(onTrue,16161248:doOperation,[])
}
Add(GetDataEx,12898614,497,150)
{
 Angle=1
 link(Data,16161248:Result,[(510,155)])
}
Add(If_else,10020712,490,168)
{
 Type=2
 Op1=Integer(4)
 link(onTrue,9049160:doValue,[])
 link(onFalse,10193292:doData,[(534,181)(534,216)])
 link(Op2,12898614:Var2,[])
}
Add(Memory,9049160,546,168)
{
 Point(Data)
 link(onData,4799003:doWork1,[(591,174)])
 link(Data,851826:Text,[(552,86)(300,86)(300,162)(321,162)])
}
Add(HubEx,4799003,587,210)
{
 Angle=1
 link(onEvent,851826:doText2,[(591,264)(289,264)(289,125)])
}
Add(Hub,10691196,434,168)
{
 link(onEvent1,10020712:doCompare,[])
 link(onEvent2,16161248:doClear,[(476,181)(476,125)])
}