wnjnfn的博客

idhttp get 中文出现乱码的问题默认是按系统指定locale（CP_ACP）输出的，简体中文系统默认的是gb18030（虽然名义上是gb2312的代码页）。但是indy只对utf-8的编码进行了处理，所以其他编码只能自己想办法处理了，比如这样：Delphi(Pascal) codevar ss : TStringStream;begin ss

procedure TForm1.Button1Click(Sender: TObject);var  sTime: TDateTime;  s1: String;  aDateTimeFormat: TFormatSettings;begin  //设定转换格式  DateSeparator  aDateTimeFormat.DateSeparator := '-';

procedure TForm1.Button1Click(Sender: TObject);var D:TDateTime; s:string;begin D:=VarToDateTime('05-10-14 04:35PM'); S:=FormatDatetime('YYYY/MM/DD HH:MM:SS',D); showmessage(s);end;看到有人...

Delphi IDHTTP控件：GET/POST 请求最近一直在使用IDHTTP，下面是一些关于 GET、POST 请求基本使用方法的代码一、GET 请求 1 procedure GetDemo; 2 var 3 IdHttp : TIdHTTP; 4 Url : string;//请求地址 5 ResponseStream : TStrin

Cxgrid的列属性Properties为comboBox,实现动态添加item方法：(cxGrid1DBTableView1Column1.Properties as TcxComboBoxProperties).items.add("itemName");或者TcxComboboxProperties(cxGrid1DBTableView1Column1.Properties).Items.Add('aa');TcxComboboxProperties(cxGrid1DBTableView1C

分组设置1. 设置列的GroupIndex，即可分组2. 把列拖到groupbox同样可以实现分组。展开方法一：cxGrid1DBTableView1.DataController.Groups.FullExpand;方法二：cxGrid1DBTableView1.ViewData.Expand(true);收缩方法一：cxGrid1DBTableView1.DataController.Groups.FullCollapse;方法二：cxGrid1DBTableView1.

use WinInet; //正确检测是否在线方法 if InternetGetConnectedState(nil, 0) then begin Self.Caption := '在线'; end else begin Self.Caption := '脱机'; end;经测试，和QQ检测是否在线基本相同。

delphi 关于 addobject 字符串的使用procedure TForm1.Button1Click(Sender: TObject);begin cbb1.Items.Clear; cbb1.Items.AddObject('Iteam2',TObject(NewStr('a1'))); cbb1.Items.AddObject('Iteam2',TObject(NewStr('a2'))); end;procedure TForm1.Button1Click(Sender: T

步骤1.建立UAC.manifest文件<?xml version="1.0" encoding="UTF-8" standalone="yes"?><assembly xmlns="urn:schemas-microsoft-com:asm.v1" manifestVersion="1.0"><trustInfo xmlns="urn:schemas-microsoft-com:asm.v3"><security><requestedPri