0

我在以下单元代码中所做的事情有什么问题？

当我运行此代码时，表单冻结，没有消息输出。

//---------------------------------------------------------------------------

#include <vcl.h>
#include <map.h>
#pragma hdrstop

#include "Unit1.h"

//---------------------------------------------------------------------------
#pragma package(smart_init)
#pragma resource "*.dfm"
TForm1 *Form1;
//---------------------------------------------------------------------------
__fastcall TForm1::TForm1(TComponent* Owner)
    : TForm(Owner)
{
}
//---------------------------------------------------------------------------
void __fastcall TForm1::btn1Click(TObject *Sender)
{
    typedef multimap<AnsiString,int> TMM;
    TMM mm1;
    mm1.insert(TMM::value_type("Vasya Vasya",1954));
    mm1.insert(TMM::value_type("Ivan Petr",1985));
    mm1.insert(TMM::value_type("Hasan Husein",1983));
    mm1.insert(TMM::value_type("Julia Mck",1982));

    AnsiString s="";
    TMM::iterator it=mm1.begin();
    while (it!=mm1.end())
    {
        s+=(*it).first+ "-"+ IntToStr((*it).second)+"\n";
    }
    ShowMessage(s);



}
//---------------------------------------------------------------------------
4

1 回答 1

2

您需要在 while 循环内增加迭代器

于 2011-11-30T19:49:32.040 回答