Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

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

Работа с динамическим массивом [D7, XP]


YGINE ©   (2006-05-18 21:53:00) 

Помогите пожалуста с написанием кода в консольном режиме.
Нужен код чтобы при запуске прога в текте неизвестного размера
искала заданые мною слова и удаляла их. Мне сказали что можно както через динамический массив но с ними я ещё не работал.


Плохиш   (2006-05-19 11:17:00) [1]


> YGINE ©   (19.05.06 11:00) [3]
> Если сказать ещё проще это будет программа которая будет
> заменять нецензурные слова из какогото текста размер которого
> мне не известен.

Читаешь свой текст в строковую переменную и выполняешь функцию StringReplace в цикле для каждого слова, установив флаг rfReplaceAll.
А размер текста и не нужен для твоего задания.


Desdechado   (2006-05-19 11:09:00) [2]

так в чем вопрос?

тебе уже рассказали, как считать файл, как его проверять, как хранить нецензурные слова, как их список получить с консоли

в чем затык? или нужен готовый код? тогда это к тому, который "подсказали что при работе с текстом неизвестного размера..."


YGINE   (2006-05-19 11:00:00) [3]

Если сказать ещё проще это будет программа которая будет заменять нецензурные слова из какогото текста размер которого мне не известен.
Мне подсказали что при работе с текстом неизвестного размера легче работать с динаическим массивом.


YGINE   (2006-05-19 11:00:00) [4]

Если сказать ещё проще это будет программа которая будет заменять нецензурные слова из какогото текста размер которого мне не известен.
Мне подсказали что при работе с текстом неизвестного размера легче работать с динаическим массивом.


DevilDevil   (2006-05-18 23:44:00) [5]

ФОРМУЛИРУЙ ВОПРОС ЧЁТЧЕ!

var
 Strings : TStrings;

// OnCreate
Strings := TStringList.Create;
Strings.LoadFromFile('C:\TvoyFile.txt');

// OnDestroy
String.Free;
//------------------------------------

Объект Strings - массив строк, загруженный из текстового файла, обладает так же рядом свойств и методов

Strings.Add('Добавляемая строка'); - добавить строку в конец
Strings.SaveToFile('Имя текстового файла'); - сохранить в текстовый файл
Strings.Delete(индекс удаляемой строки); - удалить строку

Остальные свойства и методы ты легко сможешь найти в справке, там они хорошо описаны

К i-той строке твоего файла обращайся например так: Strings[2] := 'Моя Строка';
Индексация начинается с 0-го элемента. Количество строк = Strings.Count

То есть перебрать все элементы этого массива можешь так:
for i := 0 to Strings.Count - 1 do
begin
 Strings[i] := 'Это моя строка №' + IntToStr(i);
end;

P.S. TStrings и TStringList - Не Динамические Массивы


Desdechado   (2006-05-18 22:08:00) [6]

динамический массив, видимо, применить можно для хранения списка слов, которые надо искать

читать справку по Dynamic Arrays, SetLength
с консоли читать ReadLn


Наверх

Титульная страница Поиск, карта сайта Написать письмо