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

Поиск:

Ответ в темуСоздание новой темы Создание опроса
> Аргумент процедуры - файловая переменная 
:(
    Опции темы
mr.Anderson
Дата 3.9.2005, 10:24 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


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

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



Как передать процедуре в аргументе ЛЮБУЮ файловую переменную, т.е. она должна принимать и переменные, созданные с помощью File of (типизированные), и переменные текстовых (Var a: Text) и нетипизированных файловых переменных?


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
volvo877
Дата 3.9.2005, 10:44 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 2
Всего: 116



Смысл такой функции в чем состоит, можно узнать? Напрямую такого сделать не удастся, да и не нужно. Ведь функции обработки файлов разных типов различны...

Объясни, зачем это тебе понадобилось, может, есть другое решение проблемы.
PM MAIL   Вверх
mr.Anderson
Дата 3.9.2005, 11:29 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


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

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



Смысл... Ну, вот пример: дается файл (неизвестного заранее типа - типизированный, текстовый, нетипизированный). Надо через процедуру его очистить.

Это сообщение отредактировал(а) sim7 - 3.9.2005, 11:29


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
volvo877
Дата 3.9.2005, 11:53 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 2
Всего: 116



Что значит
Цитата(sim7 @ 3.9.2005, 11:29)
дается файл
?
Ты же получаешь имя этого файла? Так тебя просто не должно интересовать, как файл был создан, тебе достаточно ОТКРЫТЬ файл как File и очистить его:
Код
Var f: File;
...
Assign(f, name);
ReWrite(f);


PM MAIL   Вверх
mr.Anderson
Дата 3.9.2005, 12:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


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

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



А что это за File? Такой тип разве есть? Я знаю File of ..., но там с типом, а для чего File используется тогда?


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
volvo877
Дата 3.9.2005, 13:16 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 2
Всего: 116



Цитата(sim7 @ 3.9.2005, 12:26)
Такой тип разве есть?

Есть, конечно... Это так называемый "бестиповый файл", то есть файл, из которого можно читать/писАть данные, не задумываясь об их типе...
PM MAIL   Вверх
mr.Anderson
Дата 3.9.2005, 13:26 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


iOS Lead Developer
****


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

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



Ух ты. Значит, в принципе, им всегда и надо пользоваться?


--------------------
user posted image

user posted image
PM MAIL ICQ Skype   Вверх
volvo877
Дата 3.9.2005, 14:15 (ссылка) | (нет голосов) Загрузка ... Загрузка ... Быстрая цитата Цитата


Эксперт
****


Профиль
Группа: Комодератор
Сообщений: 2073
Регистрация: 15.11.2004

Репутация: 2
Всего: 116



Ну почему же "всегда"? Если у тебя есть такой, например, тип:
Код
Type 
  TRec = Record
    X, Y, Z: Integer;
  End;

и ты хочешь хранить в файле ТОЛЬКО элементы этого типа, то нет смысла работать с файлом как бестиповым, лучше работать с File Of TRec... А вот если тебе надо отрисовать, например, BMP-файл, для чего сначала надо прочитать его заголовок, и в зависимости от прочтенных данных работать дальше с массивами разных размеров, то тут как раз и проявляются преимущества типа File.
PM MAIL   Вверх
  
Ответ в темуСоздание новой темы Создание опроса
Правила форума "Delphi"
THandle
Rrader
volvo877

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

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

2. Публиковать ссылки на варез

3. Оффтопить

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

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

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


 




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


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

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