VFP 愛用者社區

guku1101 · 註冊時間: 2006-07-03 文章: 84 來自: 高雄 第 1 樓

為何我在form的init裡加入THISFORM.ADDOBJECT('mm',"Commandbutton")
他都沒增加進去耶~請問我哪裡做錯了嗎~~謝謝

guku1101 · 發表於: 星期五六月 15, 2007 1:49 pm 文章主題:

我知道原因了~我沒定義button 另一問我如何在加入的conmnandbutton的click裡加入幾行指令呢例如:thisform.text1.value=this.caption

garfield · 發表於: 星期五六月 15, 2007 2:33 pm 文章主題:

梆定事件
BINDEVENT(THISFORM.mm,"Click",THISFORM.事先定義的程式,"Click")

你如果喜歡動態加入程式,
去下載 oop 書來看看
http://vfp.sunyear.com.tw/viewtopic.php?t=3921

guku1101 · 發表於: 星期五六月 15, 2007 9:58 pm 文章主題:

嗯嗯~謝謝前輩的指導~正努力研究中~感恩

guku1101 · 發表於: 星期六六月 16, 2007 3:40 am 文章主題:

前輩我的程式如下,但您所說的事先定義的程式我真的不知如何加麻請再指導一下
thisform.AddObject("command1","commandbutton")
thisform.command1.Top=3
thisform.command1.Left=3
thisform.command1.Caption="MMM"
thisform.command1.Visible=.t.
thisform.command1.Height =80
thisform.command1.Width=80

做完commandbutton後我想在這個button的click event 加入下列指令:
thsifom.text1.value=this.caption
懇求前輩詳細指導一下~感激不盡

garfield · 發表於: 星期一六月 18, 2007 11:15 am 文章主題:

先搜尋 BINDEVENT
研究這篇 http://vfp.sunyear.com.tw/viewtopic.php?t=2397&highlight=BINDEVENT
如有疑問再討論.