IPB
ЛогинПароль:

> ВНИМАНИЕ!

Прежде чем задать вопрос, смотрите FAQ.
Рекомендуем загрузить DRKB.

Наладить общение поможет, если вы подпишитесь по почте на новые темы в этом форуме.

 
 Ответить  Открыть новую тему 
> Словарь
сообщение
Сообщение #1





Группа: Пользователи
Сообщений: 7
Пол: Мужской

Репутация: -  0  +


Приветствую, интересует реализация дозаписи в открытый файл, работаю над проектом англо-русский словарь...


Прикрепленные файлы
Прикрепленный файл  Translete.zip ( 23.27 килобайт ) Кол-во скачиваний: 141
Прикрепленный файл  _______.txt ( 95 байт ) Кол-во скачиваний: 187
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


?
***

Группа: Пользователи
Сообщений: 283
Пол: Мужской

Репутация: -  4  +


поробуй построить свою програму так

//обявляем тип

Type
Tname= string[20]; //тип для слов
Trec = record
namber:integer; //переменная для подщета слов в словаре
rus : Tname;
usa : Tname;
end;
TrecArr = array [1..65000] of Trec;
Trecfile = file of Trec;
//обявим глобальную переменную для типизированого файла
Var f: Trecfile;

//добавление записи в файл
procedure newword(var f:trecFile; a:Trec); //передаем в процедуру переменную с данными
begin
//открываем файл для записи
reset(f);
seek(f,FileSize(f)); ставим файловый указатель в конец файла
write(f,a); записываем нашу переменную
end;


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


Сообщение отредактировано: amega -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3





Группа: Пользователи
Сообщений: 7
Пол: Мужской

Репутация: -  0  +


тема не актуальна справился с заданием, респет хорошим людям за помощь smile.gif
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 23.10.2021 8:30
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name