Главная страница
    Top.Mail.Ru    Яндекс.Метрика
Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];

Вниз

Работа с динамическим массивом   Найти похожие ветки 

 
YGINE ©   (2006-05-18 21:53) [0]

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


 
Desdechado ©   (2006-05-18 22:08) [1]

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

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


 
DevilDevil ©   (2006-05-18 23:44) [2]

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

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 - Не Динамические Массивы


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

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


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

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


 
Desdechado ©   (2006-05-19 11:09) [5]

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

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

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


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


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

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



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

Форум: "Начинающим";
Текущий архив: 2006.06.04;
Скачать: [xml.tar.bz2];

Наверх





Память: 0.46 MB
Время: 0.054 c
15-1147418488
Думкин
2006-05-12 11:21
2006.06.04
А вы говорите...


3-1145011975
Владимир
2006-04-14 14:52
2006.06.04
Проблема в MySQL с Regexp и кодеровкой cp1251.


15-1147237100
Ega23
2006-05-10 08:58
2006.06.04
С Днём рождения! 8 мая


2-1147758315
Teddy24
2006-05-16 09:45
2006.06.04
Как из TDateTime извлеч только год?


15-1147352220
alex-drob
2006-05-11 16:57
2006.06.04
Сохранить переменную типа TList





Afrikaans Albanian Arabic Armenian Azerbaijani Basque Belarusian Bulgarian Catalan Chinese (Simplified) Chinese (Traditional) Croatian Czech Danish Dutch English Estonian Filipino Finnish French
Galician Georgian German Greek Haitian Creole Hebrew Hindi Hungarian Icelandic Indonesian Irish Italian Japanese Korean Latvian Lithuanian Macedonian Malay Maltese Norwegian
Persian Polish Portuguese Romanian Russian Serbian Slovak Slovenian Spanish Swahili Swedish Thai Turkish Ukrainian Urdu Vietnamese Welsh Yiddish Bengali Bosnian
Cebuano Esperanto Gujarati Hausa Hmong Igbo Javanese Kannada Khmer Lao Latin Maori Marathi Mongolian Nepali Punjabi Somali Tamil Telugu Yoruba
Zulu
Английский Французский Немецкий Итальянский Португальский Русский Испанский