Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2005.10.30;
Скачать: CL | DM;

Вниз

строки   Найти похожие ветки 

 
Del_programmer ©   (2005-10-06 14:33) [0]

надо в мемо1, в его тексте определить наибольшее слово.
Как это сделать? Желательно примеры из Билдера....:)
спасибо..


 
clickmaker ©   (2005-10-06 14:36) [1]

для начала вынести в отдельный массив возможные разделители слов. Пробел, хотя бы.
Потом в цикле по строкам. Нашел разделители - скопировал слово - получил длину - запомнил. Если она больше чем максимальная (изначально 0) - max=len, и дальше чешешь...


 
Иванов__   (2005-10-06 14:36) [2]

Читать книги "Основы алгоритмизации и программирования"


 
Del_programmer ©   (2005-10-06 14:43) [3]


> clickmaker ©

ну например..........


 
Del_programmer ©   (2005-10-06 15:01) [4]

хоть кто-то...........кодик..........


 
Antonn ©   (2005-10-06 15:31) [5]

Del_programmer ©   (06.10.05 15:01) [4]
сюда глянь, идеи посмотри:
http://an-files.narod.ru/_works/index.html


 
evvcom ©   (2005-10-06 16:08) [6]

А что такое "наибольшее слово"?


 
msguns ©   (2005-10-06 16:45) [7]

Делается тремя операторами в цикле с использованием Pos и LeftStr
При жестко заданном разделителе, еснно ;))


 
Antonn ©   (2005-10-06 17:08) [8]

msguns ©   (06.10.05 16:45) [7]
можно и больше:)


 
SergProger ©   (2005-10-07 01:01) [9]

Попробуй так:

If Memo1.Lines.Count <> 0 then begin
 max:=0;
 For i:=0 to Memo1.Lines.Count-1 do
   If Length(Memo1.Lines[i]) > Length(Memo1.Lines[max]) then max:=i;
 Form1.Caption:=Memo1.Lines[max];
end;


 
Del_programmer ©   (2005-10-07 09:26) [10]


> SergProger ©  

оно по ходу определяет наибол строку.....
а мне надо слово:)



Страницы: 1 вся ветка

Текущий архив: 2005.10.30;
Скачать: CL | DM;

Наверх




Память: 0.48 MB
Время: 0.039 c
2-1128252504
Volf_555
2005-10-02 15:28
2005.10.30
Как в поле ввода пароля вводимый пароль отображать звёздочками?


1-1128439890
~SaM~
2005-10-04 19:31
2005.10.30
Арифметические действия с числами, записанными в строках.


3-1126694978
erika
2005-09-14 14:49
2005.10.30
Соединение с ервером через инет


3-1125875699
ASVShade
2005-09-05 03:14
2005.10.30
Запрос не объединение таблиц


3-1125466978
цук цук
2005-08-31 09:42
2005.10.30
Печать Rave Report