処理が実行中である事の明示

  ステータスバー追加



  
			Win = new LboxWin( hWnd );
			Win->StatusCreate( 0 );
  

  
		case WM_SIZE:
			Win->StatusFit( wParam, lParam );
			Lview->ParentFit(
				(DWORD)wParam,
				0, 0,
				Win->ClientWidth()/2, Win->GetHeight( Win->hStatus )
			);
			Lview2->ParentFit(
				(DWORD)wParam,
				Lview->Width()-1, 0,
				0, Win->GetHeight( Win->hStatus )
			);

			break;
  



  ステータスバーに状況を表示



  
DWORD WINAPI SearchFunc( LPVOID lpParameter )
{
	int i;
	LboxString Path;
	LboxFileSystem Fs;

	for( i = 0; i < Lview->Count(); i++ ) {

		HANDLE hFile;
		BOOL bRet;
		WIN32_FIND_DATA wfd;

		Lview->SetCurrentRow( i );
		Lview->GetColumnText( 0, &Path );
		Path.AddBackslash();
		Path.operator += ("*.*");

		hFile = FindFirstFile( Path.szLboxString, &wfd );
		bRet = true;

		while( hFile != INVALID_HANDLE_VALUE && bRet ) {
			if ( lstrcmp( wfd.cFileName, "." ) == 0 ) {
				bRet = FindNextFile( hFile, &wfd );
				continue;
			}
			if ( lstrcmp( wfd.cFileName, ".." ) == 0 ) {
				bRet = FindNextFile( hFile, &wfd );
				continue;
			}
			Lview->SetCurrentRow( i );
			Lview->GetColumnText( 0, &Path );
			Path.AddBackslash();
			Path.operator += (wfd.cFileName);
			Win->StatusPrintf( "%s を処理中です...", wfd.cFileName );
			if ( PathIsDirectory( Path.szLboxString ) ) {
				Lview->AddRow();
				Lview->SetColumnText( 0, &Path );
			}
			else {
			   if ( Fs.IsText( &Path ) ) {
					LboxString Target;
					Target.operator = ("=");
					StringSearch(
						&Path,
						&Target
					);
			   }
			}
			bRet = FindNextFile( hFile, &wfd );

		}
		if ( !bRet ) {
			FindClose( hFile );
		}
		Lview->Fit();
		Lview2->Fit();
	}

	Win->StatusSetText( "★★ 処理が終了しました" );
	return true;
}
  










  infoboard   管理者用   
このエントリーをはてなブックマークに追加





フリーフォントWEBサービス
SQLの窓WEBサービス

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ