Строка по номеру!

Вверх ↑

Форумы Помощь по пакетуСтрока по номеру! ← Ctrl1Ctrl →

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

Гость

Ответов: 17029

Рейтинг: 0

#1: 2013-01-13 22:22:27 правка | ЛС | профиль | цитата

Редактировалось 2 раз(а), последний 2025-01-09 15:16:45

карма: 0

Ответов: 8953

Рейтинг: 824

#2: 2013-01-13 23:39:11 ЛС | профиль | цитата

г. LexOn1992,
code_30059.txt

карма: 19

файлы: 1

code_30059.txt [1020B] [348]

Ответов: 704

Рейтинг: 44

#3: 2013-01-13 23:43:28 ЛС | профиль | цитата

г. LexOn1992 писал(а):

Хочу сделать так чтоб в компоненте редактор текста был какой то текст

В чем проблема бери и пиши

г. LexOn1992 писал(а):

а при введении в одно из полей ввода номер строки и при нажатии кнопку заданая строка передовалась на второе поле ввода.

Это называется индекс строки.

[flood]Только как понять, ваше предложение из 332 символов и не одной Знака препинания , что ты именно хочешь

.[/flood]

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#4: 2013-01-14 00:15:19 правка | ЛС | профиль | цитата

Редактировалось 2 раз(а), последний 2025-01-09 15:16:45

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#5: 2013-01-14 09:12:52 правка | ЛС | профиль | цитата

Редактировалось 2 раз(а), последний 2025-01-09 15:16:45

карма: 0

Ответов: 1536

Рейтинг: 176

#6: 2013-01-14 09:58:03 ЛС | профиль | цитата

Леонид, убрал два лишних элемента:

Add(MainForm,16551491,259,91)
{
 link(onCreate,10135350:doLoad,[])
}
Add(Edit,10907569,273,140)
{
 Left=135
 Top=5
 Text="0"
 DataType=2
 link(onChange,7875156:doRead,[])
}
Add(Button,5849268,182,140)
{
 Left=70
 Top=5
 link(onClick,3193407:doOperation,[])
}
Add(Memo,10135350,308,77)
{
 Left=5
 Top=35
 Width=375
 Height=195
 FileName="License.txt"
 ScrollBars=2
}
Add(Edit,5377794,371,140)
{
 Left=5
 Top=235
 Width=375
}
Add(ArrayRW,7875156,322,140)
{
 link(onRead,5377794:doText,[])
 link(Array,10135350:Array,[])
}
Add(Math,3193407,231,140)
{
 Op2=1
 ResultType=0
 Default=-1
 link(onResult,10907569:doText,[])
 link(Op1,3193407:Result,[(237,128)(225,128)(225,184)(237,184)])
}

37.143.89.238 писал(а):

Он не понимает русский!

Кто не понимает русский?

карма: 1

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

Ответов: 16884

Рейтинг: 1239

#7: 2013-01-14 10:44:23 ЛС | профиль | цитата

ser_davkin писал(а):

убрал два лишних элемента:

карма: 25

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

Ответов: 1536

Рейтинг: 176

#8: 2013-01-14 11:04:52 ЛС | профиль | цитата

Tad, у меня привычка - зараза, привык оптимизировать схему на ходу, чтобы меньше создавать путаницу в голове в будущем. Два элемента, по сути, не играют роли, а для процессора уже лишние шаги.

карма: 1

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

Ответов: 8953

Рейтинг: 824

#9: 2013-01-14 11:28:38 ЛС | профиль | цитата

ser_davkin писал(а):

привык оптимизировать схему

И нарушать логику ТС

карма: 19

Ответов: 1536

Рейтинг: 176

#10: 2013-01-14 11:43:55 ЛС | профиль | цитата

Леонид,

г. LexOn1992 писал(а):

при введении в одно из полей ввода номер строки И при нажатии кнопку заданая строка передовалась на второе поле ввода

В таком случае счётчик там вообще не нужен.

Add(MainForm,16551491,266,77)
{
 link(onCreate,10135350:doLoad,[])
}
Add(Edit,10907569,364,70)
{
 Left=135
 Top=5
 Text="0"
 DataType=1
}
Add(Button,5849268,266,126)
{
 Left=70
 Top=5
 link(onClick,7875156:doRead,[])
}
Add(Memo,10135350,315,63)
{
 Left=5
 Top=35
 Width=375
 Height=195
 FileName="License.txt"
 ScrollBars=2
}
Add(Edit,5377794,378,126)
{
 Left=5
 Top=235
 Width=375
}
Add(ArrayRW,7875156,329,126)
{
 link(onRead,5377794:doText,[])
 link(Array,10135350:Array,[])
 link(Index,10907569:Text,[(342,114)(370,114)])
}

------------ Дoбавленo в 11.43:
Правда, не понятно это:

г. LexOn1992 писал(а):

при введении в одно из полей ввода номер строки

Add(MainForm,16551491,287,119)
{
 Width=394
 Height=304
 link(onCreate,10135350:doLoad,[])
}
Add(Edit,10907569,469,35)
{
 Left=5
 Top=225
 Width=375
 Text=""
 Point(doSelectAll)
 Point(onMouseUp)
 link(onChange,10109426:doWork1,[(512,41)(512,27)(388,27)(388,104)])
 link(onMouseUp,10907569:doSelectAll,[(512,55)(512,75)(457,75)(457,55)])
}
Add(Button,5849268,287,189)
{
 Left=150
 Top=250
 link(onClick,7875156:doRead,[])
}
Add(Memo,10135350,336,105)
{
 Left=5
 Top=5
 Width=375
 Height=195
 FileName="License.txt"
 ScrollBars=2
}
Add(Edit,5377794,546,182)
{
 Left=5
 Top=205
 Width=375
 Text=""
 Point(doSelectAll)
 Point(onMouseUp)
 link(onChange,10109426:doWork2,[(583,188)(583,142)(387,142)(387,111)])
 link(onMouseUp,5377794:doSelectAll,[(588,202)(588,218)(534,218)(534,202)])
}
Add(ArrayRW,7875156,350,189)
{
 link(onRead,6807275:doEvent,[])
 link(Array,10135350:Array,[])
 link(Index,15051939:Var,[(363,162)(475,162)])
}
Add(IndexToChanel,6807275,399,189)
{
 Point(Index)
 PColor(onEvent2,16755200)
 link(onEvent1,5377794:doText2,[])
 link(onEvent2,10907569:doText2,[(448,202)(448,48)])
 link(Index,7723534:Value,[(405,172)(517,172)])
}
Add(GetIndexData,15051939,469,98)
{
 link(onIndex,7723534:doValue,[])
 link(Data1,10907569:Text,[])
 link(Data2,5377794:Text,[(482,85)(595,85)(595,226)(552,226)])
}
Add(ChanelToIndex,10109426,406,98)
{
 link(onIndex,15051939:doIndex,[])
}
Add(Memory,7723534,511,98)
{
}

исходя из логики вопроса ТС.

карма: 1

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

Гость

Ответов: 17029

Рейтинг: 0

#11: 2013-01-14 13:05:58 правка | ЛС | профиль | цитата

Редактировалось 2 раз(а), последний 2025-01-09 15:16:46

карма: 0

Гость

Ответов: 17029

Рейтинг: 0

#12: 2013-01-14 13:20:15 правка | ЛС | профиль | цитата

Редактировалось 2 раз(а), последний 2025-01-09 15:16:46

карма: 0

Форумы Помощь по пакетуСтрока по номеру! ← Ctrl1Ctrl →


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