我试了怎么是好的,我用的是delphi 6.0
解决方案 »
- 大家过来看看这个怎么做
- 屏幕坐标转换的问题,怎么在ReportBuilder中计算Mouse点击时对于报表的坐标
- 大家来帮忙,出出主意,共享200M免费空间。
- 重分请教:关于制作自定义报表的问题!!!
- 谁有fastreport的注册码 急用! 在线等待!!!
- 请问filelistbox,directorylistbox这两个控件在哪个选项卡里面?很着急!!!!
- 编写一个客户管理程序,有没有必要用3层?
- 请问在D5+ADO+ACCESS的程序中是否还需要BDE?如何手工打包BDE?
- 來送分羅,一個簡單的觸發器問題
- 苍天无眼啊,黑夜中,我独行......
- 关于web发布的问题??????
- 如何使两台互连的电脑能自由上网,不受另一方的限制
unit Unit1;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls;
type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;
var
Form1: TForm1;
implementation
{$R *.DFM}
procedure TForm1.FormCreate(Sender: TObject);
begin
self.Button1.Enabled:=false;
end;end.
要到formpaint的才会画出这个按钮时才生成这个按钮
那时设置才有效
unit Unit1;interfaceuses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls;type
TForm1 = class(TForm)
Button1: TButton;
procedure FormCreate(Sender: TObject);
private
{ Private declarations }
public
{ Public declarations }
end;var
Form1: TForm1;implementation{$R *.dfm}procedure TForm1.FormCreate(Sender: TObject);
begin
button1.enabled:= false;
end;end.