Delphi 7中如何修改Form1: TForm1;

Delphi 7中如何修改Form1: TForm1;

 1]选中对应的Form,
 2]在Object Inspector里的Name修改,
 3]回车,即可.

Delphi的IDE对应做了以下五处修改:

{ ===================在.dpr=================== }
program  Project1;

uses
  Forms,
  Unit1 
in   ' Unit1.pas '   { DFGSDGF } ;//Unit1 in 'Unit1.pas' {Form1}; 第1/5处

{ $R *.res }

begin
  Application.Initialize;
  Application.CreateForm(TDFGSDGF, DFGSDGF);// Application.CreateForm(TForm1, Form1); 第2/5处
  Application.Run;
end .

{ ===================在.pas=================== }
unit  Unit1;

interface

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

type
  TDFGSDGF 
=   class (TForm) //TForm1 = class(TForm) 第3/5处
  
private
    
{  Private declarations  }
  
public
    
{  Public declarations  }
  
end ;

var
  DFGSDGF: TDFGSDGF;   //Form1: TForm1; 第4/5处


implementation

{ $R *.dfm }

end .

{ ====================在.dfm=================== }
object DFGSDGF: TDFGSDGF  //object Form1: TForm1 第5/5处
  Left 
=   251
  Top 
=   99
  Width 
=   696
  Height 
=   480
  Caption 
=   ' DFGSDGF '
  Color 
=  clBtnFace
  Font.Charset 
=  DEFAULT_CHARSET
  Font.Color 
=  clWindowText
  Font.Height 
=   - 11
  Font.Name 
=   ' MS Sans Serif '
  Font.Style 
=  []
  OldCreateOrder 
=  False
  PixelsPerInch 
=   96
  TextHeight 
=   13
end

转载于:https://www.cnblogs.com/tulater/archive/2009/03/22/1419157.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值