- 博客(5)
- 收藏
- 关注
原创 stringgrid 删除选中行
if (StrGridSensorList->Row>0) { for (int i=StrGridSensorList->Row;iRowCount-1;i++) { StrGridSensorList->Rows[i]->Assign(StrGridSensorList->Rows[i+1]); }
2017-04-12 11:47:27 2630
原创 线程安装退出的方法
// 退出时代码 if (thread_DataSave->Suspended) { thread_DataSave->Resume(); } thread_DataSave->ReturnToMain=true; thread_DataSave->Terminate(); thread_DataSave->WaitFor();
2017-04-10 13:53:47 531
原创 删除文件夹及子文件
void __fastcall TForm_OpenFile::DeleteAllFile(String DstFileName){ HANDLE hFile = NULL; WIN32_FIND_DATA fd = {0}; String UseFile=DstFileName+"\\*.*"; hFile = ::FindFirstFile(UseFi
2017-04-10 13:49:54 602
原创 进度条颜色变化BCB
SendMessage(ProgressBarLoding->Handle, PBM_SETBARCOLOR, 0, RGB(255,128,0));
2017-04-10 11:36:49 655
原创 文件夹内容复制( 包含进度)
void __fastcall TForm_PrjPreView::BitBtnOKClick(TObject *Sender){ String tempstr=ExtractFilePath(Application->ExeName); String ReturnName=Edit_PjoNewName->Text.Trim(); String ProjectFi
2017-04-10 11:35:38 238
空空如也
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人