ychatu6.pas

来自「Yahoo Messenger for Mobile」· PAS 代码 · 共 47 行

unit YchatU6;

interface

uses
  Windows, Messages, SysUtils,  Classes, Graphics, Controls, Forms,
  Dialogs, StdCtrls, ComCtrls, DynamicSkinForm;

type
  TForm6 = class(TForm)
    RichEdit1: TRichEdit;
    procedure FormCreate(Sender: TObject);
  private
    { Private declarations }
  public
    { Public declarations }
  end;

var
  Form6: TForm6;

implementation

{$R *.dfm}

procedure TForm6.FormCreate(Sender: TObject);
begin
 Richedit1.Lines.Add('Credits - Final Release Jan 14th 2007');
 Richedit1.Lines.Add('');
 Richedit1.Lines.Add('My Wife for not killing me. And helping with the Source code and creating the website :X');
 Richedit1.Lines.Add('');
 Richedit1.Lines.Add('Tripz/Just/Tink for hosting Sparta, for testing out all the new builds and showing them yahelite users just what they are :)');
 Richedit1.Lines.Add('TDKMan for for help with the Fader routine');
 Richedit1.Lines.Add('Tripz again for all his help with Y!mLite');
 Richedit1.Lines.Add('x_testicular_fortitude_x - for helping to find a tricky bug!');
 Richedit1.Lines.Add('dawncloud88 for lots of help and suggestions not only that but she helped me debug the PM''s :)');
 Richedit1.Lines.Add('Meandmy45s for all his help in trying to find out why /update does not work for a handfull of people across yahoo - Thanks..');
 Richedit1.Lines.Add('The Anti Booter Routine Was Discovered on the 14th December 2006 by Craig (Me) craig.su / tobjectpascal /cjdelphi Just so we''re clear on that, Yahelite, Yazak, does not currently have this feature lol');
 Richedit1.Lines.Add('Maestro_mark for his idea to put sheep icons in the chatter list next to yahelite users');
 Richedit1.Lines.Add('This is it, so concludes Y!mLite, 6 years of work, it''s been fun and educational, now it''s time to move on.');
 Richedit1.Lines.Add('');
 Richedit1.Lines.Add('------Supporters--------');
 Richedit1.Lines.Add('Tomahawk - for his Proxy support and helping me to test it.');
end;

end.