class LboxIEPrint : public LboxIE


  StartDoc



  
// *********************************************************
// 印刷開始
// *********************************************************
void LboxIEPrint::StartDoc( LboxString *LString )
{
	LboxIEPrint::StartDoc( LString->szLboxString );
}
void LboxIEPrint::StartDoc( LPTSTR lpDocName )
{
	LboxString *TargetPath;
	TargetPath = new LboxString();

	TargetPath->operator = (&TempPath);
	TargetPath->AddBackslash();
	TargetPath->operator += ( lpDocName );
	TargetPath->operator += ( ".htm" );

	this->Doc.WriteOpen( TargetPath );
	delete TargetPath;

	this->Doc.Put( "<HTML>\n" );
	this->Doc.Put( "<HEAD>\n" );
	this->Doc.Put( "<META http-equiv=\"Content-type\"" );
	this->Doc.Put( " content=\"text/html; charset=Shift_JIS\">\n" );
	this->Doc.PutPrintf("<TITLE>%s</TITLE>\n", lpDocName );
	this->Doc.Put( "<HEAD>\n" );
	this->Doc.Put( "<STYLE>\n" );
	this->Doc.PutPrintf( "PRE { font-family: \"%s\";\n", 
		BaseFont.szLboxString
	);
	this->Doc.PutPrintf( "font-size:%s\n", BaseFontSize.szLboxString );
	this->Doc.Put( "}\n" );
	this->Doc.Put( "</STYLE>\n" );
	this->Doc.Put( "</HEAD>\n" );
	this->Doc.Put( "<BODY>\n" );
	this->Doc.Put( "<PRE>" );

}
  










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





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

SQLの窓フリーソフト

素材

一般WEBツールリンク

SQLの窓

フリーソフト

JSライブラリ