Форум: "Основная";
Текущий архив: 2003.10.20;
Скачать: [xml.tar.bz2];
ВнизMemo Найти похожие ветки
← →
kopcap (2003-10-07 19:50) [0]Можно ли в компоненти Memo зделать так чтоб в строке помещалось не более 20 символов ?
← →
Palladin (2003-10-07 19:58) [1]контролировать ввод
← →
kopcap (2003-10-07 20:08) [2]Если есть еще какиенить способы пишите =)
У меня ещё один вопрос появился :
есть строка - var stroka:string = " привет всем"
и есть массив var s: array[1..2]of string;
Как мне разделить strokaна 2 слова привети всем
и чтоб 1 слово было первым элементам массива s, а 2 вторым ???
← →
Palladin (2003-10-07 20:14) [3]Pos
Copy
← →
Нурик (2003-10-08 07:58) [4]Это же элементарно Ватсон!
смотри:
begin
...
i:=0;
ar_num:=1; //идекс массива s[1..2]
s[1]:="";
s[2]:="";
repeat
inc(i);
if stroka[i]<>" " then s[ar_num]:=s[ar_num]+stroka[i] else
ar_num:=2; //если пробел, то переключиться на второй элемент массива
until i>=length(stroka);
...
ну короче типа такого, если нужно подкорректируешь. Если непонял и есть вопросы то пиши, отвечу.
Страницы: 1 вся ветка
Форум: "Основная";
Текущий архив: 2003.10.20;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c