⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 about.pas.svn-base

📁 TFormDesigner allows you move and resize any control on your form. You need not prepare your form to
💻 SVN-BASE
字号:
(*  GREATIS FORM EXTRACTOR for           *)
(*  GREATIS FORM DESIGNER PRO            *)
(*  Copyright (C) 2002 Greatis Software  *)
(*  http://www.greatis.com/formdes.htm   *)
(*  b-team@greatis.com                   *)

unit About;

interface

uses
  SysUtils, Windows, Messages, Classes, Graphics, Controls,
  StdCtrls, ExtCtrls, Forms, ShellAPI;

type
  TfrmAbout = class(TForm)
    pnlTop: TPanel;
    pnlCopyrigth: TPanel;
    btnClose: TButton;
    pnlWeb: TPanel;
    lblName: TLabel;
    lblVersion: TLabel;
    procedure pnlLinkClick(Sender: TObject);
  end;

implementation

{$R *.DFM}

procedure TfrmAbout.pnlLinkClick(Sender: TObject);
begin
  ShellExecute(0,'open',PChar(GetShortHint((Sender as TPanel).Hint)),'','',SW_SHOW);
end;

end.

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -