テキストファイル


  ドラッグドロップで読み込む



ProcDrop はオーバロード用関数です

※ WMCreate で LEdit->DragAccept( true ); を実行しておいて下さい

  
// *********************************************************
// ドラッグドロップで読み込む
// *********************************************************
void MyClass::ProcDrop()
{
	if ( !LEdit->IsHandle( this->hTargetWindow ) ) {
		return;
	}
	
	LboxTextFile Txt;
	LboxString LString;

	// ドロップされたファイルのパスの取得
	LString.Resize( MAX_PATH );
	DragQueryFile(
		this->hDrop,
		0,  // 選択された先頭ファイル
		LString.szLboxString,
		MAX_PATH
	);

	// テキストフアイルかどうかのチェック
	LboxFileSystem Fs;
	if ( !Fs.IsText( &LString ) ) {
		MsgOk( "テキストファイルではありません   " );
		return;
	}

	// ファイルのオープン
	if ( !Txt.ReadOpen( &LString ) ) {
		MsgOk(
			"%s をオープンできません   ",
			LString.szLboxString
		);
		return;
	}

	// 読み込みバッファ
	LboxString LBuffer;

	// 読み込み
	Txt.GetAll( &LBuffer );
	// データ内には \n しか含まれていないのでテキストエリア用に変換
	LBuffer.Replace( "\n", "\r\n" );
	LEdit->SetText( &LBuffer );

	// ファイルのクローズ
	Txt.Close();

}
  










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





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

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ