2018 年 8月 28 日随笔档案 - 覆雨翻云

2018年8月28日

摘要： procedure TCustomerForm.FindCustomerInfo;var strSql:string;begin // BL_HV_FindCustomerInfo 存储过程的名称，后面是需要的全部的参数 strSql:='exec BL_HV_FindCustomerInfo :S 阅读全文

posted @ 2018-08-28 16:29 覆雨翻云阅读(479) 评论(0) 推荐(0) 编辑

Delphi调用MSSQL存储过程返回的多个数据集的方法

摘要： varaintf:_Recordset;RecordsAffected:OleVariant; begin ADOStoredProc1.Close;ADOStoredProc1.Open;aintf:=ADOStoredProc1.Recordset;ADOQuery1.Recordset:=ai 阅读全文

posted @ 2018-08-28 16:27 覆雨翻云阅读(349) 评论(0) 推荐(0) 编辑

cxGrid类似pagecontrol的效果

摘要： 1、对TcxGrid创建多个Level 2、对TcxGrid的TcxGridLevelOptions的TabsForEmptyDetail设置为True 3、再设置DetailTabsPosition的方向为：dtpTop或则dtpLeft 4、cxGrid的rootleveloptions属性下的阅读全文

posted @ 2018-08-28 09:24 覆雨翻云阅读(205) 评论(0) 推荐(0) 编辑