2017年4月6日
delphi 播放wav声音
摘要： procedure TForm13.btn1Click(Sender: TObject);begin play_wav_bykeys('1',0);end;function TForm13.play_wav_bykeys(filename: string; xflag: Integer): bool 阅读全文
posted @ 2017-04-06 16:10 夏天的西瓜君 阅读(2528) 评论(0) 推荐(0) 编辑
cxgrid 标题增加checkbox
摘要： procedure Uyxmdo.yxmdatagridDBTableView1selectHeaderClick( //增加单击select标题，可以进行全选和反选操作 Sender: TObject);begin inherited; if Self.yxmdatagridDBTableView 阅读全文
posted @ 2017-04-06 10:03 夏天的西瓜君 阅读(336) 评论(0) 推荐(0) 编辑