请教个delphi问题

jarsen_wen 2012-03-08 09:18:18
frame中只有一个checkbox1,form中有一个button1和panel1,form中动态调frame,按下button1,checkbox1.enable :=false;谁能帮我写下不
...全文
114 7 打赏 收藏 转发到动态 举报
AI 作业
写回复
用AI写文章
7 条回复
切换为时间正序
请发表友善的回复…
发表回复
xyxhz 2012-03-14
  • 打赏
  • 举报
回复
对头,自己多试试就可以解决,这不是很难的问题
山东蓝鸟贵薪 2012-03-13
  • 打赏
  • 举报
回复
是不是 控件被隐藏了呀
Delphi程序猿 2012-03-13
  • 打赏
  • 举报
回复
正确调用frame后,只需要在button的click事件中写:
frame.checkbox.enabled := not frame.checkbox.enabled;

这样就可以实现点击button,checkbox的enabled会发生变化。
都先生 2012-03-09
  • 打赏
  • 举报
回复
这种实现,建议楼主自己看书解决哦
kaikai_kk 2012-03-08
  • 打赏
  • 举报
回复
Frame1.CheckBox1.Enabled := false;
我看见佛 2012-03-08
  • 打赏
  • 举报
回复
建一个Frame1,和Form1,在Frame上放上CHECKBOX
unit Unit1;

interface

uses
Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,
Dialogs, StdCtrls, ExtCtrls,Unit2;//Unit2为TFrame1;

type
TForm1 = class(TForm)
Panel1: TPanel;
Button1: TButton;
procedure FormCreate(Sender: TObject);
procedure Button1Click(Sender: TObject);
private
{ Private declarations }
public
Frame1:TFrame1;
end;

var
Form1: TForm1;

implementation

{$R *.dfm}

procedure TForm1.FormCreate(Sender: TObject);
begin
Frame1 := TFrame1.Create(self);
Frame1.Parent := Form1;
end;

procedure TForm1.Button1Click(Sender: TObject);
begin
Frame1.CheckBox1.Enabled := false;
end;

end.
金卯刀 2012-03-08
  • 打赏
  • 举报
回复
你的frame放在哪里?

5,928

社区成员

发帖
与我相关
我的任务
社区描述
Delphi 开发及应用
社区管理员
  • VCL组件开发及应用社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧