oneform.pas

来自「可以做出类似netants的那种窗体左右弹出效果」· PAS 代码 · 共 24 行

unit OneForm;

interface

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

type
  TFormOneForm = class(TForm)
    LabelText: TLabel;
  private
  public
  end;

var
  FormOneForm: TFormOneForm;

implementation

{$R *.DFM}

end.