| | | |

2013年10月27日

发送消息关闭另外一个程序

摘要： varh:HWND;begin h := FindWindow(nil, '自动增加疫苗'); if h0 then sendMessage(h, WM_CLOSE, 0,0); 阅读全文

posted @ 2013-10-27 19:17 yehuiyan 阅读(211) 评论(0) 推荐(0)

2013年10月26日

delphi 知道excel选中的单元格的行号

摘要： delphi 里面想知道excel选中的单元格的行号，用下面的方法FExcelApp.ActiveCell.row ;//注意不是fsheet的activecell 阅读全文

posted @ 2013-10-26 17:20 yehuiyan 阅读(241) 评论(0) 推荐(0)

2013年10月13日

delphi sql 操作表格

摘要： 1.增加字段 alter table docdsp add dspcodechar(200)2.删除字段 ALTER TABLE table_NAME DROP COLUMNcolumn_NAME3.修改字段类型 ALTER TABLE table_name ALTER COLUMNcolumn_name new_data_type4.sp_rename 改名 EXEC sp_rename '[dbo].[Table_1].[filedName1]', 'filedName2', 'COLUMN' 更改当前数据库中用户创建对象（如表、列或用户定义阅读全文

posted @ 2013-10-13 19:33 yehuiyan 阅读(545) 评论(0) 推荐(0)

2011年12月25日

在dll中用DirectSound8同时播放多个wav文件不能发声

摘要：下载：keyboard钩子内有一个procedure能发声但不能发资源文件的声音.rar//把工程保存为KeyBoarHook.dpr,并实现如下：以下知识都来自万一老师的博客library KeyBoarHook;{$R 'New1.res' 'New1.rc'}{$R *.dres}uses SysUtils, Windows, Messages, Classes, DirectSound, MMSystem, ReadWave in 'ReadWave.pas';//这个文件是万一老师编的同时播放多个声音文件的单元，//ReadWave 是阅读全文

posted @ 2011-12-25 12:52 yehuiyan 阅读(359) 评论(0) 推荐(0)

2011年11月26日

在dll中使用 DirectSound,编译能通过，但会出现内存问题，而且不能发声

摘要：学习了万一老师的博客，想在dll中使用DirectSound，但问题在dll中使用 DirectSound,编译能通过，但会出现内存问题，而且不能发声library Readwave;uses windows, System.SysUtils, System.Classes, DirectSound, MMSystem;{$R *.res} const wavPath= 'C:\Temp\Test.wav'; //测试用的 Wave, 须保证文件存在并注意路径权限, 且只能是 PCM 格式的 Wave 文件var myDSound: IDirectSound8; buf: ID 阅读全文

posted @ 2011-11-26 17:02 yehuiyan 阅读(261) 评论(0) 推荐(0)