摘要：
转载地址：http://blog.csdn.net/hutao1101175783/article/details/42807063 cmd:='echo d | Xcopy '+BasePath+' '+TargetPath+' /s/e'; i:=ShellExecute(Handle,nil, 阅读全文
posted @ 2016-07-19 15:38 ╰★张志峰★╮ 阅读(2193) 评论(0) 推荐(0)
摘要：
取得sqlite数据库里所有的表名 查询table，type 段是'table'，name段是table的名字, so: select name from sqlite_master where type='table' order by name; 阅读全文
posted @ 2016-07-19 15:37 ╰★张志峰★╮ 阅读(540) 评论(0) 推荐(0)
摘要：
unit USBDeviceNotify;//USB Device arrival or removeinterfaceuses Windows, Messages, SysUtils, Classes, Forms;type PDevBroadcastHdr = ^DEV_BROADCAST_HD 阅读全文
posted @ 2016-07-18 13:57 ╰★张志峰★╮ 阅读(1944) 评论(0) 推荐(0)
摘要：
http://qqhack8.blog.163.com/blog/static/1141479852012102133475/ http://qqhack8.blog.163.com/blog/static/1141479852012102133475/ http://qqhack8.blog.16 阅读全文
posted @ 2016-07-18 13:57 ╰★张志峰★╮ 阅读(1347) 评论(0) 推荐(0)
摘要：
新建一个名字为media的文件夹，把要播放的音乐文件放在这个文件夹里。 ExtractFilePath是用来获得产生的可执行程式所在的路径，因为我们把要播放的音乐文件放在了可执行程式的那个根目录下。 procedure TForm1.MediaPlayer_Play; var mediapath,v 阅读全文
posted @ 2016-07-12 12:34 ╰★张志峰★╮ 阅读(1155) 评论(0) 推荐(0)
摘要：
转自：http://blog.csdn.net/yunqian09/article/details/5554527 我的办法，增加一个timer 设置间隔100ms，通过timer的使能否，控制报警声音开关 procedure TForm1.Timer1Timer(Sender: TObject); 阅读全文
posted @ 2016-07-12 11:20 ╰★张志峰★╮ 阅读(1177) 评论(0) 推荐(0)
摘要：
// 设置WINDOWS系统的短日期的格式SetLocaleInfo(LOCALE_SYSTEM_DEFAULT, LOCALE_SSHORTDATE, 'yyyy-MM-dd'); Application.UpdateFormatSettings := False;// 设定程序本身所使用的日期时 阅读全文
posted @ 2016-07-06 11:28 ╰★张志峰★╮ 阅读(1570) 评论(0) 推荐(0)
摘要：
http://blog.csdn.net/beifengdelei/article/details/7166056 SQLite自增ID自段使用方法为 INTEGER PRIMARY KEY AUTOINCREMENT如: CREATE TABLE 21andy ( id INTEGER PRIMA 阅读全文
posted @ 2016-07-05 17:06 ╰★张志峰★╮ 阅读(210) 评论(0) 推荐(0)
摘要：
创建表格 sql="CREATE TABLE IF NOT EXISTS MusicList (id integer primary key AutoIncrement,name varchar(20),path varchar(20))"; 查询表格 查看表结构desc <table>; 查看所有 阅读全文
posted @ 2016-07-05 17:01 ╰★张志峰★╮ 阅读(1252) 评论(0) 推荐(0)
摘要：
delphi设计浮动窗口 用过Photoshop的朋友一定对它的那些方便的浮动面板记忆犹新，其实这些面板就是一个个的小窗体，但这些小窗体都放在Photoshop的主窗体上 （不是存在主窗体中），有自己的标题栏、最小化按钮及最大化按钮。但它们与MDI程序不同的是，他们可以拖到主窗体外，更重要的是工作中 阅读全文
posted @ 2016-07-05 14:17 ╰★张志峰★╮ 阅读(1060) 评论(0) 推荐(0)
浙公网安备 33010602011771号