摘要：
{"110101001":"东华门街道","110101002":"景山街道","110101003":"交道口街道","110101004":"安定门街道","110101005":"北新桥街道","110101006":"东四街道","110101007":"朝阳门街道","110101008" 阅读全文
摘要：
不用 newstr procedure TForm1.cbb1CloseUp(Sender: TObject);begin edt1.Text := PString(cbb1.Items.Objects[cbb1.ItemIndex])^ + ':' + qry1KESMC.AsString;end 阅读全文
摘要：
::@echo offset TDate=%DATE:~0,4%%DATE:~5,2%%DATE:~8,2%set TTime=%time:~0,2%%time:~3,2%%time:~6,2%if "%TTime:~0,1%"==" " set TTime=0%time:~1,1%%time:~3 阅读全文
摘要：
uses DateUtils; var S1, S2: string; T1, T2: TDateTime; D, H, M, S: Integer; Value: Int64; begin S1 := '2015/09/23 15:44:50'; S2 := '2013/09/22 16:47:5 阅读全文
摘要：
select zhuyh , mingxh , bianh , mingcfrom ( select t.zhuyh , t.mingxh , t.bianh,t.mingc, row_number() OVER(PARTITION BY t.zhuyh ORDER BY t.zhuyh desc) 阅读全文
摘要：
promptprompt Creating package GETHZPYprompt promptcreate or replace package emrdb.GetHZPY is -- Author : ADMINISTRATOR -- Created : 2006-10-8 上午 11:51 阅读全文
摘要：
fastreport 报TBarCodeView类没有发现错误，是因为没有加入单元 frxBarCode; 阅读全文
摘要：
sqlplus /nologconnect sys/change_on_install as sysdbashutdown normalstartup mountalter database open;alter database datafile 6 offine drop; shutdown n 阅读全文
摘要：
function TForm1.BaseToJpg(BaseStr: string): TJpegImage;var JpgStream: TMemoryStream; StrStream: TStringstream;begin JpgStream := TMemoryStream.Create; 阅读全文