strsum.dpr

在一个QQ群的聊天中,朋友说让我统计下各人发言的次数。并把聊天记录（就在QQ的信息管理器里把该群的聊天记录导出为文本文件）发给了我。我的程序实现了输入某个该群里的QQ号码

program strsum;

uses
  Forms,
  sum_str in 'sum_str.pas' {Form1};

{$R *.res}

begin
  Application.Initialize;
  Application.CreateForm(TForm1, Form1);
  Application.Run;
end.