Question

vfp 中用时钟控件怎么制作一个“欢迎使用”字体的从左到右的动画

Answer 1

1、添加label（标签）控件到表单中，并设置其caption值为"欢迎使用"，再设置它的Autosize值为.T.
2、添加timer（时钟）控件到表单中，并设置其Interval值为200（刷新时间，值越小则移动越快，单位为毫秒，如果设为1000就是每1秒移动一下）
3、设置时钟控件的代码为（timer事件）：
thisform.label1.left=thisform.label1.left+5 &&如果要从右到左则将加号改为减号
if thisform.label1.left>thisform.width
thisform.label1.left=0-thisform.label1.width
endif

Answer 2

#include<afxwin.h>
class CMyFrameWnd : public CFrameWnd
{
private:
int m_width;
public:
CMyFrameWnd()
{
m_width = 0;
Create(NULL,"我的窗口");
this->UpdateWindow();
this->ShowWindow(SW_MAXIMIZE);
this->SetTimer(1,100, NULL);
}
afx_msg void OnPaint();
afx_msg void OnTimer(UINT nIDEvent);
DECLARE_MESSAGE_MAP()
};
void CMyFrameWnd::OnPaint()
{
m_width = m_width + 10;
CPaintDC dc(this);
dc.TextOut(m_width,0,"Hello World");
CRect rect;
this->GetClientRect(&rect);
if (m_width >= rect.Width()) {
m_width = 0;
}
}
void CMyFrameWnd::OnTimer(UINT nIDEvent)
{
this->Invalidate();
}
BEGIN_MESSAGE_MAP(CMyFrameWnd,CFrameWnd)
ON_WM_PAINT()
ON_WM_TIMER()
END_MESSAGE_MAP()
class CMyWinApp: public CWinApp
{
public:
virtual BOOL InitInstance()
{
m_pMainWnd = new CMyFrameWnd();

return TRUE;

}
};
CMyWinApp theapp;
什么叫作高手,你自已看看就知道了