RSS订阅 | 匿名投稿
您的位置:网站首页 > 组件

idftp TEncoding and IIdTextEncoding

incompatibetypesbetweenTEncodingandIIdTextEncoding引用IdGlobal单元通过IndyTextEncoding()方法,把TEncoding转换为IIdTextEncoding
类别:组件 标签: 作者:admin 日期:2018-03-10 00.10.32

delphi WebBrowser1遍历网页中的图片

vardoc:IHtmlDocument2;i:Integer;s:String;begin//iFile:=WebBrowser1.DocumentasIPersistFile;//iFile.Save('F:\tt.mht',False);doc:=WebBrowser1.DocumentasIHtmlDocument2;ifdoc.images.length=0thenexit;Memo1.…
类别:组件 标签:WebBrowser 作者:admin 日期:2018-03-05 12.45.06

delphi xe安装 Tclientsocket, Tserversocket控件

delphixe安装Tclientsocket,Tserversocket控件添加方法:菜单component->InstallPackets按Add按钮,选择delphi目录里的bin目录下的dclsocketsxxx.bpl(delphi2010是dclsockets140.bpl)(delphixe10.02是dclsockets250.…
类别:组件 标签: 作者:admin 日期:2018-02-27 13.02.36

delphi取得文件图标并在TListView中显示

{delphi取得文件图标并在TListView中显示技术要点:一、使用SHGetFileInfo函数获取指定扩展名的文件图标。需要引用ShellAPI单元。二、使用TStringList来保存扩展名与其图标的索引号。当添加一个文件名至TListView后,…
类别:组件 标签: 作者:admin 日期:2018-02-23 23.29.15

delphi IDHTTP returning HTTP 1.1/500 显示错误内容

//delphiIDHTTPreturningHTTP1.1/500显示错误内容IDHTTP.Response.RawHeaders.Text;
类别:组件 标签:IDHTTP 作者:admin 日期:2018-02-20 21.16.29

delphi 网上获取北京时间IdHTTPServer and IdHTTP 使用 Encoding UTF8

IdHTTP1.Get('http://localhost/?msg='+TIdURI.ParamsEncode('中国人'));AResponseInfo.ContentType:='text/plain';AResponseInfo.CharSet:='utf-8';AResponseInfo.ContentText:='中国人';Or:AResponseInfo.ContentT…
类别:组件 标签: 作者:admin 日期:2018-02-20 20.49.15

delphi MediaPlayer1 设置音量

usesMPlayer,MMSystem;constMCI_SETAUDIO=$0873;MCI_DGV_SETAUDIO_VOLUME=$4002;MCI_DGV_SETAUDIO_ITEM=$00800000;MCI_DGV_SETAUDIO_VALUE=$01000000;MCI_DGV_STATUS_VOLUME=$4...
类别:组件 标签: 作者:admin 日期:2018-02-15 18.39.03

delphi Memo1 行随机打乱

procedureShuffleStrings(List:TStrings;MoveCount:Integer=0);vari,N,C:Integer;Index1,Index2:Integer;Str:string;Obj:TObject;beginList.BeginUpdate;tryC:=List.Count;<br...
类别:组件 标签: 作者:admin 日期:2018-02-15 18.30.46

delphi Memo1 统计行 列

procedureTForm1.Memo1Change(Sender:TObject);varX,Y:LongInt;beginY:=Memo1.Perform(EM_LINEFROMCHAR,Memo1.SelStart,0);X:=Memo1.Perform(EM_LINEINDEX,Y,0);inc(Y);X:=Memo1.SelStart-X+1;Form1.Caption:='列X='…
类别:组件 标签: 作者:admin 日期:2018-02-15 17.12.21

delphi Memo1 光标跟随鼠标移动

procedureTForm1.Memo1MouseMove(Sender:TObject;Shift:TShiftState;X,Y:Integer);beginMemo1.SelStart:=LoWord(SendMessage(Memo1.Handle,EM_CHARFROMPOS,0,MakeLParam(X,Y)));Memo1.SelLength:=0;end;
类别:组件 标签:Memo 作者:admin 日期:2018-02-15 17.07.32

Delphi StringGrid控件的用法

DelphiStringGrid控件组件名称:StringGrid●固定行及固定列:StringGrid.FixedCols:=固定行之数;StringGrid.FixedRows:=固定列之数;StringGrid.FixedColor:=固定行列之颜色;StringGrid.Color:=资料区之颜色;●资料行…
类别:组件 标签:S****ingGrid 作者:admin 日期:2018-02-14 23.16.43

Delphi StringGrid常用属性和常用操作

S****ingGrid组件用于建立显示字符串的网格,与电子表格相似。它可使表格中的字符串和相关对象操作简单化。S****ingGrid组件提供了许多可控制网格外观念的属性,以及利用表格的结构响应用户操作的事件和方法。S****i…
类别:组件 标签:S****ingGrid 作者:admin 日期:2018-02-14 23.15.56

delphi GetWebBrowserHTML 获取网页源代码

UsesActiveX;functionGetWebBrowserHTML(constWebBrowser:TWebBrowser):String;varLStream:TStringStream;Stream:IStream;LPersistStreamInit:IPersistStreamInit;beginifnotAssigned(WebBrowser.Document)thenexit;…
类别:组件 标签:WebBrowser 作者:admin 日期:2018-02-13 01.45.49

delphi IdHttp 获取链接连通状态

varhttp:TIdHttp;url:string;code:integer;beginurl:='http://www.delphitop.com/';http:=TIdHTTP.Create(nil);trytryhttp.Get(url,nil);code:=http.ResponseCode;exceptonE:EIdHTTPProtocolExceptiondo</...
类别:组件 标签: 作者:admin 日期:2018-02-08 10.38.47

delphi idhttp数据自动编码

idhttp数据自动编码RT。idhttp的httpOption,默认为[hoForceEncodeParams],即自动编码参数,但是idhttp自动编码有点小问题,如果参数中有"(空格)",会转成“+”,有加号会转成“(空格)”,问题来了,如果我想提…
类别:组件 标签: 作者:admin 日期:2018-02-08 10.13.29

delphi MediaPlayer循环播放MP3所有音乐文件问题?

MediaPlayer用得不多,只知道这种办法,.假如你已有一个ListBox1并已经装载好全部MP3的完整路径信息了,可以加一个TIMER1,在TIMER1的事件里写代码跟踪播放器的模式,一停止即播放下一首歌.procedureTForm1.Timer1Ti…
类别:组件 标签: 作者:admin 日期:2018-02-07 18.00.34

delphi 怎么计算一个memo中输入的汉字数目

1.实时显示输入汉字与英文字母数目:procedureTForm1.Memo1Change(Sender:TObject);vars:string;i,sum,e,c,t:Integer;begins:=Memo1.Text;e:=0;c:=0;sum:=Length(s);fori:=0tosumdobeginif(Ord(s[i])>=33)and(Ord(s[…
类别:组件 标签: 作者:admin 日期:2018-02-07 16.29.56

Delphi的idhttp报508 Loop Detected错误的原因

一般是访问https时才出现“508LoopDetected”,idhttp+IdSSLIOHandlerSocketOpenSSL,这个在上篇文章中讲过了。由于该问题网上资料极少,连外文资料也没卵用,起初我也以为是idhttp的重定向设置问题,但确认过没设置…
类别:组件 标签: 作者:admin 日期:2018-02-07 12.33.22

Delphi的idhttp报IOHandler value is not valid错误的原因

出现这种问题的原因是由于访问的URL地址为https或存在其跳转地址为https。首先单纯使用idhttp是只能访问http,而https则需要搭配IdSSLIOHandlerSocketOpenSSL来实现对https的访问支持,当然还需要在系统目录或编译目…
类别:组件 标签: 作者:admin 日期:2018-02-07 12.02.42

Delphi调用REST

Delphi调用RESTDelphi调用REST很简单,首先在界面上放上:RESTClient1:TRESTClient;RESTRequest1:TRESTRequest;RESTResponse1:TRESTResponse;然后简单调用即可:RESTClient1.BaseURL:=edtURL.Text;RESTRequest1.Exec…
类别:组件 标签:REST 作者:admin 日期:2018-02-06 23.28.27