当前位置: 首页 > delphi
  • Delphi 截取 中间字符函数

    到现在还是不了解什么是正则,或许是不懂把。可是找了很多资料,也没有发现可以截取字符中间某段字符的例子。可能是我OUT了,又或者是我自己技术不到家! 最后没办法,只得放弃正则。 function GetStr(StrSource,StrBegin,StrEnd:string):string; var in_star,in_end:integer; begin in_star:=AnsiPos(strbegin,str ...

    技术文档711次阅读抢沙发
  • delphi 数据库添加删除修改读取语句

    以下代码为标准的DELPHI MSSQL语法: 查询数据: procedure TForm1.Button1Click(Sender: TObject); begin with adoquery1 do begin close; sql.Clear; sql.Add('select * from gl') ; open; showmessage('查询成功'); end; end; 插入数据: procedure TForm1.Button2Click(Sender: TObjec ...

    技术文档693次阅读抢沙发
  • delphi 单元之间的引用

    先在要调用的单元中的”implementation”加入调用的单元; 如果单元1要打开单元2的窗体,就必须在”implementation”加入被调用的单元名。 如下: implementation uses unit2;{$R *.dfm} 如果两个单元互相调用,就同上(就必须在”implementation”加入被调用的单元名)! 如下: implementation uses unit1;{$R *.dfm} ...

    技术文档544次阅读抢沙发
  • delphi 调用浏览器打开网页

    先在uses中加入调用的单元 “shellapi,” 标准的网页地址连接: procedure TForm1.Label7Click(Sender: TObject); begin ShellExecute(handle,nil,pchar('http://www.XXX.com'),nil,nil,sw_shownormal); end; 标准的EMAIL连接: procedure TForm1.Label8Click(Sender: TObject); begin ShellExecute(handle, ...

    技术文档767次阅读抢沙发
  • delphi 创建SQL连接

    delphi很多时候都是和数据库打交道,一些商业软件都基于数据库基础上开发。。。 操作方法: 1、在组件栏中找到ado组件 2、在窗体中放个‘ADOConnection1’和‘ADOQuery1’控件 3、在组件栏中找到data access组件 4、在窗体中放个‘DataSource1’ 5、在组件栏中找到data controls组件 6、在窗体中放个‘DBGrid1’ 7、在‘DBGrid1’ ...

    技术文档535次阅读抢沙发