一个问题

wei__kun 2006-07-10 12:46:18
我看到在一些应用程序中,在“关于。。。”这个对话框中,有显示本公司的网站,鼠标点击,就可以进入这个网站,请问这个是怎么实现的,有没有这样的控件啊?
...全文
218 4 打赏 收藏 转发到动态 举报
写回复
用AI写文章
4 条回复
切换为时间正序
请发表友善的回复…
发表回复
wei__kun 2006-07-10
  • 打赏
  • 举报
回复
呵呵,多谢各位。
rudolf_he 2006-07-10
  • 打赏
  • 举报
回复
学习一下
BlueDeepOcean 2006-07-10
  • 打赏
  • 举报
回复
楼上提供了方法,我提供组件:
一般而言,C++Builder中自带AboutForm对话框组件,位于"File"->"New"->"Forms"中,即:“About box”。你可以对其进行界面调整和修改。
至于仿照“超链接”效果,建议使用C++Builder的TLable等组件。
如果要模拟鼠标放置在该组件上,显示一个“手”的形状并且该“链接”变成蓝色,否则变成默认黑色的效果,参考下面的代码:

void __fastcall TForm1::Label1MouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Label1->Cursor = crHandPoint;
Label1->Font->Style = TFontStyles() << fsUnderline;
Label1->Font->Color = clBlue;
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormMouseMove(TObject *Sender, TShiftState Shift,
int X, int Y)
{
Label1->Cursor = clDefault;
Label1->Font->Style = TFontStyles() >> fsUnderline;
Label1->Font->Color = clWindowText;
}
//---------------------------------------------------------------------------
daydayup234 2006-07-10
  • 打赏
  • 举报
回复
void __fastcall TForm1::Label1Click(TObject *Sender)
{
ShellExecute(
Handle,
"Open",
Label1->Caption.c_str(),
NULL,
NULL,
SW_SHOW
);
}
//---------------------------------------------------------------------------

void __fastcall TForm1::FormCreate(TObject *Sender)
{
Label1->Caption="http://community.csdn.net/Expert/topic/4870/4870602.xml?temp=.1355707";
}
//---------------------------------------------------------------------------

1,317

社区成员

发帖
与我相关
我的任务
社区描述
C++ Builder 网络及通讯开发
社区管理员
  • 网络及通讯开发社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

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