[첫번째]어쩌구 저쩌구 ....처음이다.
[두번째]또 어쩌구 저쩌구 두번째네.
[세번째]세번째 선택됬네..
... ...
위와 같은 형식으로 작성된 텍스트 문서파일 읽어서
ComboBox1->Text = 구분항목;
Edit1->Text = 항목내용;
으로 보여지게 할려고 하는데 잘 안돼네요. 코드 좀 봐주세요..
void __fastcall TForm1::FormCreate(TObject *Sender)
{
int nPos1 = 1;
int nPos2 = 1;
AnsiString sTitle[30];
AnsiString sCon[30];
String sFname="Report.txt";
TStringList *sLst = new TStringList;
sLst->LoadFromFile(sFname) ;
sLst->Sorted=true;
sLst->Duplicates=dupIgnore; // 정렬하면서 중복되는 데이타 삭제
for(int i=0;iCount;i++)
{
AnsiString temp = sLst->Strings[i];
while(temp != "")
{
nPos1 = temp.Pos("["); //[위치를 찾음
nPos2 = temp.Pos("]");
if(nPos1)
{
sTitle[i] = temp.SubString(nPos1+1,nPos2-2);
sCon[i] = temp.SubString(nPos2+1,temp.Length());
}
}
}
ComboBox1->Text = sTitle[0];
Edit1->Text = sCon[0];
delete sLst;
}
|