-
本版专家分：35结帖率 98.57% -
TFileStream * stream=new TFileStream("c\\test.smt",fmCreate|fmOpenWrite);
stream->WriteComponent(Edit1);
delete stream;
这段代码只能写一个edite1到文件
如果我有多个edit1还有IMAGE1那应如何才能全写入文件
![]()
-
本版专家分：9993 -
TFileStream *stream = new TFileStream("C:\\test.smt",fmcreate|fmOpenWrite);
for(int i = 0;i<=this->Components->Count -1;i++)
stream->WriteComponent(this->Components[i]);
delete stream;
-
本版专家分：44373
-
-
红花
2002年9月 C++ Builder大版内专家分月排行榜第一
2002年8月 C++ Builder大版内专家分月排行榜第一
2002年4月 C++ Builder大版内专家分月排行榜第一
2002年3月 C++ Builder大版内专家分月排行榜第一
-
-
黄花
2002年7月 C++ Builder大版内专家分月排行榜第二
2002年2月 C++ Builder大版内专家分月排行榜第二
-
-
WriteComponent
ReadComponent
-
本版专家分：61
-
请看这俩个函数
AnsiString CToString(TComponent *c)
{
TMemoryStream* ms;
TStringStream* ss;
ss = new TStringStream(" ");
ms = new TMemoryStream;
try{
ms->WriteComponent(c);
ms->Position = 0;
ObjectBinaryToText(ms, ss);
ss->Position = 0;
return ss->DataString;
}
__finally
{
delete ms;
delete ss;
}
return ss->DataString;
}
//---------------------------------------------------------------------------
TComponent* StringToComponent(AnsiString as)
{
TMemoryStream* pms = new TMemoryStream();
TStringStream* pss = new TStringStream(as);
TComponent *pc;
try
{
ObjectTextToBinary(pss, pms);
pms->Seek(0, soFromBeginning);
}
catch(...)
{
ShowMessage("Streaming error.");
}
pc = pms->ReadComponent(NULL);
delete pms;
delete pss;
return pc;
}
关键是用流ReadComponent和WriteComponent枚举窗体上的控件保存成string 再从STRING 到COMPONENT。
-
本版专家分：61
-
当然有些控件如MEMO你的用类似下面的函数读回，我就是这么做的
先定义
TMemo *me=TMemo(this);
在把me放在函数中
void StringToComponent1(TComponent* Component,const AnsiString& Value)
{
TStringStream* ss;
TMemoryStream* ms;
ss = new TStringStream(Value);
try
{
ms = new TMemoryStream;
try
{
ObjectTextToBinary(ss, ms);
ms->Position = 0;
ms->ReadComponent(Component);
}
__finally
{
delete ms;
}
}
__finally
{
delete ss;
}
}