Главная страница
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.065 c
4-1124648013
SpyBoy
2005-08-21 22:13
2005.10.30
NtOpenFile


14-1128399860
12DFBDD
2005-10-04 08:24
2005.10.30
Форум, новинки


14-1128537581
bSava
2005-10-05 22:39
2005.10.30
Помощник Microsoft


6-1121179345
n0p
2005-07-12 18:42
2005.10.30
Indy9: Nagle


5-1107159560
Smileman
2005-01-31 11:19
2005.10.30
Эффект ненужного растяжения