首页,感谢你的阅读,本人观点:学习编程是个漫长的过程并不是一时就会很厉害的,关键是坚持,快乐地学习,在这里分享我的一些笔记给你(转载于:http://www.gdtarena.com);
如果能巧妙地运用数组会给我们带来很多方便;以下是我的一些用法,还觉得自己每掌握它的精髓;希望大家多多指点;(现丑了)
void ) __declspec(dllexport) myList::ReadList(AnsiString TS)
{//读出ini文件的数据
System::AnsiString LabPath=ExtractFilePath(".\\");
TIniFile *LabIni=new TIniFile(LabPath+"LabIni.ini");
Form2->AddList();
for(int i=0;i<Form2->LabelList->Count;i++)
{
TLabel *Lab;
Lab=(TLabel *)Form2->LabelList->Items[i];
Lab->Left=LabIni->ReadInteger(TS,"Left"+IntToStr(i), Lab->Left);
Lab->Top=LabIni->ReadInteger(TS,"Top"+IntToStr(i),Lab->Top);
}
}
void myList::WriteList(AnsiString TS)
{//写入文件
System::AnsiString LabPath=ExtractFilePath(".\\");
TIniFile *LabIni=new TIniFile(LabPath+"LabIni.ini");
Form2->AddList();
for(int i=0;i<Form2->LabelList->Count;i++)
{
如果能巧妙地运用数组会给我们带来很多方便;以下是我的一些用法,还觉得自己每掌握它的精髓;希望大家多多指点;(现丑了)
void ) __declspec(dllexport) myList::ReadList(AnsiString TS)
{//读出ini文件的数据
System::AnsiString LabPath=ExtractFilePath(".\\");
TIniFile *LabIni=new TIniFile(LabPath+"LabIni.ini");
Form2->AddList();
for(int i=0;i<Form2->LabelList->Count;i++)
{
TLabel *Lab;
Lab=(TLabel *)Form2->LabelList->Items[i];
Lab->Left=LabIni->ReadInteger(TS,"Left"+IntToStr(i), Lab->Left);
Lab->Top=LabIni->ReadInteger(TS,"Top"+IntToStr(i),Lab->Top);
}
}
void myList::WriteList(AnsiString TS)
{//写入文件
System::AnsiString LabPath=ExtractFilePath(".\\");
TIniFile *LabIni=new TIniFile(LabPath+"LabIni.ini");
Form2->AddList();
for(int i=0;i<Form2->LabelList->Count;i++)
{