main3.pas

一款功能非常强大的mp3播放器

unit main3;

interface

uses
  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, SUIEdit, ExtCtrls, SUIForm, ScrollText;

type
  TForm3 = class(TForm)
    suiForm1: TsuiForm;
    text: TScrollText;
    procedure FormCreate(Sender: TObject);

  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form3: TForm3;

implementation

{$R *.dfm}

procedure TForm3.FormCreate(Sender: TObject);
begin
text.ScrollText:='            谢谢大家使用小强的超级播放器'+#13#10+#13#10+'            这是我自学DELPHI以来第一次写'+#13#10+#13#10+'            的程序,如果有什么不好的地方请'+#13#10+#13#10+'            大家给我多多提出意见.本软件是'+#13#10+#13#10+'            一个自由软件,你可以任意思传播'+#13#10+#13#10+'            你也可以任意修改,修改时请注明'+#13#10+#13#10+'            原作者,如果你有什么好的建议可'+#13#10+#13#10+'            以和我联系,嗯我的联系方式如下'+#13#10+#13#10+'            我的QQ:77088190'+#13#10+#13#10+'            我的E-MAIL:[e-mail]'+#13#10+#13#10+'            欢迎你来和我提意见'+#13#10+#13#10+'                                   周国强'+#13#10+#13#10+'                                2005.8.28';
end;



end.