他的首页
他的馆藏
他的动态
馆友反馈
关于他
| 共 4 篇文章 |
|
DELPHI DATASNAP 2010 入门操作(2)不写一行代码，绿色三层我也行。TDSServerModule:TServerMethods1 = class(TDSServerModule)--> TDSServerModuleBase = class(TProviderDataModule)--> TProviderDataModule = class(TDataModule)-->TDataModule = class(TComponent)--> TComponent = class(TPersistent, IInterface, IInterfaceC... 阅1 转自一辈子财富 公众公开 16-05-15 09:05 |
if dwLastError = ERROR_INSUFFICIENT_BUFFER then //如果成功 begin GetMem(lpEntryInfo, dwEntrySize); {分配dwEntrySize字节的内存} if FindNextUrlCacheEntry(hCacheDir, lpEntryInfo^, dwEntrySize) then DeleteUrlCacheEntry(lpEntryInfo^.lpszSourceUrlName); FreeMem(lpEn... 阅40 转1 评0 公众公开 16-05-11 09:54 |
delphi webbrower的滚动条控制。var htmldoc: IHTMLDocument2;MaxScrollHeight := htmldoc.body.getAttribute(''ScrollHeight'', 0);//获得滚动条最大高度MaxScrollWidth := htmldoc.body.getAttribute(''ScrollWidth'', 0);//获得滚动条最大宽度Web.OleObject.Document.ParentWindow.ScrollBy(MaxScrollWidth... 阅406 转6 评0 公众公开 16-05-10 17:57 |
webbrowser轻松实现自动填表。步骤如下： 第一步：获取网页 调用Webbrowser 的Navigate系列函数。在调用 webBrowser.Document 之前，请确保 Webbrowser 网页装载完成，可以通过Webbrowser的DocumentCompleted事件进行监视。先指定一个变量：IsCompleted在调用Webbrowser 的Navigate，Refresh系列函数之前，将IsCompleted设为false。调用webBrow... 阅1 转自独孤求财 公众公开 16-05-10 17:45 |
