Модераторы: Poseidon, Snowy, bems, MetalFan
  

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Типизированный файл? Не могу сделать. 
:(
    Опции темы
 
Типизированный файл?
1 [ 1 ]  [50.00%]
2 [ 1 ]  [50.00%]
Всего проголосовавших: 2
В этом опросе возможен один вариант ответа
Гости не могут голосовать 
Svips
Дата 23.11.2003, 12:39 (ссылка)    |    (голосов: 0) Загрузка ... Загрузка ... Быстрая цитата Цитата


Unregistered











Создаю типизированный файл в Delphi 6

Type TZapis = Record
Family:String;
Name:String;
Ot:String;
Date:String;
end;


var
F : file of TZapis;

И не рботает!! Помогите, пожалуйста.

  Вверх
p0s0l
Дата 23.11.2003, 13:02 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



Вместо String используй ShortString


--------------------
С уважением, г-н Посол.
PM   Вверх
p0s0l
Дата 23.11.2003, 13:06 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Г-н Посол
****


Профиль
Группа: Экс. модератор
Сообщений: 3668
Регистрация: 13.7.2003
Где: 58°38' с.ш. 4 9°41' в.д.

Репутация: 58
Всего: 112



Или же если у тебя строки > 255 символов, то придется либо
а) создавать свой тип статической строки:
Код
Type TMyString = array [0..1023] of char;
Type TZapis = Record
Family:TMyString;
Name:TMyString;
Ot:TMyString;
Date:TMyString;
end;

б) использовать нетипизированные файлы и записывать каждое поле вручную
в) в данном случае можно использовать текстовый файл (var F : TextFile) и также записывать/считывать каждое поле по-отдельности


--------------------
С уважением, г-н Посол.
PM   Вверх
DriveSoftware
Дата 23.11.2003, 19:27 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Опытный
**


Профиль
Группа: Участник
Сообщений: 291
Регистрация: 17.3.2003

Репутация: нет
Всего: 4





Type TZapis = Record
Family:String [255];
Name:String [255];
Ot:String [255];
Date:String [255];
end;


var
F : file of TZapis;

Вот так будет
PM MAIL WWW ICQ   Вверх
beif
Дата 24.11.2003, 15:13 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 154
Регистрация: 25.8.2003
Где: Россия, Кемерово

Репутация: нет
Всего: 1



Svips, у тебя же все поля текстовые, так что зачем тебе типизированный фалйconfused.gif
Юзай текстовый файл, какp0s0l предложил, а там вообще все предельно просто и без заморочек. Да и занимать текстовый файл будет гораздо меньше, чем типизированный.
Если, допустим, Name='beif'; - 4 символа, то в текстовом файле это и будут 4 байта, а в типизированным столько, сколько отведено максимум (256 байт или еще что-нить)...

Так что, если типизированный файл не обязателен, то используй текстовый smile.gif
PM MAIL WWW ICQ   Вверх
beif
Дата 24.11.2003, 15:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Бывалый
*


Профиль
Группа: Участник
Сообщений: 154
Регистрация: 25.8.2003
Где: Россия, Кемерово

Репутация: нет
Всего: 1



P.S. А что за опрос-то? В чем его суть?)
PM MAIL WWW ICQ   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi: Общие вопросы"
SnowyMetalFan
bemsPoseidon
Rrader

Запрещается!

1. Публиковать ссылки на вскрытые компоненты

2. Обсуждать взлом компонентов и делиться вскрытыми компонентами

  • Литературу по Дельфи обсуждаем здесь
  • Действия модераторов можно обсудить здесь
  • С просьбами о написании курсовой, реферата и т.п. обращаться сюда
  • Вопросы по реализации алгоритмов рассматриваются здесь
  • 90% ответов на свои вопросы можно найти в DRKB (Delphi Russian Knowledge Base) - крупнейшем в рунете сборнике материалов по Дельфи


Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader.

 
0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей)
0 Пользователей:
« Предыдущая тема | Delphi: Общие вопросы | Следующая тема »


 




[ Время генерации скрипта: 0.0442 ]   [ Использовано запросов: 24 ]   [ GZIP включён ]


Реклама на сайте     Информационное спонсорство

 
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности     Powered by Invision Power Board(R) 1.3 © 2003  IPS, Inc.