G Grape Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #1 请问Delphi中as操作在BCB中有没有相应的操作符 就是说 （Object as TButton）.Tag :=1 这句话在BCB中怎么写？ 谢谢了！
S Sachow Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #3 我用这个： dynamic_cast<TButton *>(Object)->Tag = 1;
G Grape Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #4 我再把问题说具体一点吧 在Delphi下这么一个过程 procedure Button1Click(Sender: TObject); begin ShowMessage(IntToStr((Sender as TButton).Tag)); end; 在BCB下怎么写？ 上面两位的解答我在BCB下试了试，好像都出错了，很可能是我没看懂吧（*^_^*） BTW:BCB的帮助真是TMD的臭。我在BCB下查as居然出来的是Delphi的帮助。 请各位指教啊！
我再把问题说具体一点吧 在Delphi下这么一个过程 procedure Button1Click(Sender: TObject); begin ShowMessage(IntToStr((Sender as TButton).Tag)); end; 在BCB下怎么写？ 上面两位的解答我在BCB下试了试，好像都出错了，很可能是我没看懂吧（*^_^*） BTW:BCB的帮助真是TMD的臭。我在BCB下查as居然出来的是Delphi的帮助。 请各位指教啊！
S Sachow Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #5 你不能完全照搬嘛，那只是理论写法！ void __fastcall TForm1::Button1Click(TObject *Sender) { ShowMessage(IntToStr(dynamic_cast<TButton *>(Sender)->Tag)); }
你不能完全照搬嘛，那只是理论写法！ void __fastcall TForm1::Button1Click(TObject *Sender) { ShowMessage(IntToStr(dynamic_cast<TButton *>(Sender)->Tag)); }
S Sachow Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #6 <font color = blue><B>你千万别照抄上面那些文字，原来的文本经过IE一解释，就全变了样， 点鼠标右键，查看源文件，你就能看到正确的代码了！</B></font>
S santgan Unregistered / Unconfirmed GUEST, unregistred user! 2001-02-03 #8 BCB下查AS当然会获得PASCAL的帮助了。 BCB能够毫无障碍的编译DELPHI的单元文件。
