delphi7
ziruo1285372195
我坚守自己的信念,坚强地走自己认为应该走的路……
展开
-
delphi : webbrowser实现自动登录
procedure TForm1.Button1Click(Sender: TObject); begin WebBrowser1.OleObject.document.all.item('UserName').value:='用户名';//name WebBrowser1.oleobject.document.all.item('Password').value:='密码';原创 2012-08-17 16:58:58 · 700 阅读 · 0 评论 -
屏蔽webrowser頁面中的聲音
參考方法: procedure TForm1.FormCreate(Sender: TObject); var hDSound: Cardinal; pDirectSoundCreate: Pointer; hWinmm: Cardinal; pmidiStreamOpen: Pointer; pwaveOutWrite: Pointer; lp: Card原创 2013-09-04 09:50:03 · 692 阅读 · 0 评论