如何分类保存图片和文字信息到指定的DAT文件并进行成批读写操作

Question

如何分类保存图片和文字信息到指定的DAT文件并进行成批读写操作
如何将图片和图片的文字注解分别存入两个文件,
文字注解文件名:Library.dat
图片信息文件名:Image.dat
图片文件如下:文字注解信息如下:
这是图片信息说明文件,显示图片展览SDFDSFDSFSD
这是图片信息说明文件,显示图片展览SDFDSFDSFSD
这是图片信息说明文件,显示图片展览SDFDSFDSFSD
这是图片信息说明文件,显示图片展览SDFDSFDSFSD

Answer 1

文字注解文件名:Library.dat 
图片信息文件名:Image.dat 
上面两文件不用ACCESS数据库,想在DAT这个文件进行保存及
相关的添加\删除\修改\更新\查询等'操作呀

Answer 2

文字注解文件名:Library.dat 这个数据库文件,
我已经处理完成前部分,就是和图片文件保存信息同步不行

Answer 3

我想分别保存到两个文件中
文字信息:library.dat
图片信息:image.dat  这两个不ACCESS格式的,写入与读取信息都能同步
有的信息带有图片,有的信息不带图片

Answer 4

就用TBlobField型字段，用流保存到这个字段中
使用方法就是下面几个
  TBlobField(字段).LoadFromFile();
  TBlobField(字段).SaveToFile();
  TBlobField(字段).LoadFromStream();
  TBlobField(字段).SaveToStream();

Answer 5

我想编写一个文件编辑器,功能:保存文字和图片
保存到两个文件中 
文字信息:library.dat 这个文件我已处理好
图片信息:image.dat  这两个不ACCESS格式的,写入与读取信息都能同步 
有的信息带有图片,有的信息不带图片,如下
1)fsdfjklsdfsdfsdfsdf
sdfsdfsdfsd                  图片A
sdfdsfsdf
sdfdsfsdf
SDFDSF
2)DSFJSDLFJKLSDFKLSDJKLF
SDFDSFSDFSDFSDFDSFDSFSDF
DSFDSFSDFDSFDSFDSFDSFDSF
SDFDSFDS
SDFDFSDFSDFDS
3)DSLKFJLKDSJFKLDSJFSD
FSDFDSFSDFSDF
SDFSDFSDFSDF             图片
SDFDSFSDFDSFDSFDS
SDFSDFDSFSDF
//======================================
文字信息:library.dat 这个文件我已处理好
图片信息:image.dat 

Answer 6

把團片的轉化為字符流，然后保存到Image.Dat。做法與你library類似。只是寫入時要轉化為字符流，讀出時再做轉化
1、轉化為字符串，如：
  StringStream.CopyFrom(團片二進制流,大小);
  Result := StringStream.DataString; 
2、讀出字符串，與你操作library.dat類似
var
  ss : TStringStream;
  ms: TMemoryStream;
begin
  ...
  ss := TStringStream.Create(從Image.Dat中讀出的某個團片字串);
  ms := TMemoryStream.Create;
  ms.CopyFrom(ss,ss.Size);
  ms.postion := 0;
  //顯示圖片
  image1.picture.Bitmap.LoadFromStream(ms); 
  image1.update;
...
  
    

Answer 7

我想在文字信息的尾部+标识符
我想编写一个文件编辑器,功能:保存文字和图片 
保存到两个文件中 
文字信息:library.dat 这个文件我已处理好 
图片信息:image.dat  这两个不ACCESS格式的,写入与读取信息都能同步 
有的信息带有图片,有的信息不带图片,如下 
1)fsdfjklsdfsdfsdfsdf 
sdfsdfsdfsd                  图片A 
sdfdsfsdf 
sdfdsfsdf 
SDFDSF+* 
2)DSFJSDLFJKLSDFKLSDJKLF 
SDFDSFSDFSDFSDFDSFDSFSDF 
DSFDSFSDFDSFDSFDSFDSFDSF 
SDFDSFDS 
SDFDFSDFSDFDS 
3)DSLKFJLKDSJFKLDSJFSD 
FSDFDSFSDFSDF 
SDFSDFSDFSDF            图片 
SDFDSFSDFDSFDSFDS 
SDFSDFDSFSDF+*
/==================================
+* 这个标识符表示文字信息中带有图片,我的这个如何处理呀
将这个标识符写入到文字信息中吗,读取时如何截取呀?????

Answer 8

就是不用ACCESS数据库,如何进行索引那些图片呀

Answer 9

用stringlist保存時這樣：
strings[index]:= 標識（key或保持與library.dat中的一致）+'='+ 團片字串
...
stringlist.savetofile(dat放置路徑);加載時，
stringlist.names[標識].value，以取得圖片字串，得出字串後，利用我前面說的做法，進行轉換...dat格式中是這樣的：
標識（可以是1、2、3）= 123knduaishduhi3nnnm  ----等號後面是圖片字串

Answer 10

stringlist 这个控件,我没有找到呀,
我想用控件:memo1和image1这两个控件完成

Answer 11

抱歉，前面打出的stringlist的屬性有誤....stringlist.names[標識].value  應是stringlist.values[標識]stringlist不是控件，你在面板上面找不到的。應該是在classes，類名是TStringList。使用時，引用此單元，聲明變量後，再創建 sl := TStringList.Create;用memo也一樣，都繼承于TStrings
Memo1.LINES.Values[標識] 得出的是 等號後面的值
不過你用memo只是顯示那些文字說明而已

Answer 12

我刚才测试将图片保存到ACCESS的数据库做为记录是没有问题,
问题是我不想用ACCESS数据库

Answer 13

最好在窗体上一个memo1控件,若这个文字信息中有图片就加载到image中,
并将这两个关联后分别存入两个文件:
文字文件名:Text.dat
图片文件名:output.dat
读取时也根据关联,有图片就读取图片

Answer 14

给上实例程序吧,先谢谢了>>>>>>>>>>>>>>>>>>>