Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

подскажите мою ошибку. программа считает кол-во слов в тексте [D7, WinXP]

Страницы: < 1 2
sokol © (2008-12-20 22:54:00)
Undeclared identifier StringToWord - что это значит??? и как сделать правильно.
Подскажите пожалуйста

procedure TForm1.Button1Click(Sender: TObject);
var Source,Dest:Tstrings;
i:integer;
begin
Source:=TstringList.Create;
Dest:=TstringList.Create;
Source.LoadFromFile('c:\MyText.txt');
for i:=0 to Source.Count-1 do
begin
StringToWords(Source[i],2,Dest);
Application.ProcessMessages;
end;
Dest.SaveToFile('c:\MyWords.txt');
ShowMessage('Найдено '+IntToStr(Dest.Count)+' слов');
end;

sokol (2008-12-21 01:07:00) [21]
всё!!! решил этот вопрос другим способом, более легким :))

Тын-Дын (2008-12-21 00:26:00) [22]

> {RASkov} © (20.12.08 23:39) [14]
> > [13] Тын-Дын © (20.12.08 23:37)> код твоей программы
> Это код не его программы.... он даже не понимает для чего
> и почему там :)См [3] :)

Не его.
Но там в кладовке и нужная ему функция приведена.
Возможно просто не там где нужно её описал...

sokol (2008-12-21 00:11:00) [23]
а какой вообще принцип счета?? мы пишем: если больше " ", то 1 далее еще +1 и т.д. так или нет?

KilkennyCat (2008-12-21 00:04:00) [24]
Присоединяюсь к вопросу

> antonn © (20.12.08 23:23) [6]

{RASkov} (2008-12-20 23:47:00) [25]
> [15] sokol © (20.12.08 23:43)

Попробуй в яндексе поискать или в гугле...
Или вот например: http://rx.delphiplus.org/

sokol (2008-12-20 23:43:00) [26]
ок, спасибо, буду разбираться :)
а где эту RxLib взять? пишет типо нету у меня в базе библиотек такой

{RASkov} (2008-12-20 23:39:00) [27]
> [13] Тын-Дын © (20.12.08 23:37)
> код твоей программы

Это код не егопрограммы.... он даже не понимает для чего и почему там :)
См [3] :)

Тын-Дын (2008-12-20 23:37:00) [28]

> sokol © (20.12.08 23:21) [5]

Ты весь код твоей программы привёл?

sokol (2008-12-20 23:35:00) [29]
нет не полного!! хотябы принцип, какие компоненты использовать.
а взялся,т.к. это задание у меня по курсачу

{RASkov} (2008-12-20 23:35:00) [30]
В RxLib есть функции в RxStrUtil(или както так, не помню точно название модуля) типа: WordCount, WordPosition, ExtractWord и много других...

{RASkov} (2008-12-20 23:30:00) [31]
> [9] sokol © (20.12.08 23:28)

Ты не помощи просишь, а полного решения твоей задачи.)
А если не шаришь, то зачем взялся за это? :)

sokol (2008-12-20 23:28:00) [32]

> Ага.... не все же копировать-то :)Иначе не интересно будет.
> ..)

конечно :) если б шарил это, то давно решил бы :)
а так прошу помощи

{RASkov} (2008-12-20 23:28:00) [33]
Странным, а точнее недочет, там то, что нет уничтожения этих самых локальных Source и Dest.... утечка.
Автор, совет, меньше занимайся копипастом первое время, потом можно, а для начала лучше вникать в суть...)

{RASkov} (2008-12-20 23:24:00) [34]
> [5] sokol © (20.12.08 23:21)
> или прописать эту ф-ю

Ага.... не все же копировать-то :)
Иначе не интересно будет...)

antonn (2008-12-20 23:23:00) [35]

> Вот здесь тебе ничего не кажется странным?

А здесь есть что то странное?
Мастер соизволит рассказать? Ну просто чтобы вывернуться из ситуации.

sokol (2008-12-20 23:21:00) [36]
присутствует, только делфи не знает, что это такое (Undeclared identifier StringToWord), может что-то еще нада? или прописать эту ф-ю где-то

Anatoly Podgoretsky (2008-12-20 23:17:00) [37]

> прогу смотрел здесь http://kladovka.net.ru/delphibase/?action=viewfunc&topic=strsearch&id=10231

StringToWord присутствует в примере

sokol (2008-12-20 23:11:00) [38]
прогу смотрел здесь http://kladovka.net.ru/delphibase/?action=viewfunc&topic=strsearch&id=10231

sokol (2008-12-20 23:10:00) [39]
> var Source:Tstrings;
> Source:=TstringList.Create;

Вот здесь тебе ничего не кажется странным?

я мало что понимаю в этом :)

тогда какую команду можно использовать для подсчета слов??
направьте на путь истинный :))

Johnmen (2008-12-20 23:02:00) [40]

> Undeclared identifier StringToWord - что это значит???

Это значит, что компилятор тоже не знает, что это.

> var Source:Tstrings;
> Source:=TstringList.Create;

Вот здесь тебе ничего не кажется странным?

ЗЫ
Ещё есть F1. Которую можно нажать на Tstrings и почитать.

Страницы: < 1 2

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »