40 lines
787 B
Plaintext
40 lines
787 B
Plaintext
unit CreditFormUnit;
|
|
{-------------------------------------------------------------------------------
|
|
Credits Form
|
|
Shows credits.
|
|
|
|
---------------------------------------------
|
|
reSource v2.6
|
|
Copyright (C) 1998-2001 Victor Kasenda / gruv
|
|
http://go.to/gruv
|
|
email: vickas@singnet.com.sg
|
|
---------------------------------------------
|
|
|
|
-------------------------------------------------------------------------------}
|
|
|
|
|
|
interface
|
|
|
|
uses
|
|
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
|
|
StdCtrls;
|
|
|
|
type
|
|
TCreditsForm = class(TForm)
|
|
Memo1: TMemo;
|
|
Button1: TButton;
|
|
private
|
|
{ Private declarations }
|
|
public
|
|
{ Public declarations }
|
|
end;
|
|
|
|
var
|
|
CreditsForm: TCreditsForm;
|
|
|
|
implementation
|
|
|
|
{$R *.DFM}
|
|
|
|
end.
|