语句之间的区别:

Question

If Sender=Button1 Then 
If Sender=button2 ThenTbutton(Sender)...(Sender As TButton)...这三个语句有什么区别?各代表什么意思?

Answer 1

If Sender=Button1 Then 
If Sender=button2 Then
判断当前对象sender是button1或者button2 对象
Tbutton(Sender)...(Sender As TButton)...
这两个都是将对象转换为tbutton类，其中Tbutton(Sender)...是强制类型转换，建议使用(Sender As TButton)...这种类型转换

Answer 2

If Sender=Button1 Then 
If Sender=button2 Then 
判断sender对象是Tbutton(Sender):强制类型转换，将sender——>button
第三句同第二句

Answer 3

If Sender=Button1 Then 
If Sender=button2 Then
//判断当前的sender是button1或者button2。
Tbutton(Sender)...
//强制将sender转换为Tbutton类型，但如果sender本身不是tbutton类型，则会导致错误。
(Sender As TButton)...
//也是强制将sender转换为tbutton类型。