﻿<?xml version='1.0' encoding='UTF-8'?><rss version="2.0" xmlns:dc="http://purl.org/dc/elements/1.1/"><channel><title>Релиб / Программирование / Delphi  / Типизированный файл / Latest Posts</title><generator>InstantForum.NET v4.1.4</generator><description>Релиб</description><link>http://www.relib.com/forums/</link><webMaster>robot@relib.com</webMaster><lastBuildDate>Wed, 08 Oct 2008 12:14:09 GMT</lastBuildDate><ttl>20</ttl><item><title>RE: Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description>Проще, но необходимо реализовать именно, как я писал выше.</description><pubDate>Wed, 07 Jun 2006 12:52:32 GMT</pubDate><dc:creator>blaze</dc:creator></item><item><title>RE: Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description>А не проще ли БД использовать?Заиметь таблицы с БЛОБ полем и туда файло ложить/оттуда вытаскивать ?</description><pubDate>Mon, 05 Jun 2006 15:41:38 GMT</pubDate><dc:creator>vpanasenko</dc:creator></item><item><title>RE: Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description> Спасибо за ответы.&lt;BR&gt; Я для решения своей задачи стал использовать TMemoryStream, сначала все файлы сохраняю в этот MemoryStream, а потом пишу файл. В интернете есть статья "Как склеить несколько файлов в один". Есть недостатки некоторые в предложенном исходнике:&lt;BR&gt;-например, если фалов будет много, то будет задействован большой объем памяти, поэтому надо периодически сохранять файл, и далее дозаписывать в него. Вопрос в том, как дозаписать. Я еще не думал, но идеи есть. Если у кого есть свои идей, буду рад почитать.&lt;/P&gt;&lt;P&gt;-второй недостаток, это скорее не недостаток, а просто опять же еще не думал. Сохранить все файлы в один не трудно, для начала можно даже и без дозаписей, трудность потом извлечь эти файлы. Надо знать сколько фалов сохранено в один. Можно конечно писать первым фалом всякую необходимую информацию о том сколько фалов и их размеры, можно попробовать что-нибудь с EOF.&lt;/P&gt;&lt;P&gt; Одним словом, если есть какие предложения на эту тему пишите!&lt;BR&gt; Еще раз всем спасибо!</description><pubDate>Mon, 05 Jun 2006 11:25:42 GMT</pubDate><dc:creator>blaze</dc:creator></item><item><title>RE: Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description>на все есть свои ограничения. в том числе и на типированные файлы.&lt;/P&gt;&lt;P&gt;нельзя, например делать file of fille(и все что явно или неявно это предполагает)</description><pubDate>Mon, 05 Jun 2006 11:00:40 GMT</pubDate><dc:creator>vpanasenko</dc:creator></item><item><title>RE: Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description>fArray[1].Img.Pictu... должен быть с нуливого индекса тогда ругаться точно перестанет.&lt;br&gt;  TImage это класс который в файл по моему засунуть нельз.&lt;br&gt;  К томуже почему TTypeFile = File of Data ведь получается только один блок? Но тогда TTypeFile = File of TDataArray нельзя делать он должен быть полностью типизирован и ограничен.&lt;br&gt;  Подобными вещами я занимался но потом нашёл в нете что то готовое (какуюто компоненту) и там целый класс занимался загрузкой и выгрузкой.&lt;br&gt;</description><pubDate>Sun, 04 Jun 2006 19:17:49 GMT</pubDate><dc:creator>jon-jo</dc:creator></item><item><title>Типизированный файл</title><link>http://www.relib.com/forums/Topic898085-8-1.aspx</link><description>Подскажите, возможно ли в типизированный файл сохранять другие файлы?&lt;/P&gt;&lt;P&gt;Я пробовал в record добавить переменную Img: TImage:&lt;BR&gt;type&lt;BR&gt;   Data=record&lt;BR&gt;      Img: TImage;&lt;BR&gt;   end;&lt;BR&gt;TDataArray = Array of Data;&lt;/P&gt;&lt;P&gt;TTypeFile = File of Data;&lt;/P&gt;&lt;P&gt;Дальше пытался для начала в массив загрузить изображение&lt;BR&gt;...&lt;BR&gt;var&lt;BR&gt;   fArray: TDataArray;&lt;BR&gt;begin&lt;BR&gt;   SetLength(....&lt;BR&gt;   ...&lt;BR&gt;   fArray[1].Img.Picture.LoadFromFile('&amp;lt;путь к файлу&amp;gt;');&lt;BR&gt;И на этом этапе Delphi начинал ругаться.&lt;/P&gt;&lt;P&gt;Что не так, или такое вообще нельзя сделать и надо использовать TMemoryStream для таких веще?</description><pubDate>Sun, 04 Jun 2006 14:59:44 GMT</pubDate><dc:creator>blaze</dc:creator></item></channel></rss>