首页 > TAG信息列表 > AsString

图文解说ChinaCock高德地图组件-显示多个标注(四)

前文介绍了如何在地图上通过设置标注来采集位置的经纬度,当用户采集了多个实体的位置信息后,我们就可以在地图上一次性显示这些实体的标注了! 基于前文,接下来在地图上的做标注就很简单了,可以复用以前的代码,具体参阅:图文解说ChinaCock高德地图组件采集坐标 (二) 接下来,我们再做一个过

Project Test.exe raised exception class EVariantTypeCastError with message 'Could not convert v

环境:ABFramework3.9.5 错误描述:循环插入报如题所示错误 代码如下: rstUpSalesDetail.FieldByName('CustGoodsCode').AsString:=rstSourceData.FieldByName('CustGoodsCode').AsString; rstUpSalesDetail.FieldByName('BrandID').AsString:=rstSourceData

SQLSERVER varchar(MAX) 字段的使用注意

  在使用UniDAC控件连接SQLSERVER数据库时,如果遇到的字段是varchar(MAX)或者nvarchar(MAX)时,代码写的时候不能写成ParamByName('fieldname').AsString :=xxx;而要写成:ParamByName('fieldname').AsMemo :=xxx;用AsString的方式写入的,字段内容被截断了。     用两种方式写入的数

kbmMWClientQuery.Undo存的坑

在项目中使用了Undo方法,今天被同事发现一个坑,就是Undo后的记录还是被提交了! kbmMWClientQuery1.Append; kbmMWClientQuery1.FieldByName('fid').AsString:='4'; kbmMWClientQuery1.FieldByName('fname').AsString:='4'; kbmMWClientQuery1.FieldByName('fin

delphi中的LISTVIEW怎么与数据库连接

listview1.clear; with adoquery1 do begin Sql.text := 'Select * from table1'; Open ; while not eof do begin with listview1.items.add do begin caption := fieldbyName('field1').asstring; subitems.add(fieldbyNa

如何用RzTreeView显示部门结构

    我们知道,一个企业、单位分很多部门,部门下面还会分子部门,如果用树形表就能 清晰的显示出部门结构来,一目了然。下面我来介绍下如何使用RzTreeview显示部门结构。 一、主要表结构 DepID nvarchar(50) //内部唯一ID,通常是GUID DepCode nvarchar(20) //部门编码 DepName nvarc

UniGUI的SQLite数据库(04)

1]放FDConnection1和FDQuery1到界面上     2]在OnFormCreate事件里写 FDQuery1.Connection := FDConnection1; FDConnection1.LoginPrompt:=false; //取消登录提示框 FDConnection1.Open('DriverID=SQLite;Database=test1.Sqlite3');//test1.Sqlite数据库要与E:\UniGui_

Json解析

1 //JSON解析 2 function TForm5.JsonResolve(sStr:string):string; 3 var 4 jSOObj:ISuperObject; 5 jOObj:ISuperObject; 6 jRoot,jSid:ISuperObject; 7 sRoot,sSid:string; 8 arrayStr:TSuperArray; 9 i:Integer;10 begin11 jSOObj := SO(sStr);12 jOObj :=

设置ListView显示CheckBox

最近在开发的时候用到ListView,简单总结一下它的用法。1.让ListView像DBGrid数据库那样显示数据:将ListView的ViewStyle设置为vsReport。2.向ListView中添加数据:我的数据是从数据库中查询得到的,比如我用的是ADOQuery, 先定义变量:var   MyItem:TListItembeginADOQuery1.First;   wh