![]() |
|
Модераторы: Poseidon, Snowy, bems, MetalFan |
![]()
|
|
||
|
|
| Svips |
|
|||
|
Unregistered |
Создаю типизированный файл в Delphi 6
Type TZapis = Record Family:String; Name:String; Ot:String; Date:String; end; var F : file of TZapis; И не рботает!! Помогите, пожалуйста. |
|||
|
||||
| p0s0l |
|
|||
![]() Г-н Посол ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 3668 Регистрация: 13.7.2003 Где: 58°38' с.ш. 4 9°41' в.д. Репутация: 58 Всего: 112 |
Вместо String используй ShortString
-------------------- С уважением, г-н Посол. |
|||
|
||||
| p0s0l |
|
|||
![]() Г-н Посол ![]() ![]() ![]() ![]() Профиль Группа: Экс. модератор Сообщений: 3668 Регистрация: 13.7.2003 Где: 58°38' с.ш. 4 9°41' в.д. Репутация: 58 Всего: 112 |
Или же если у тебя строки > 255 символов, то придется либо
а) создавать свой тип статической строки:
б) использовать нетипизированные файлы и записывать каждое поле вручную в) в данном случае можно использовать текстовый файл (var F : TextFile) и также записывать/считывать каждое поле по-отдельности -------------------- С уважением, г-н Посол. |
|||
|
||||
| DriveSoftware |
|
|||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 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; Вот так будет |
|||
|
||||
| beif |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 154 Регистрация: 25.8.2003 Где: Россия, Кемерово Репутация: нет Всего: 1 |
Svips, у тебя же все поля текстовые, так что зачем тебе типизированный фалй
Юзай текстовый файл, какp0s0l предложил, а там вообще все предельно просто и без заморочек. Да и занимать текстовый файл будет гораздо меньше, чем типизированный. Если, допустим, Name='beif'; - 4 символа, то в текстовом файле это и будут 4 байта, а в типизированным столько, сколько отведено максимум (256 байт или еще что-нить)... Так что, если типизированный файл не обязателен, то используй текстовый |
|||
|
||||
| beif |
|
|||
![]() Бывалый ![]() Профиль Группа: Участник Сообщений: 154 Регистрация: 25.8.2003 Где: Россия, Кемерово Репутация: нет Всего: 1 |
P.S. А что за опрос-то? В чем его суть?)
|
|||
|
||||
![]()
|
| Правила форума "Delphi: Общие вопросы" | |
|
|
Запрещается! 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами
Если Вам понравилась атмосфера форума, заходите к нам чаще! С уважением, Snowy, MetalFan, bems, Poseidon, Rrader. |
| 0 Пользователей читают эту тему (0 Гостей и 0 Скрытых Пользователей) | |
| 0 Пользователей: | |
| « Предыдущая тема | Delphi: Общие вопросы | Следующая тема » |
|
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |