-- Table structure for table `bc_statuscodes`
--


CREATE TABLE `bc_statuscodes` (
  `code` int(1) NOT NULL DEFAULT 0,
  `name` char(32) DEFAULT NULL,
  PRIMARY KEY (`code`)
) ENGINE=MyISAM DEFAULT CHARSET=utf8mb3 COLLATE=utf8mb3_general_ci;

--
-- Dumping data for table `bc_statuscodes`
--

INSERT INTO `bc_statuscodes`VALUES (1,'更新中');
INSERT INTO `bc_statuscodes`VALUES (0,'通常');
INSERT INTO `bc_statuscodes`VALUES (10,'アーカイブ');

--
-- Table structure for table `bc_stories`
--


CREATE TABLE `bc_stories` (
  `sid` varchar(128) NOT NULL DEFAULT '',
  `uid` mediumint(8) NOT NULL DEFAULT 1,
  `draft_flag` tinyint(1) unsigned DEFAULT 0,
  `date` datetime DEFAULT NULL,
  `title` varchar(128) DEFAULT NULL,
  `page_title` varchar(128) DEFAULT NULL,
  `introtext` text DEFAULT NULL,
  `bodytext` text DEFAULT NULL,
  `text_version` tinyint(2) unsigned NOT NULL DEFAULT 1,
  `hits` mediumint(8) unsigned NOT NULL DEFAULT 0,
  `numemails` mediumint(8) unsigned NOT NULL DEFAULT 0,
  `comments` mediumint(8) unsigned NOT NULL DEFAULT 0,
  `comment_expire` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
  `trackbacks` mediumint(8) unsigned NOT NULL DEFAULT 0,
  `related` text DEFAULT NULL,
  `featured` tinyint(1) unsigned NOT NULL DEFAULT 0,
  `show_topic_icon` tinyint(1) unsigned NOT NULL DEFAULT 1,
  `commentcode` tinyint(4) NOT NULL DEFAULT 0,
  `trackbackcode` tinyint(4) NOT NULL DEFAULT 0,
  `statuscode` tinyint(4) NOT NULL DEFAULT 0,
  `expire` datetime NOT NULL DEFAULT '0000-00-00 00:00:00',
  `postmode` varchar(10) NOT NULL DEFAULT 'html',
  `advanced_editor_mode` tinyint(1) unsigned DEFAULT 0,
  `frontpage` tinyint(1) unsigned DEFAULT 1,
  `meta_description` text DEFAULT NULL,
  `meta_keywords` text DEFAULT NULL,
  `cache_time` int(11) NOT NULL DEFAULT 0,
  `owner_id` mediumint(8) NOT NULL DEFAULT 1,
  `group_id` mediumint(8) NOT NULL DEFAULT 2,
  `perm_owner` tinyint(1) unsigned NOT NULL DEFAULT 3,
  `perm_group` tinyint(1) unsigned NOT NULL DEFAULT 3,
  `perm_members` tinyint(1) unsigned NOT NULL DEFAULT 2,
  `perm_anon` tinyint(1) unsigned NOT NULL DEFAULT 2,
  PRIMARY KEY (`sid`),
  KEY `stories_sid` (`sid`),
  KEY `stories_uid` (`uid`),
  KEY `stories_featured` (`featured`),
  KEY `stories_hits` (`hits`),
  KEY `stories_statuscode` (`statuscode`),
  KEY `stories_expire` (`expire`),
  KEY `stories_date` (`date`),
  KEY `stories_frontpage` (`frontpage`)
) ENGINE=MyISAM DEFAULT CHARSET=utf8mb3 COLLATE=utf8mb3_general_ci;

--
-- Dumping data for table `bc_stories`
--

INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0001',3,0,'2001-09-01 21:45:00','[Delphi] Enterキーで次のフィールドに移動する','','<p>コンポーネントのKeyPressイベントを使います。<br />\rKeyPressイベントでEnterキーが押されたときに、次のコントロールに移動するWindowsのメッセージを送ってフォーカスを移動させます。<br />\r任意のコントロールにフォーカスを移動させる場合には、コントロール名.SetFocusを使用します。</p>\r<pre class=\"brush: delphi; highlight: [7];\" title=\"Enterキーで次のフィールドに移動する\">\rprocedure Edit1KeyPress(var Key: Char);\rbegin\r  if (Ord(Key) = VK_RETURN) and (Shift = []) then\r  begin\r    // Enterキーが押されたら、次フィールドへ移動する。\r    // Delphi関数を使う方法\r    SelectNext(ActiveControl, GetKeyState(VK_SHIFT) &gt;= 0, true);\r    // ...Windows Messageを使用する方法\r    //SendMessage(Handle, WM_NEXTDLGCTL, Ord(GetKeyState(VK_SHIFT) &lt; 0), 0);\r    // 通常のEnterキーの処理をしないようにクリアしてしまおう。\r    Key := #0;\r  end;\rend;\r</pre>','',1,26830,0,2,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-03-26 15:13:30','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0002',3,0,'2001-09-01 21:50:00','[Delphi] フリガナを自動で入力する (for Win32)','','<p><strong>WM_IME_COMPOSITION</strong> メッセージが発生したときに、<strong>ImmGetCompositionString </strong>関数を使ってFEP (IME など) が持つフリガナを取得します。</p>','<p>この例は、フリガナ機能付きコンポーネントの作成例です。<br />\rTEdit コンポーネントに KanaOut プロパティを追加しています。この追加したプロパティに、Edit1(TEdit クラス) を設定すると、入力した文字のフリガナが Edit1.Text に入力されていきます。</p>\r<pre class=\"brush: delphi; highlight: [69,73,74,75]\" title=\"フリガナを自動で入力する (for Win32)\">\runit KanaEdit;\r\rinterface\r\ruses\r  Windows, Messages, Classes, Graphics, Controls, StdCtrls;\r\rtype\r  { TKanaEdit }\r  TKanaEdit = class(TEdit)\r  private\r    FKanaOut: TEdit; // KanaOutプロパティ\r  protected\r    procedure SetKanaOut(AValue: TEdit);\r    procedure WndProc(var Msg: TMessage); override;\r  published\r    // プロパティ\r    ...\r    property KanaOut: TEdit read FKanaOut write SetKanaOut;\r    ...\r  end;\r\rprocedure Register;\r\rimplementation\r\ruses\r  IMM;\r\rprocedure Register;\rbegin\r  RegisterComponents(\'Samples\', [TKanaEdit]);\rend;\r\r{*******************************************************************************\r機能: カナ出力プロパティーセット\r引数:\r戻値:\r*******************************************************************************}\rprocedure TKanaEdit.SetKanaOut(AValue: TEdit);\rbegin\r  if (AValue = nil) or (AValue = Self) then\r  begin\r    FKanaOut := nil;\r  end\r  else\r  begin\r    FKanaOut := AValue;\r  end;\rend;\r\r{*******************************************************************************\r機能: メッセージ処理\r引数:\r戻値:\r*******************************************************************************}\rprocedure TKanaEdit.WndProc(var Msg: TMessage);\rvar\r  imc: HIMC; // IMEのコンテキストを格納\r  strKana: string;\r  nSize: Integer;\rbegin\r  if (FKanaOut &lt;&gt; nil) then\r  begin\r    if (Msg.Msg = WM_IME_ENDCOMPOSITION) then\r    begin\r      imc := ImmGetContext(Handle);\r      case Msg.Msg of\r        WM_IME_ENDCOMPOSITION:\r        begin\r          strKana := \'\';\r          // 変換結果の「読み」を取得\r          nSize := ImmGetCompositionString(imc, GCS_RESULTREADSTR, nil, 0);\r          SetLength(strKana, nSize+1);\r          ImmGetCompositionString(imc, GCS_RESULTREADSTR, PChar(strKana), nSize+1);\r          SetLength(strKana, nSize);\r          // 更新後文字列作成\r          FKanaOut.Text := FKanaOut.Text + strKana;\r        end; // WM_IME_ENDCOMPOSITION\r      end; // case\r      ImmReleaseContext(Handle, imc);\r    end;  // if\r  end;  // if\r  inherited;\rend;\rend.\r</pre>\r<p>サンプルプログラムのダウンロードは&rarr;[file:21]</p>',1,7861,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-09 23:01:34','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0003',3,0,'2001-09-01 21:52:00','[Delphi] 数値をカンマ編集する','','<p>カンマ編集するにはFormat関数を使う方法がありますが、簡単に行うには以下のどちらかの関数を使用します。</p>\r<ul class=\"expl\">\r<li><em>FormatFloat</em></li>\r<li><em>FormatCurr</em></li>\r</ul>\r<p>具体的には以下のように指定します。</p>\r<pre class=\"code\">FormatCurr(\'#,\', 123456)</pre>\r<p>Format関数を使うよりもずっと簡単に、制御できるのでとっても便利です。</p>','',1,20599,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2013-03-01 13:44:07','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0004',3,0,'2001-09-01 21:55:00','[Delphi] ボタンのキャプションを2行にする',null,'<p>ボタンのキャプションを2行表示したいと思ったことはありませんか？<br />\r\n実はボタンのキャプションを2行にするのはすごく簡単です。しかし、コンポーネントにしないで実現することは難しいのでコンポーネントを作成してみます。<br />\r\n作り方は、TButtonを継承したボタンを作成します。このボタンのCreateParamをオーバーライドします。<br />\r\nここでウィンドウ作成パラメータ（Style）にBS_MULTILINEという値を付けl加えることで、2行表示ができるようになります。</p>\r\n<p>注 コンポーネントの作成は[コンポーネント]メニューの新規作成から行えます。</p>','<pre class=\"code\">\r\nTMultiLineCaptionButton = <b>class</b>(TButton)\r\n  <b>private</b>\r\n  <b>protected</b>\r\n    <b>procedure</b> CreateParams(var Params: TCreateParams); <b>override</b>;\r\n  <b>public</b>\r\n  <b>published</b>\r\n    (省略...)\r\n<b>end</b>;\r\n\r\n   (省略...)\r\n\r\n<b>procedure</b> TMultiLineCaptionButton.CreateParams(var Params: TCreateParams); \r\n<b>begin</b>\r\n  <b>inherited</b>;\r\n  <i>Style</i> := <i>Style</i> <b>or</b> <i>BS_MULTILINE</i>;\r\n<b>end</b>;\r\n</pre>\r\nボタンを作成できたら、キャプションに改行コードつきの文字列を渡します。改行コードは#13#10です。(例 \'1行目\' + #13#10 + \'2行目\')\r\n<pre class=\"code\">\r\n<b>procedure</b> TForm1.Create(Sender: TObject);\r\n<b>begin</b>\r\n  Caption := \'1行目\' + #13#10 + \'2行目\';\r\n<b>end</b>;\r\n</pre>',1,11446,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0005',3,0,'2001-09-01 21:58:00','[Delphi] 2行表示のリストを作成する','','<p>2行表示のリストを作成するには、OnDrawItem イベントと OnMeasureItem イベントを使用します。<br />\r以下のステップで行います。</p>\r<ol>\r    <li>OnMeasureItemイベントで2行分表示するための高さを確保します。</li>\r    <li>OnDrawItemイベントでCanvasにテキストを描画します。</li>\r    <li>Styleを「lbOwnerDrawVariable」に変更します。（自分で中身を書き換えますよ！という定義）</li>\r</ol>\r<p>この方法は、TCheckListBox でも使用できます。（2行目が固定で&ldquo;2行目&rdquo;になっているので、お好みに合わせて変更してください。 また、Styleを「lbOwnerDrawVariable」に変更するのを忘れないでください。）</p>','<pre class=\"brush: delphi;\">\rprocedure TForm1.ListBox1MeasureItem(Control: TWinControl; Index: Integer;\r  var Height: Integer);\rbegin\r  Height := -1 * TListBox(Control).Font.Height * 2 + 6; // リストボックスの1項目の高さを設定\rend;\r\rprocedure TForm1.ListBox1DrawItem(Control: TWinControl; Index: Integer;\r  Rect: TRect; State: TOwnerDrawState);\rbegin\r  with TListBox(Control) do\r  begin\r  Canvas.FillRect(Rect);\r  Canvas.TextOut(Rect.Left + 2, Rect.Top + 2, Items[Index]);                 // 1行目\r  Canvas.TextOut(Rect.Left + 2, Rect.Top + (-1 * Font.Height) + 4, \'2行目\'); // 2行目\r  end;\rend;\r</pre>',1,4576,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-03 01:38:37','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0006',3,0,'2001-09-01 22:00:00','[Delphi] TMemoで、先頭行/最終行/指定行へ移動する','','<p>Windows APIをいくつか使って移動行数を計算し移動しています。</p>\r<ul>\r    <li>EM_LINEFROMCHAR&nbsp; 現在のカーソル位置を取得するのに使用</li>\r    <li>EM_LINESCROLL&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 行を移動させるのに使用</li>\r    <li>EM_GETLINECOUNT&nbsp;&nbsp; TMemoの行数を取得するのに使用</li>\r    <li>EM_LINEINDEX&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp; 現在のカーソル位置を設定するのに使用</li>\r</ul>','<p>例として先頭行/最終行/指定行に移動するサンプルを示します。</p>\r<pre class=\"brush: delphi;\">\r// 先頭行へ \rprocedure TForm1.Button1Click(Sender: TObject);\rvar\r  iLineNow: integer;\rbegin\r  with Memo1 do\r  begin\r    // 現在のカーソルのある行を得る\r    iLineNow := SendMessage(Handle, EM_LINEFROMCHAR, SelStart, 0); \r    // 先頭行へスクロール\r    SendMessage(Handle, EM_LINESCROLL, 0, -iLineNow);         // 現在の行数だけ戻る\r    SelStart := 0;\r    SetFocus;\r   end;\rend;\r\r// 最終行へ \rprocedure TForm1.Button2Click(Sender: TObject);\rvar\r  iLineNow: integer;\r  iLineLast: integer;\rbegin\r  with Memo1 do\r  begin\r    iLineNow := SendMessage(Handle, EM_LINEFROMCHAR, SelStart, 0);\r    iLineLast := SendMessage(Handle, EM_GETLINECOUNT, 0, 0);\r    SendMessage(Handle, EM_LINESCROLL, 0, iLineLast - iLineNow);\r    SelStart := SendMessage(Handle, EM_LINEINDEX, iLineLast-1, 0);\r   end;\rend;\r\r// 指定行へ (指定行をEdit1で指定します。) \rprocedure TForm1.Button3Click(Sender: TObject);\rvar\r  iLineNow: integer;\r  iLineTo:  integer;\rbegin\r  with Memo1 do\r  begin\r    iLineNow := SendMessage(Handle, EM_LINEFROMCHAR, SelStart, 0);\r    iLineLast := SendMessage(Handle, EM_GETLINECOUNT, 0, 0);\r    iLineTo := StrToInt(Edit1.Text);\r    // 指定行が最終行以降の場合、最終行に移動\r    if (iLineTo &lt;= iLineLast) then iLineTo := LineLast;\r    SendMessage(Handle, EM_LINESCROLL, 0, iLineTo - iLineNow);\r    SelStart := SendMessage(Handle, EM_LINEINDEX, iLineTo -1, 0);\r  end;\rend;\r</pre>\r<p>サンプルプログラムのダウンロードは&rarr;[File:22]</p>',1,23002,0,1,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-03 01:36:46','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0007',3,0,'2001-09-01 22:11:00','[Delphi] 長いファイル名の途中を省略する','','<p>MinimizeName 関数を使用します。<br />\rインストール画面などでよく見かける、ファイル名の途中を...で省略した文字列を作成するために、DelphiではMinimizeName関数が用意されています。<br />\r<br />\r注意 この関数を使用するためには、usesにFilectrlユニットを追加する必要があります。</p>','<p>例としてエディットボックスにアプリケーションのEXE名を表示します。</p>\r<pre class=\"brush: delphi;\">\rtype\r  TForm1 = class(TForm)\r    Edit1: TEdit;\r    procedure FormCreate(Sender: TObject);\r  private\r  { Private 宣言 }\r  public\r  { Public 宣言 }\r  end;\r\rvar\r Form1: TForm1;\r\rimplementation\r\ruses\r Filectrl;\r\r{&#36;R *.DFM}\r\rprocedure TForm1.FormCreate(Sender: TObject);\rbegin\r  Edit1.Text := MinimizeName(Application.ExeName, Canvas, Edit1.Width);\rend;\r</pre>',1,5971,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-03 01:33:37','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0008',3,0,'2001-09-01 22:11:01','[Delphi] アプリケーションの多重起動を防止する (Win32)','','<p>Atomを使う方法 FindWindow を使う方法などアプリケーションの多重起動防止方法にはいろいろありますが、 ここではもっとも実装が簡単だと思われるMutexを使った方法をご紹介します。<br />\rWindows APIの CreateMutex を使用して Mutex を作成します。すでに同じ名前を持つ Mutex が作成されていた場合、 CreateMutex は｢ERROR_ALREADY_EXISTS｣を返します。この場合実行を進めると二重起動となるので、 すぐに RelaseMutex で Mutex を開放して終了します。その他の場合には、通常通りプログラムを起動します。<br />\r<br />\r<em>※注意 CreateMutex を使用するには、uses 節に Windows ユニットを追加する必要があります。</em></p>','<p>以下に例を示します。以下の例は、すでにアプリケーションのほかのインスタンスが起動していた場合には、 そのインスタンスをアクティブにする処理が追加されています。<br />\r(ほぼ同時に起動した場合、アクティブにできない可能性があります。)</p>\r<pre class=\"brush: delphi;\" title=\"多重起動防止\">\rprogram Project1;\r\ruses\r  Windows,\r  Forms,\r  Unit1 in \'Unit1.pas\' {Form1};\r\r{&#36;R *.RES}\r\rvar\r  hMutex: THandle;\r  hApp: THandle;\rbegin\r  // ユニークな名前でMutexを作成する \r  hMutex := CreateMutex(nil, true, \'MyApp\');\r  // もし失敗したら、すでにほかのインスタンスが存在する\r  if (hMutex &lt;&gt; 0) and (GetLastError() = ERROR_ALREADY_EXISTS) then\r  begin\r    Application.MessageBox(\'すでに起動しています。2つ同時には起動できません。\',\r      \'多重起動禁止\', MB_ICONERROR or MB_OK);\r    // 探すWindowはMainFormで、引数にMainFromのクラスと、キャプションを指定\r    hApp := FindWindow(\'TForm1\', \'Form1\');    // 探すWindowは、MainForm\r    if (hApp &lt;&gt; 0) then SetForeGroundWindow(hApp);\r  end\r  else\r  begin\r    Application.Initialize;\r    // MainFormには、ユニークなクラス名とキャプションをつけたほうがいいです\r    Application.CreateForm(TForm1, Form1);\r    Application.Run;\r  end;\r  if (hMutex &lt;&gt; 0) then ReleaseMutex(hMutex);\r  if (hMutex &lt;&gt; 0) then CloseHandle(hMutex);\rend.\r</pre>',1,15439,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-18 13:21:58','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0009',3,0,'2001-09-01 22:14:00','[Delphi] DBGridの自動レコード追加機能を抑止する',null,'<p>この機能を実現するには2つの方法があります。<br />\r\n1つはTable側で新規レコードを追加させないようにする方法 と DBGrid側でチェックする方法があります。<br />\r\n本当はDBGrid本体で新規レコード行を表示しないようできると便利だと思うのですが、\r\nコンポーネントを修正しないとだめなので簡単にできる方法を紹介します。</p>','<p>テーブル側で処理する方法</p>\r\n<p class=\"code\">\r\n<span class=\"key\">procedure</span> TForm1.Tbable1BeforeInsert(DataSet: TDataset);<br />\r\n<span class=\"key\">begin</span><br />\r\n&nbsp; Abort;<br />\r\n<span class=\"key\">end</span>;</p>\r\n<p>DBGrid で処理する方法</p>\r\n<pre class=\"code\">\r\n<span class=\"key\">procedure</span> TForm1.DBGrid1KeyDown(Sender: TObject; var Key: Word;\r\n  Shift: TShiftState);\r\n<span class=\"key\">begin</span>\r\n  <span class=\"key\">with</span> DBGrid1.DataSource.DataSet <span class=\"key\">do</span>\r\n  <span class=\"key\">begin</span>\r\n    <span class=\"key\">if</span> (Key = VK_DOWN) <span class=\"key\">then</span>\r\n    <span class=\"key\">begin</span>\r\n      DisableControls;\r\n      Next;\r\n      <span class=\"key\">if</span> (EOF) <span class=\"key\">then</span> Key := 0\r\n      <span class=\"key\">else</span> Prior;\r\n      EnableControls;\r\n    <span class=\"key\">end</span>;\r\n  <span class=\"key\">end</span>;\r\n<span class=\"key\">end</span>;\r\n</pre>',1,11010,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0010',3,0,'2001-09-01 22:16:00','[Delphi] DBGrid で入力中の文字列を確認する','','<p>DBGrid で入力中の文字列はどうすれば確認できるでしょうか？DBGrid から確定されて DataSet にデータが更新されたら Field の値を確認できるんですが。<br />DBGrid で入力中の文字列は DBGrid にある InplaceEditor に保持されています。<br />ですからキー押されて文字が入力されたときに InplaceEditorの値をとってきて確認します。</p>','<p>以下の例は、Form に DBGrig と Label を 追加し、DBGridに OnkeyUp イベントを作成しています。</p>\r<pre class=\"brush: delphi\" title=\"DBGrid.OnkeyUpのサンプル\">procedure TForm1.DBGrid1KeyUp(Sender: TObject; var Key: Word;\r  Shift: TShiftState);\rvar\r  Pos: integer;\rbegin\r  for Pos := 0 to Pred(DBGrid1.ControlCount) do\r    if (DBGrid1.Controls[Pos] is TInPlaceEdit) then\r    begin\r      with TInPlaceEdit(DBGrid1.Controls[Pos]) do\r      begin\r        Label1.Caption := \'Text = \' + Text;\r      end;\r    end;\rend;\r</pre>',1,7678,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 11:27:10','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0011',3,0,'2001-09-01 23:11:00','[Delphi] スタートメニューにプログラムグループを作る',null,'<p>SHGetSpecialFolderLocationとSHGetPathFromIDListのコンビネーションです。<br />\r\n実際のフォルダの作成には、CreateDirectoryを使っています。</p>','<pre class=\"code\">\r\n<span class=\"key\">uses</span>\r\n  shlobj;\r\n\r\n<span class=\"key\">function</span> CreateFolder(Foldername: <span class=\"key\">String</span>; aLocation: integer): boolean; \r\n<span class=\"key\">var</span>\r\n  pIdl: PItemIDList; \r\n  hPath: PChar;\r\n<span class=\"key\">begin</span> \r\n  Result := False; \r\n  <span class=\"key\">if</span> SUCCEEDED(SHGetSpecialFolderLocation(0, aLocation, pidl)) <span class=\"key\">then</span> \r\n  <span class=\"key\">begin</span> \r\n    hPath := StrAlloc(max_path); \r\n    SHGetPathFromIDList(pIdl, hPath); \r\n    SetLastError(0); \r\n    CreateDirectory(PChar(hPath + \'\\\\\' + Foldername), <span class=\"key\">nil</span>); \r\n    <span class=\"key\">if</span> (GetLastError()=0) <span class=\"key\">or</span> (GetLastError() = ERROR_ALREADY_EXISTS) <span class=\"key\">then</span>\r\n    <span class=\"key\">begin</span>\r\n      Result := true;\r\n    <span class=\"key\">end</span>;\r\n    StrDispose(hPath); \r\n  <span class=\"key\">end</span>; \r\n<span class=\"key\">end</span>; \r\n\r\n<span class=\"key\">procedure</span> TForm1.Button1Click(Sender: TObject); \r\n<span class=\"key\">begin</span> \r\n  // constants like \'CSIDL_PROGRAMS\' are defined in ShlObj \r\n  CreateFolder(\'MyProgramgroup\',CSIDL_PROGRAMS); \r\n<span class=\"key\">end</span>;\r\n</pre>',1,3918,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0012',3,0,'2001-09-01 23:15:00','[Delphi] エクスプローラのように履歴を残しながら、ファイルのコピーや移動を行う','','<p>SHFileOperation を利用すると、エクスプローラのように履歴を残しながらのコピーと移動が行えます。<br />さらにコピーのアニメーションまでします。応用でゴミ箱にファイルを削除することも可能です。<br />Shell 関係の API を利用するので、ShellAPI を uses に追加する必要があります。</p>','<p>以下のサンプル関数で、ファイルのコピーが可能です。<br />SHFileOpStruct構造体の値を変更することで、移動やゴミ箱に削除などの応用が可能です。<br />Win32 APIなので、文字列はPWideChar (非Unicode環境ではPChar)にキャストしています。</p>\r<pre class=\"brush: delphi\" title=\"SHFileOperationでのファイルコピー例\">uses\r  ShellAPI;\r\rfunction FileCopy(Source, Destination: String): boolean;\rvar\r  ShFileOpStruct: TSHFileOpStruct; \rbegin\r  with ShFileOpStruct do\r  begin\r    wnd := Application.Handle;\r    wFunc := FO_COPY;                     // FO_MOVE であれば、移動になります\r{&#36;IFDEF UNICODE}\r    pFrom := PWideChar(Source + #0);      // 移動元ファイル名\r    pTo := PWideChar(Destination + #0);   // 移動先ファイル名\r{&#36;ELSE}\r    pFrom := PChar(Source + #0);          // 移動元ファイル名\r    pTo := PChar(Destination + #0);       // 移動先ファイル名\r{&#36;ENDIF}\r    fFlags := FOF_ALLOWUNDO;              // できる限りアンドゥ情報を保持するように\r    fAnyOperationsAborted := false;\r    hNameMappings := nil;\r    lpszProgressTitle := nil;\r  end;\r\r  // 正常終了であれば、Trueを返します\r  Result := (SHFileOperation(ShFileOpStruct) = 0);\rend;\r</pre>',1,6167,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-05-11 17:48:24','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0014',3,0,'2001-09-02 08:26:00','[Delphi] DBGrid のセルを内容によって文字色を変える',null,'<p>DBGrid のセルの色や、文字列の色を変更するには、自分で Canvas に対して色をしていなければなりません。<br />\r\n文字の色を変更するには、Canvas の Font プロパティの Color プロパティを変更します。<br />\r\nFont プロパティのそのほかのプロパティも変更可能なので、太字などにも変更可能です。<br />\r\nまた、セル全体の色を変更するには Canvas プロパティを変更した上でさらに塗りつぶしが必要です。<br />\r\n塗りつぶしには、Canvas の FillRect メソッドを使用します。同名の API も存在しますが、メソッドの方が楽でしょう<br />\r\n範囲は、パラメータで与えられた Rect を使用します。詳細はヘルプや VCL ソースコードを参照してみてください。</p>','<p>以下はDelphi付属の｢DBDEMOS｣にある「COUNTRY」データベースを、グリッドに表示した場合のサンプルです。<br />\r\n人口が2千万人を超える国ついては、人口が赤色で描画されます。</p>\r\n<pre class=\"code\">\r\n<span class=\"key\">procedure</span> TForm1.DBGrid1DrawColumnCell(Sender: TObject); \r\n<span class=\"key\">const</span> Rect: \r\n  TRect; DataCol: Integer; Column: TColumn; State: TGridDrawState); \r\n<span class=\"key\">begin</span> \r\n  <span class=\"key\">if</span> Table1.FieldByName(\'Population\').AsInteger &gt; 20000000 <span class=\"key\">then</span>\r\n  <span class=\"key\">begin</span>\r\n    TDBGrid(Sender).Canvas.Font.Color := clRed;\r\n  <span class=\"key\">end</span>;\r\n  TDBGrid(Sender).DefaultDrawColumnCell(Rect, DataCol, Column, State); \r\n<span class=\"key\">end</span>; \r\n</pre>',1,17728,2,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0015',3,0,'2001-09-02 08:29:00','[Delphi] OS上の特別なフォルダの場所を取得する(with Windows API)','','<p>以下のサンプルコードを参考にしてください。<br />\rこのサンプルアプリケーションは、どのようにしてファイル、フォルダ、ドライブの情報を取得するかを提供しています。<br />\rこのサンプルではWinAPI(｢SHGetSpecialFolderLocation｣と｢SHGetPathFromIDList｣)を使用しているため、 uses に定義が書いてある｢ShlObj｣と、Olecheckのために｢ComObj｣を追加する必要があります。</p>\r<p>サンプルプログラムのダウンロードは&rarr;[File:23]</p>','<p>以下は、個人のスタートアップフォルダを取得する例です。</p>\r<pre class=\"brush: delphi;\" title=\"GetStartupFolderPath\">\rfunction GetStartupFolderPath: String;\rvar\r  IIDList: PItemIDList;\r  buffer: array [0..MAX_PATH] of char;\rbegin\r  IIDList := nil;\r  \r  OleCheck(SHGetSpecialFolderLocation(Application.Handle, \r    CSIDL_STARTUP, IIDList));\r  if not SHGetPathFromIDList(IIDList, buffer) then\r  begin\r    raise Exception.Create(\'仮想フォルダのため取得できません\');\r  end;\r  Result := StrPas(Buffer);\rend;\r</pre>\r<p>Delphi5ではもっと簡単にするためにShlObjに、｢SHGetSpecialFolderPath｣関数が用意されています。この関数の使い方はサンプルを参照してください。下に例を示します。</p>\r<pre class=\"brush: delphi;\" title=\"SHGetSpecialFolderPath\">\r  SHGetSpecialFolderPath(\r    0,\r    szPath,\r    CSIDL_DESKTOP,\r    false\r  );\r</pre>\r<p>このほかに、システムフォルダを取得する定数ほかに以下に示すようなものがあります。詳しくはShlObjを参照していただきたいのですが、仮想フォルダのため実際のパスを取得できないケースも多々あります。</p>\r<table width=\"80%\">\r    <tbody>\r        <tr>\r            <td>値</td>\r            <td>説明</td>\r        </tr>\r        <tr>\r            <td>CSIDL_DESKTOP</td>\r            <td>デスクトップ</td>\r        </tr>\r        <tr>\r            <td>CSIDL_PROGRAMS</td>\r            <td>x:&#092;Document and Settings&#092;[User Name]&#092;スタート メニュー&#092;プログラム</td>\r        </tr>\r        <tr>\r            <td>CSIDL_PERSONAL</td>\r            <td>My Documents</td>\r        </tr>\r        <tr>\r            <td>CSIDL_FAVORITES</td>\r            <td>お気に入り</td>\r        </tr>\r        <tr>\r            <td>CSIDL_STARTUP</td>\r            <td>スタートアップ（英語）</td>\r        </tr>\r        <tr>\r            <td>CSIDL_RECENT</td>\r            <td>最近使ったファイル</td>\r        </tr>\r        <tr>\r            <td>CSIDL_SENDTO</td>\r            <td>送る</td>\r        </tr>\r        <tr>\r            <td>CSIDL_STARTMENU</td>\r            <td>スタートメニュー</td>\r        </tr>\r        <tr>\r            <td>CSIDL_DESKTOPDIRECTORY</td>\r            <td>デスクトップ</td>\r        </tr>\r        <tr>\r            <td>CSIDL_NETHOOD</td>\r            <td>NetHood</td>\r        </tr>\r        <tr>\r            <td>CSIDL_FONTS</td>\r            <td>フォントフォルダ</td>\r        </tr>\r        <tr>\r            <td>CSIDL_TEMPLATES</td>\r            <td>テンプレート</td>\r        </tr>\r        <tr>\r            <td>CSIDL_COMMON_STARTMENU</td>\r            <td>All Users&#092;スタートメニュー</td>\r        </tr>\r    </tbody>\r</table>',1,9508,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.blackcat.xyz/filemgmt/index.php/23\">[Delphi FAQ用サンプ...</a>',0,1,0,0,0,'2011-08-18 16:44:27','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0016',3,0,'2001-09-02 08:34:00','[Delphi] OS上の特別なフォルダの場所を取得する(with registry)','','<p>以下のサンプルコードを参考にしてください。<br />\rレジストリからOS上の特別なフォルダ(デスクトップやProgram Filesなど)を取得します。<br />\rTRegistryを使用しているので、｢Registry｣をusesに追加するのを忘れないでください。</p>','<pre class=\"code\"><span class=\"key\">const</span>\r  cShellAppData = \'AppData\'; \r  cShellCache = \'Cache\'; \r  cShellCookies = \'Cookies\'; \r  cShellDesktop = \'Desktop\'; \r  cShellFavorites = \'Favorites\'; \r  cShellFonts = \'Fonts\'; \r  cShellHistory = \'History\'; \r  cShellLocalApp = \'Local AppData\'; \r  cShellNetHood = \'NetHood\'; \r  cShellPersonal = \'Personal\'; \r  cShellPrintHood = \'PrintHood\'; \r  cShellPrograms = \'Programs\'; \r  cShellRecent = \'Recent\'; \r  cShellSendTo = \'SendTo\'; \r  cShellStartMenu = \'Start Menu\'; \r  cShellStartUp = \'Startup\'; \r  cShellTemplates = \'Templates\'; \r\r<span class=\"key\">function</span> GetShellFolder (<span class=\"key\">const</span> folder: <span class=\"key\">string</span>):\r<span class=\"key\">string</span>;\r<span class=\"key\">const</span>\r  cWin32 = \'SOFTWAREMicrosoftWindowsCurrentVersion\';\r  cSHellPrefix = \'ExplorerShell Folders\'; \r<span class=\"key\">var</span>\r  reg: TRegistry; \r<span class=\"key\">begin</span>\r  Result:= \'\'; \r  reg:= TRegistry.Create; \r  <span class=\"key\">try</span> \r    reg.Rootkey := \'HKEY_CURRENT_USER\'; \r    // NTと95/98で違いはありません\r    <span class=\"key\">if</span> reg.OpenKey (cWin32 + cShellPrefix, false) <span class=\"key\">then</span>\r    <span class=\"key\">begin</span>\r      Result:= reg.ReadString(folder) + \'\';\r    <span class=\"key\">end</span>;\r  <span class=\"key\">finally</span>\r    reg.Free;\r  <span class=\"key\">end</span>;\r<span class=\"key\">end</span>;\r</pre>\r<p>以下のように使用します。(Program Filesを取得する場合)</p>\r<pre class=\"code\">\r  folder := GetShellFolder(cShellPrograms);\r</pre>',1,4377,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-09-08 17:55:16','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0017',3,0,'2001-09-02 12:09:00','[Delphi] スクリーンの解像度を変更する',null,'以下のサンプルコードを参考にしてください。<br />\nこのサンプルアプリケーションは、画面の解像度を変更する方法を示しています。<br />\n<em>※注意\nこのサンプルの使用においては、注意して使用してください。\nハードウェアの対応外の解像度に設定した場合、そのハードウェアに悪影響がある場合があります。</em>\n<pre class=\"code\">\n<b>procedure</b> SetResolution(ResX, ResY: <b>DWord</b>); \n<b>var</b> \n  lDeviceMode : TDeviceMode; \n<b>begin</b> \n  EnumDisplaySettings(<b>nil</b>, 0, lDeviceMode); \n  lDeviceMode.dmFields := DM_PELSWIDTH or DM_PELSHEIGHT; \n  lDeviceMode.dmPelsWidth := ResX; \n  lDeviceMode.dmPelsHeight := ResY; \n  ChangeDisplaySettings(lDeviceMode, 0); \n<b>end</b>;\n</pre>','',1,4158,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0013',3,0,'2001-09-02 12:09:00','[Delphi] 電子メールを送る',null,'<p>ShellExecuteを使うとデフォルトのEメールソフトでメールを送ります。<br />\r\nもし必要であれば、メールの件名も設定できます。</p>\r\n<pre class=\"code\">\r\n<span class=\"key\">uses</span>\r\n  ShellAPI;\r\n\r\nShellExecute(0, \'open\', \'mailto:me@hogehoge.com?subject=Kenmei_wo_koko_ni\', <span class=\"key\">nil</span>, <span class=\"key\">nil</span>, SW_SHOWNORMAL);\r\n</pre>','',1,4474,26,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0018',3,0,'2001-09-02 12:11:00','[Delphi] メニューのフォントサイズの取得･設定方法',null,'以下のサンプルコードを参考にしてください。<br />\nこのサンプルアプリケーションは、メニューのフォントサイズの変更方法を示しています。<br />\n<br />\n<em>注意: フォントサイズを変更するとシステム設定である｢画面のプロパティ｣-｢デザイン｣のメニューフォントサイズが変更されます。したがって依存しているアプリケーションすべてが\n変更されます。</em><br />\n<pre class=\"code\">\n{ メニューフォントサイズの取得 } \n<b>function</b> GetMenuFontSize: integer; \n<b>var</b> \n  ncm: TNonClientMetrics; \n  PixelsPerInch: integer; \n<b>begin</b> \n  ncm.cbSize := sizeof(TNonClientMetrics); \n  SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS),\n    @ncm, SPIF_UPDATEINIFILE); \n  PixelsPerInch := GetDeviceCaps(GetDC(0), LOGPIXELSY); \n  Result := -MulDiv(ncm.lfMenuFont.lfHeight, 72, PixelsPerInch); \n<b>end</b>; \n\n{ メニューフォントサイズの設定 } \n<b>procedure</b> SetMenuFontSize(FontSize: integer); \n<b>var</b> \n  ncm: TNonClientMetrics; \n  PixelsPerInch: Integer; \n<b>begin</b> \n  ncm.cbSize := sizeof(TNonClientMetrics); \n  SystemParametersInfo(SPI_GETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS),\n    @ncm, 0); \n  PixelsPerInch := GetDeviceCaps(GetDC(0), LOGPIXELSY); \n  ncm.lfMenuFont.lfHeight := -MulDiv(FontSize, PixelsPerInch, 72); \n  SystemParametersInfo(SPI_SETNONCLIENTMETRICS, sizeof(NONCLIENTMETRICS),\n    @ncm, SPIF_UPDATEINIFILE); \n<b>end</b>;\n</pre>','',1,10299,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0019',3,0,'2001-09-02 12:13:00','[Delphi] DDE でブラウザをクローズする','','<p>DDEを使ってブラウザにクローズ命令を送ります。<br />\r(このプロシージャを作成するフォームには｢DDEMan｣をusesに追加する必要があります。)<br />\rSendMessageでWM_CLOSEを送っても終了します。</p>','<pre class=\"brush: delphi;\">\rprocedure Tform1.CloseBrowser(BrowserName: String);\rvar\r  DDE:TDDEClientConv;\rbegin\r  DDE := TDDEClientConv.Create(Self);\r  try\r    // コメントブロック内は最後のブラウザのインスタンスのみ終了させる場合に\r    // 使用します。この場合、下側のwhile側をコメントアウトしてください。\r{\r    if DDE.SetLink(BrowserName,\'WWW_Exit\') then\r    begin\r      if DDE.PokeData(\'anything\' ,\'anything\') then\r      begin\r        ShowMessage(\'Browser closed\');  // この行は特に必要ありません\r      end;\r    end;\r}\r    while DDE.SetLink(BrowserName,\'WWW_Exit\') do\r    begin\r      if DDE.PokeData(\'anything\' ,\'anything\') then\r      begin\r        ShowMessage(\'Browser was closed\'); // この行は特に必要ありません\r      end;\r    end;\r  finally\r    DDE.Free;\r  end;\rend;\r</pre>\r<p>この関数をコールするには、プラウダがインターネットエクスプローラの場合には｢IExplore｣を Netscape Communicator 3.x の場合には｢Netscape｣、4.0 以降の場合には｢NSShell｣を引数に与えてやる必要があります。</p>\r<pre class=\"brush: delphi;\">\rprocedure TForm1.Button1Click(Sender: TObject);\rbegin\r  CloseBrowser(\'IExplore\');\rend;</pre>',1,4404,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-03 01:32:09','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0020',3,0,'2001-09-02 12:14:00','[Delphi] ファイル情報を取得する','','<p>以下のサンプルコードを参考にしてください。<br />このサンプルアプリケーションは、どのようにしてファイル、フォルダ、ドライブの情報を取得するかを提供しています。</p>\r<p>サンプルプログラムのダウンロードは&rarr;[File:24]</p>','<pre class=\"brush: delphi\">unit Unit1;\r\rinterface\r\ruses\r  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,\r  StdCtrls, ShellApi, FileCtrl;\r\rtype\r  TForm1 = class(TForm)\r    Button1: TButton;\r    Label1: TLabel;\r    Edit1: TEdit;\r    Label2: TLabel;\r    Edit2: TEdit;\r    Label3: TLabel;\r    Edit3: TEdit;\r    Label4: TLabel;\r    FileListBox1: TFileListBox;\r    DirectoryListBox1: TDirectoryListBox;\r    DriveComboBox1: TDriveComboBox;\r    Label5: TLabel;\r    Edit4: TEdit;\r    Edit5: TEdit;\r    Label6: TLabel;\r    procedure Button1Click(Sender: TObject);\r    procedure FormPaint(Sender: TObject);\r  private\r  public\r  end;\r\rvar \r Form1: TForm1;\r FileInfo: SHFILEINFO; \r\rimplementation \r\r{&#36;R *.DFM} \r\rprocedure TForm1.Button1Click(Sender: TObject); \rvar\r  Filename: String;\r  attrs: string;\r  attributes: integer;\rbegin \r  Form1.Repaint;\r  if (filelistbox1.ItemIndex &lt;&gt; - 1) then\r  begin \r    Filename := FileListBox1.FileName; \r  end \r  else \r  begin\r    Filename := DirectoryListBox1.Directory; \r  end; \r  Edit1.Text := filename; \r  // 表示名の取得\r  SHGetFileInfo(PChar(FileName), 0, FileInfo, SizeOf(FileInfo), SHGFI_DISPLAYNAME);\r  Edit2.Text := FileInfo.szDisplayName; \r  // ファイル種別の取得\r  SHGetFileInfo(PChar(FileName), 0, FileInfo, SizeOf(FileInfo), SHGFI_TYPENAME);\r  Edit3.Text := FileInfo.szTypeName; \r  // ファイルに関連づいたアイコンの取得\r  SHGetFileInfo(PChar(FileName), 0, FileInfo, SizeOf(FileInfo), SHGFI_ICON);\r  Drawicon(canvas.handle,5,170,FileInfo.hIcon);\r  Form1.Repaint; \r  // ファイル属性の取得\r  attributes := GetFileAttributes(PChar(FileName));\r  attrs := \'\';\r  if Bool(attributes and FILE_ATTRIBUTE_READONLY) then attrs := attrs + \'R\';\r  if Bool(attributes and FILE_ATTRIBUTE_HIDDEN) then attrs := attrs + \'H\';\r  if Bool(attributes and FILE_ATTRIBUTE_SYSTEM) then attrs := attrs + \'S\';\r  if Bool(attributes and FILE_ATTRIBUTE_ARCHIVE) then attrs := attrs + \'A\';\r  Edit4.text := attrs;\r  // 最終更新日付の取得\r  try\r    edit5.text := DateTimeToStr(FileDateToDateTime(FileAge(FileName)));\r  except\r    // ファイルが選択されていない場合(フォルダやドライブの場合)\r    on EConvertError do edit5.text := \'Not Available\'; \r  end; \rend;\r\rprocedure TForm1.FormPaint(Sender: TObject); \rbegin \r  // アイコンの再描画(画面外にフォームが出た場合など)\r  Drawicon(canvas.handle, 5, 170, FileInfo.hIcon);\rend; \rend.\r</pre>',1,12284,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.blackcat.xyz/filemgmt/index.php/24\">[Delphi FAQ用サンプ...</a>',0,1,0,0,0,'2012-07-09 17:39:33','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0021',3,0,'2001-09-02 12:17:00','[Delphi] TDataSet をカンマ区切り ASCII ファイルにエクスポートする',null,'以下のDataSetToASCII 手続きを使ってASCIIファイルにエクスポートします。<br />\nDataSetToASCIIは、TDataSetから指定されたASCIIファイルにレコードをエクスポートします。<br />\nフィールドは指定されたデリミタ文字により区切られ、レコードは改行コードによって区切られます。<br />\nまた引数 QuoteStrings が True の際には、以下の種類のフィールドは単一引用符によって囲われた形で出力されます。<br />\n最後に出力しない(したくない)フィールドは、Tag プロパティを0(デフォルト)以外に設定してください。<br />\n0以外に設定することでエクスポートの対象外となります。<br />\n<pre class=\"code\">\n<b>unit</b> Unit1;\n\n<b>interface</b>\n\n<b>uses</b>\n  Db, Classes, Dialogs, SysUtils;\n\n<b>procedure</b> DataSetToASCII(<b>const</b> ADataSet: TDataSet;<b>\n  const</b> ASCIIFile: TFileName; <b>const</b> Delimiter: Char;<b>\n  const</b> QuoteStrings: Boolean);\n\n<b>implementation</b>\n\n<b>procedure</b> DataSetToASCII(<b>const</b> ADataSet: TDataSet;\n  <b>const</b> ASCIIFile: TFileName; <b>const</b> Delimiter: Char;<b>\n  const</b> QuoteStrings: Boolean);\n<b>var</b>\n  i, LastIndex: LongInt;\n  AsciiRecord: <strong>String</strong>;\n<b>begin</b>\n  <b>with</b> TStringList.Create, ADataSet do\n  <b>try</b>\n    LastIndex:= Pred(Fields.Count);\n    First;\n    <b>while</b> <b>not</b> EOF <b>do</b>\n    <b>begin</b>\n      AsciiRecord:= \'\';\n      <b>for</b> i := 0 <b>to</b> LastIndex <b>do</b>\n      <b>begin</b>\n        <b>if</b> Fields.Fields[i].Tag = 0 <b>then</b>\n        <b>begin</b>\n          <b>if</b> (QuoteStrings) <b>and</b>\n            (Fields.Fields[i].DataType\n            <b>in</b> [ftString, ftMemo, ftFmtMemo, ftFixedChar, ftWideString]) <b>then</b>\n          <b>begin</b>\n            AsciiRecord := AsciiRecord + AnsiQuotedStr(Fields.Fields[i].AsString);\n          <b>end</b>\n          <b>else</b>\n          <b>begin</b>\n            AsciiRecord := AsciiRecord + Fields.Fields[i].AsString;\n          <b>end</b>;\n          <b>if</b> (i &lt; LastIndex) <b>then</b> AsciiRecord:= AsciiRecord + Delimiter;\n        <b>end</b>;\n      <b>end</b>;\n      Append(AsciiRecord);\n      Next;\n    <b>end</b>;\n    <b>try</b>\n      SaveToFile(ASCIIFile)\n    <b>except</b>\n      ShowMessage(\'テーブルは指定されたファイル: \' + ASCIIFile + \' にセーブできませんでした。\');\n    <b>end</b>;\n    <b>finally</b>\n    Free;\n  <b>end</b>;\n<b></b><b>end</b>;\n<b>end</b>.\n</pre>','',1,4561,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0022',3,0,'2001-09-02 12:18:00','[Delphi] キーボードとマウスを使えなくする',null,'Windows2000 / WindowsXP で動作確認しています。<br />\n以下のサンプルコードを実行すると、15秒間キーボードとマウスを受け付けなくなります。<br />\n以下のサンプルは、USER32.DLL にある BlockInput というエントリポイントの機能を使用しています。<br />\nBlockInput は引数に true を与えるとロックを false を与えるとロック解除します。<br />\n<pre class=\"code\">\n<b>function</b> FuncAvail(Lib, Func: <b>string</b>; <b>var</b> hnd: THandle; <b>var</b> ptr: <b>Pointer</b>): boolean;\n<b>begin</b>\n  Result := false;\n  hnd := 0;\n  <b>if</b> LoadLibrary(PChar(Lib)) = 0 <b>then</b>\n  <b>begin</b>\n    Exit;\n  <b>end;</b>\n  hnd := GetModuleHandle(PChar(Lib));\n  <b>if</b> (hnd &lt;&gt; 0) <b>then</b>\n  <b>begin</b>\n    ptr := GetProcAddress(hnd, PChar(Func));\n    <b>if</b> (ptr &lt;&gt; <b>nil</b>) <b>then</b>\n    <b>begin</b>\n      Result := true;\n    <b>end;</b>\n  <b>end</b>;\n<b>end</b>;\n\n<b>procedure</b> TForm1.Button1Click(Sender: TObject);\n<b>var</b>\n  hnd: THandle;\n  xBlockInput: <b>function</b>(Block: BOOL): BOOL; <strong>stdcall</strong>;\n<b>begin</b>\n  <b>if</b> FuncAvail(\'USER32.DLL\', \'BlockInput\', hnd, @xBlockInput) <b>then</b>\n  <b>begin</b> \n    xBlockInput(<b>true</b>);\n    Sleep(15000);         // 15秒 \n    xBlockInput(<b>false</b>); \n    FreeLibrary(hnd);\n  <b>end</b>;\n<b>end</b>;\n</pre>','',1,3947,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0023',3,0,'2001-09-02 12:20:00','[Delphi] 実行時にダイナミックにDLLをロードする','','<p>以下のサンプルコードは実行時にDLLを動的にロードし、その中のエントリポイントを取得します。<br />\rDLLがロードでき、エントリポイントが正常に見つかってその機能を使用できる場合には true を返しますが不幸にもロードできなかった場合にはfalseを返します。<br />\rGetModuleHandle、GetProcAddress WindowsAPIを使用して指定した名前のエントリポイントを探していますが、この方法はDelphiがControlユニットなどでIMMを使用するのに使っています。</p>\r<pre class=\"brush: delphi\">\rfunction FuncAvail(Lib, Func: string; var hnd: THandle; var ptr: \rPointer): boolean;\rbegin \r  Result := false;\r  hnd := 0;\r  if LoadLibrary(PChar(Lib)) = 0 then\r  begin\r    Exit;\r  end;\r  hnd := GetModuleHandle(PChar(Lib));\r  if (hnd &lt;&gt; 0) then\r  begin\r    ptr := GetProcAddress(hnd, PChar(Func));\r    if (ptr &lt;&gt; nil) then\r    begin\r      Result := true;\r    end;\r  end;\rend;</pre>','',1,6898,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-08 16:03:36','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0024',3,0,'2001-09-02 12:21:00','[Delphi] カレントレコードをコピーする','','<p>今見ているデータの一部を編集して、新しくデータを作成したいありませんか？こんなときには、現在のレコードをコピーしてそのレコードを編集するのが簡単!<br />ということで、以下はカレントレコードをコピーする関数の例です。</p>\r<pre class=\"brush: delphi\">procedure AppendCurrent(Dataset: TDataset); \rvar \r  aField: Variant; \r  i: Integer; \rbegin \r  // バリアント型の配列を作成 \r  aField := VarArrayCreate([0, Pred(DataSet.FieldCount)], VarVariant); \r  // フィールドのデータを先ほどの配列にコピー \r  for i := 0 to Pred(DataSet.FieldCount)do \r    aField[i] := DataSet.Fields[i].Value; \r  // 新規レコードを追加 \r  DataSet.Append ; \r  // 新規レコードに配列のデータを書き戻し \r  for i := 0 to Pred(DataSet.FieldCount)do \r    DataSet.Fields[i].Value := aField[i]; \rend; \r</pre>','',1,7357,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 14:06:48','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0025',3,0,'2001-09-02 12:22:00','[Delphi] 全角スペース文字対応のTrim','','<p>Delphiの標準関数(Trim、TrimLeft、TrimRight)は全角の空白を取り除いてくれません。 全角空白を取り除くためには、ループしてこの文字を見つけて取り除く必要があります。以下に全角対応のTrimを作成しました。</p>\r\n<p>※2012/05/02 Unicode対応</p>\r\n<ul>\r\n<li>ZTrim ... 全角対応 Trim</li>\r\n<li>LTrim ... 全角対応 TrimLeft</li>\r\n<li>RTrim ... 全角対応 TrimRight</li>\r\n</ul>','<pre class=\"brush: delphi;\">///全角対応トリム\r\n///トリム対象文字列\r\n/// トリム処理後文字列\r\nconst\r\n  SPACE = \' \';\r\n  ZENSPC = \'　\';\r\n\r\nfunction LTrim(s: String): String;\r\nvar\r\n  i, iLast: integer;\r\nbegin\r\n  i := 1;\r\n  iLast := Length(s);\r\n\r\n  while true do\r\n  begin\r\n    if (Copy(s, i, 1) = SPACE) then                         // 半角空白\r\n      inc(i)\r\n{$IFDEF UNICODE}\r\n    else if (Copy(s, i, 1) = ZENSPC) then                   // 全角空白\r\n      inc(i)\r\n{$ELSE}\r\n    else if ((Length(s) &gt;= 2) and (Copy(s, i, 2) = ZENSPC)) then  // 全角空白\r\n      inc(i, 2)\r\n{$ENDIF}\r\n    else\r\n      break;\r\n  end;\r\n  Result := Copy(s, i, iLast - i +1);\r\nend;\r\n\r\nfunction RTrim(s: String): String;\r\nvar\r\n  i: integer;\r\nbegin\r\n  i := Length(s);\r\n  while (i &gt; 0) do\r\n  begin\r\n    if (Copy(s, i, 1) = SPACE) then                         // 半角空白\r\n      dec(i)\r\n{$IFDEF UNICODE}\r\n    else if (Copy(s, i, 1) = ZENSPC) then                   // 全角空白\r\n      dec(i)\r\n{$ELSE}\r\n    else if ((Length(s) &gt;= 2) and (Copy(s, i-1, 2) = ZENSPC)) then  // 全角空白\r\n      dec(i, 2)\r\n{$ENDIF}\r\n    else\r\n      break;\r\n  end;\r\n  Result := Copy(s, 1, i);\r\nend;\r\n\r\nfunction ZTrim(s: String): String;\r\nbegin\r\n  Result := RTrim(LTrim(s));\r\nend;\r\n</pre>',2,15293,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2020-02-05 09:13:19','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0026',3,0,'2001-09-05 21:11:00','[Delphi] うるさい音をミュート！',null,'<p>音が出てうるさいと思ったことはありませんか？ また、何でここで音が出るんだろう？と思ったことはありませんか？ そんなときには強引に音が出るデバイスに対して止めに入るなんてのも1つの手かもしれませんね。<br />\rまず、｢Beep｣ボタンをクリックして音が出ることを確かめてください。音が出ることを確かめたら ｢Mute｣をクリックして音が出なくなるのを確かめます。最後に｢Loud｣をクリックして元の音量に戻ることを確かめてください。ただし｢Mute｣は2回クリックしないようにお願いします。</p>\r<p>サンプルプログラムのダウンロードは&rarr;[File:26]</p>','<pre><b>unit</b> USndVol;\r\r<b>interface</b>\r\r<b>uses</b>\r  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,\r  StdCtrls;\r\r<b>type</b>\r  TForm1 = <b>class</b>(TForm)\r    btnMute: TButton;\r    btnLoud: TButton;\r    btnBeep: TButton;\r    procedure btnMuteClick(Sender: TObject);\r    procedure btnLoudClick(Sender: TObject);\r    procedure btnBeepClick(Sender: TObject);\r  <b>private</b>\r    adwVol: <b>array</b> <b>of</b> DWORD;\r  <b>end</b>;\r<b>var</b>\r  Form1: TForm1;\r<b>implementation</b>\r\r<b>uses</b>\r  <em>mmsystem;</em>\r\r{&#36;R *.DFM}\r\r<b>procedure</b> TForm1.btnMuteClick(Sender: TObject);\r<b>var</b>\r  i, iDev: integer;\r  dwVolume: DWORD;\r<b>begin</b>\r  iDev := <em>waveOutGetNumDevs</em>;       // サウンドデバイス数を取得\r  SetLength(adwVol, iDev);         // 音量配列の初期化\r  <b>for</b> i := 0 <b>to</b> Pred(iDev) <b>do</b>\r  <b>begin</b>\r    <em>waveOutGetVolume</em>(i, @dwVolume); // それぞれのデバイスの音量を取得\r    adwVol[i] := dwVolume;         // 音量を配列に保存\r    <em>waveOutSetVolume</em>(i, &#36;0000);    // 消音\r  <b>end</b>;\r<b>end</b>;\r\r<b>procedure</b> TForm1.btnLoudClick(Sender: TObject);\r<b>var</b>\r  i, iDev: integer;\r<b>begin</b>\r  iDev := <em>waveOutGetNumDevs</em>;       // サウンドデバイス数を取得\r  <b>for</b> i := 0 <b>to</b> Pred(iDev) <b>do</b>\r    <em>waveOutSetVolume</em>(i, adwVol[i]); // 音量を復元\r<b>end</b>;\r\r<b>procedure</b> TForm1.btnBeepClick(Sender: TObject);\r<b>begin</b>\r  Beep;        // テスト用\r<b>end</b>;\r<b>end</b>.\r</pre>',1,7595,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2008-09-07 21:21:29','html',1,1,null,null,0,3,3,3,2,2,2);

INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0028',3,0,'2001-10-15 01:05:00','[Delphi] DateTimePicker の書式変更','','<p>DateTimePicker の書式を用途に応じて変更したくはないか？<br />Delphi の日付の書式は通常 LongDateFormat、ShortDateFormat 変数を変更するのだが、DateTimePicker はこの方法で変更できない。DateTimePicker には、Delphi の日付書式設定が全く効かない。<br />また、DateTimePicker のプロパティには、Short と Long の二通りの設定しかなく、年月だけ表示したい場合などやや柔軟性に欠ける。<br />従って、変更には以下の方法を使用することになる。<br />このときの書式には Delphi の書式ではなく、Windows の日付書式を使用することになる。また commctrl ユニットを uses 節に追加する必要がある。 <br /><br />※ Delphi で月をあらわす書式は \"mm\" だが、Windows では \"MM\" となる。</p>\r<pre class=\"brush: delphi\">uses\r  commctrl;\r\rprocedure ChangeDateFormat;\rvar\r  szFormat: PChar;\rbegin\r  szFormat := \'yyyy/MM/dd\';  // Windows の日付書式\r  SendMessage(DateTimePicker1.Handle, DTM_SETFORMAT, 0, longint(szFormat));\rend;\r</pre>','',1,9820,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 14:05:25','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0029',3,0,'2001-10-25 01:19:00','[Delphi] テキストファイル操作','','<p>テキストファイルを操作してプログラムの動作記録をとりませんか？ログをとっておくと後からデバッグを行うときにとっても便利。<br />ログの書き出し用にコンポーネントを作成すると使い回しが利いてさらに便利。<br />テキストファイルにログを書き込みための手順は以下のようになる。</p>\r<ol>\r<li>テキストファイルのオープン<br />テキストファイルのオープンは新規の場合と、すでにファイルがある場合とで異なる。<br />&nbsp; ・新規の場合 &rarr; Reset<br />&nbsp; ・すでに存在する場合 &rarr; Rewrite</li>\r<li>次にオープンしたファイルを上書き用に変更します。変更にはAppendを使用する。</li>\r<li>書き込みには Writeln と Flush を使用します。Writeln でバッファに書き込みし、Flush でバッファからテキストファイルに書き出す。</li>\r<li>書き込みが終わったら、CloseFileでクローズして終わる。</li>\r</ol>\r<p>以下にサンプルでログ出力用のサンプルのソースを掲載するので参考に。</p>\r<pre class=\"brush: delphi\">unit FileLogger;\r\rinterface\r\ruses\r  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs;\r\rtype\r  TFileLogger = class(TComponent)\r  private\r    FFile: TextFile;\r    FFilename: String;\r    FSeparator: String;\r    FDateFormat: String;\r    FTimeFormat: String;\r  protected\r    procedure Loaded; override;\r  public\r    constructor Create(AOwner: TComponent); override;\r    destructor Destroy; override;\r    procedure Report(sMsg: String);\r  published\r    property Filename: String read FFileName write FFileName;\r    property Separator: String read FSeparator write FSeparator;\r    property DateFormat: String read FDateFormat write FDateFormat;\r    property TimeFormat: String read FTimeFormat write FTimeFormat;\r  end;\r\rprocedure Register;\r\rimplementation\r\rprocedure Register;\rbegin\r  RegisterComponents(\'Sample\', [TFileLogger]);\rend;\r\r{ TFileLogger }\r\rconstructor TFileLogger.Create(AOwner: TComponent);\rbegin\r  inherited Create(AOwner);\r  // フォーマットの初期化\r  FDateFormat := \'yyyy/mm/dd\';\r  FTimeFormat := \'hh:nn:ss\';\r  FSeparator := #9;\rend;\r\rdestructor TFileLogger.Destroy;\rbegin\r  inherited;\r  CloseFile(FFile);\rend;\r\rprocedure TFileLogger.Loaded;\rvar\r  sFileName: String;\rbegin\r  inherited;\r  if (csDesigning in ComponentState) then Exit;\r  // ファイルポインタの初期化\r  if (FFilename &lt;&gt; \'\') then\r    sFilename := FFileName\r  else\r    sFilename := FormatDateTime(\'yyyymmdd\', Date) + \'.txt\';\r\r  AssignFile(FFile, sFilename);\r\r  if FileExists(sFilename) then\r    Reset(FFile)\r  else\r    Rewrite(FFile);\r  Append(FFile);\rend;\r\rprocedure TFileLogger.Report(sMsg: String);\rvar\r  s: String;\rbegin\r  s := FDateFormat + FSeparator + FTimeFormat + FSeparator;\r  s := FormatDateTime(s, Now) + sMsg;\r  Writeln(FFile, s);\r  Flush(FFile);\rend;\r\rend.\r</pre>\r<p>以上のコードがログ出力サンプルコンポーネントです。</p>','',1,32163,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 14:04:01','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0030',3,0,'2001-11-15 01:33:00','[Delphi] メモの行数を取得で Delphi と Windows API で違いが？','','<p>通常 Memo1.Lines.Count というように処理すると思います。実際にデータが入っている行数を取得する分にはこれで十分だと思います。<br />しかし、最終行に改行コードが入っていると、見た目にはもう一行空行が存在することになります。</p>\r<p>たとえば、新規にフォームに追加したTMemoは&ldquo;Memo1[改行コード]&rdquo;といったTextを持っています。このとき Memo1.Lines.Count では&ldquo;1&rdquo;が取得できますが、Windows API のEM_GETLINECOUNT を使えば、表示しているままの&ldquo;2&rdquo;が取得できます。<br />些細なことかもしれませんが、Memoの行数を制限したい場合などには有効に働きます。</p>\r<p>そのほか、コントロールの横幅が内容よりも小さくワードラップする場合には、TMemo の Count プロパティは論理行(エディタ的、改行コード+1)を返すようですが、Windows API を用いると物理行(ワープロ的、見た目どおり)を返すようです。</p>','<pre class=\"brush:delphi\">unit UMemoLine;\r\rinterface\r\ruses\r  Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,\r  StdCtrls;\r\rtype\r \rTForm1 = class(TForm)\r    Memo1: TMemo;\r    Button1: TButton;\r    Button2: TButton;\r    procedure Button1Click(Sender: TObject);\r    procedure Button2Click(Sender: TObject);\r  private\r    { Private 宣言 }\r   public\r    { Public 宣言 }\r  end;\r\rvar\r  Form1: TForm1;\r\rimplementation\r\r{&#36;R *.DFM}\r\rprocedure TForm1.Button1Click(Sender: TObject);\rbegin\r  ShowMessage(\'Linesで行数取得\' + IntToStr(Memo1.Lines.Count));\rend;\r\rprocedure TForm1.Button2Click(Sender: TObject);\rbegin\r  ShowMessage(\'WinAPIで行数取得\' + IntToStr(\r    SendMessage(Memo1.Handle, EM_GETLINECOUNT, 0, 0)));\rend;\r\rend.\r</pre>',1,11346,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-08-07 14:58:21','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0031',3,0,'2001-12-04 01:33:00','[Delphi] TMemo の最大入力行数を制限','','<p>TMemoの入力行数を制限できる方法。<br />TMemoを拡張して行数を制限できる新しいMemoコンポーネントを作成します。<br />新しいTMemoをTMemoExとします。このTMemoExには、1つのプロパティ、3つの変数と3つのメンバー関数を追加します。</p>\r<pre class=\"brush:delphi\">interface\r\rTMemoEx = class(TMemo)\rprivate\r  FMaxLines: Integer;\r  // 内部処理用\r  mLimitLineProc: Boolean;\r  mOldPos: Integer;\r  mOldText: String;\rprotected\r  procedure Change; override;\r  procedure DoEnter; override;\rpublic\r  constructor Create(AOwner: TComponent); override;\r  property MaxLines: Integer read FMaxLines write FMaxLines default 0;\rend;\r\rimplementation\r\rconstructor TProMemo.Create(AOwner: TComponent);\rbegin\r  inherited;\r  mOldPos := 0;\r  mOldText:= \'\';\r  FMaxLines := 0;\rend;\r\rprocedure TProMemo.DoEnter;\rbegin\r  inherited;\r  mOldPos := SelStart;\r  mOldText := Text;\rend;\r\rprocedure TProMemo.Change;\rbegin\r  if (mLimitLineProc) then Exit; // 再入時\r\r  // 現在の行数 &gt; 最大行数\r  if (FMaxLines &lt;&gt; 0) and (SendMessage(Handle, EM_GETLINECOUNT, 0, 0) &gt; FMaxLines) then\r  begin\r    mLimitLineProc := true; // 再入時用\r    Text := mOldText;\r    SelStart := mOldPos;\r    mLimitLineProc := false; // 再入時用\r  end;\r  mOldPos := SelStart;\r  mOldText := Text;\r  inherited;\rend;\r</pre>','',1,8992,1,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-08-07 14:59:46','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0032',3,0,'2001-12-18 05:53:00','[Delphi] タスクバーの大きさを知る','','<p>タスクバーの位置や大きさを知るにはどうしたらよいのでしょうか？ タスクバーの大きさを知るためには、SHAppBarMessage APIを使います。 このAPIでタスクバーの大きさがわかるのですが、このAPIで得られる値はなぜかタスクバーが画面をはみ出していることを示しています。<br />\rタスクバーの大きさを知りたい理由が、タスクバー以外の部分の画面の大きさを知るということであれば、SystemParametersInfo APIで知ることができるので、こちらを使うとよいでしょう。</p>\r<p>サンプルプログラムのダウンロードは&rarr;[File:28]</p>','<pre class=\"brush: delphi;\" title=\"タスクバーのサイズ取得\">\rimplementation\r\ruses\r  ShellApi;\r\r{&#36;R *.DFM}\r\rprocedure TForm1.btnGetTaskBarSizeClick(Sender: TObject);\rvar\r  AppBarData: TAPPBARDATA;\r  rc: TRect;\rbegin\r  // タスクバーの大きさ取得 **********************\r  AppBarData.cbSize := sizeof(TAPPBARDATA);\r  SHAppBarMessage(ABM_GETTASKBARPOS, AppBarData);\r  // 取得した情報をMemoコンポに表示\r  with Memo1, AppBarData do\r  begin\r    Clear;\r    Lines.Add(\'タスクバーの大きさ\');\r    Lines.Add(Format(\'Left   : %4d\', [rc.Left]));\r    Lines.Add(Format(\'Right  : %4d\', [rc.Right]));\r    Lines.Add(Format(\'Top    : %4d\', [rc.Top]));\r    Lines.Add(Format(\'Bottom : %4d\', [rc.Bottom]));\r  end;\r\r  // タスクバー以外のスクリーンの大きさ取得 *****\r  SystemParametersInfo(SPI_GETWORKAREA, 0, @rc, 0);\r  // 取得した情報をMemoコンポに表示\r  with Memo1 do\r  begin\r    Lines.Add(\'タスクバー以外の部分の大きさ\');\r    Lines.Add(Format(\'Left   : %4d\', [rc.Left]));\r    Lines.Add(Format(\'Right  : %4d\', [rc.Right]));\r    Lines.Add(Format(\'Top    : %4d\', [rc.Top]));\r    Lines.Add(Format(\'Bottom : %4d\', [rc.Bottom]));\r  end;\rend;\rend.\r</pre>',1,6324,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-12-22 23:21:24','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0033',3,0,'2002-01-27 22:55:00','[Delphi] Ini ファイルの読み書き','','<p>Iniファイルの読み書きの方法です。実数値を読み込んだ際に、書き込んだ違う値になっているかもしれません。これは、2進数で表すことができない数値を書き込んだからです。</p>\r<p>サンプルプログラムのダウンロードは&rarr;[File:29]</p>','<pre class=\"brush: delphi;\" title=\"Ini ファイルの読み書き\">\rimplementation\r\ruses\r  IniFiles;\r\r// Iniファイルへの書き込み\rprocedure TForm1.btnWriteClick(Sender: TObject);\rvar\r  Ini: TIniFile;\rbegin\r  Ini := TIniFile.Create(ChangeFileExt(Application.ExeName, \'.ini\'));\r  try\r    Ini.WriteString(\'セクション\', \'文字列型\', edtStr.Text);\r    Ini.WriteInteger(\'セクション\', \'整数値型\', StrToInt(edtInt.Text));\r    Ini.WriteFloat(\'セクション\', \'実数値型\', StrToFloat(edtFloat.Text));\r    Ini.WriteBool(\'セクション\', \'論理値型\', chkBool.Checked);\r  finally\r    Ini.Free;\r  end;\rend;\r\r// Iniファイルからの読み込み\rprocedure TForm1.btnReadClick(Sender: TObject);\rvar\r  Ini: TIniFile;\r  s: String;\r  i: integer;\r  f: Single;\r  b: Boolean;\rbegin\r  Ini := TIniFile.Create(ChangeFileExt(Application.ExeName, \'.ini\'));\r  try\r    s := Ini.ReadString(\'セクション\', \'文字列型\', \'デフォルト値\');\r    i := Ini.ReadInteger(\'セクション\', \'整数値型\', 0);\r    f := Ini.ReadFloat(\'セクション\', \'実数値型\', 0.1);\r    b := Ini.ReadBool(\'セクション\', \'論理値型\', False);\r  finally\r    Ini.Free;\r  end;\r  edtStr.Text := s;\r  edtInt.Text := IntToStr(i);\r  edtFloat.Text := FloatToStr(f);\r  chkBool.Checked := b;\rend;\r</pre>',1,27642,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-01-20 14:15:33','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0034',3,0,'2002-01-28 00:39:00','[Delphi] Windows のログオフ、シャットダウンと再起動 (Win9x系)','','<p>以下のコードをボタンのイベントハンドラなどに書くとログオフ、シャットダウンや再起動ができます。(ただし、9x系Windowsのみ)</p>\r<pre class=\"brush: delphi\">// ログオフ\rExitWindowsEx(EWX_LOGOFF, 0);\r// シャットダウン\rExitWindowsEx(EWX_SHUTDOWN, 0);\r// 再起動\rExitWindowsEx(EWX_REBOOT, 0); \r// POWER OFF\rExitWindowsEx(EWX_POWEROFF, 0);\r</pre>','',1,3702,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 14:00:09','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0035',3,0,'2002-01-29 00:14:00','[Delphi] Windows のログオフ、シャットダウンと再起動 (WinNT, 2000, XP)','','<p>前回のFAQ で Windows 9x 系でのログオフ、シャットダウンや再起動の方法を書きましたが、本日はNTのコマンドプロンプトから動作するサンプルプログラムを。以下のコードをShutdown.dprとして保存し、コンパイルしてください。<br />\rシステムをシャットダウンまたは再起動させるために､ WxitWindowsEx 関数を呼び出すプロセスは <em>AdjustTokenPrivileges</em> 関数を呼び出して、<em>SE_SHUTDOWN_NAME</em> 特権を得ています。</p>\r<pre class=\"brush: delphi\">\rprogram Shutdown;\r\r{&#36;APPTYPE CONSOLE}\r\ruses\r  SysUtils, Windows;\r\rvar\r  hToken: THandle;\r  tkp: TTokenPrivileges;\r  dwRet: DWORD;\rbegin\r  // このプロセスのためのトークンを取得します。\r  if (not OpenProcessToken(GetCurrentProcess,\r    (TOKEN_ADJUST_PRIVILEGES or TOKEN_QUERY), hToken)) then\r    Writeln(\'OpenProcessToken\');\r\r  // シャットダウンに必要な権限を取得します。\r  LookupPrivilegeValue(nil, \'SeShutdownPrivilege\', tkp.Privileges[0].Luid);\r  tkp.PrivilegeCount := 1; // one privilege to set\r  tkp.Privileges[0].Attributes := SE_PRIVILEGE_ENABLED;\r  dwRet := 0;\r\r  // シャットダウンプロセスに必要な特権を取得します。\r  AdjustTokenPrivileges(hToken, false, tkp, 0, nil, dwRet);\r\r  // AdjustTokenPrivilegesの戻り値をチェックします。\r  if (GetLastError &lt;&gt; ERROR_SUCCESS) then\r    Writeln(\'AdjustTokenPrivileges\');\r\r  // 強制的にアプリケーションを終了させながら、シャットダウンします。\r  if (not ExitWindowsEx(EWX_SHUTDOWN or EWX_FORCE, 0)) then\r    Writeln(\'ExitWindowsEx\');\rend.\r</pre>\r<p>ExitWindowsExの1番目の引数部分を、先日ご紹介したように以下のように変更することで、ログオフなどを行うことができます。 また、EWX_FORCE を指定することで強制的に処理を進められます。</p>\r<pre class=\"brush: delphi\">\r// ログオフ\rExitWindowsEx(<em>EWX_LOGOFF</em>, 0);\r// シャットダウン\rExitWindowsEx(<em>EWX_SHUTDOWN</em>, 0);\r// 再起動\rExitWindowsEx(<em>EWX_REBOOT</em>, 0); \r// POWER OFF\rExitWindowsEx(<em>EWX_POWEROFF</em>, 0);\r</pre>','',1,10285,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-08-07 01:56:45','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0036',3,0,'2002-01-30 23:50:00','[Delphi] アプリケーションウィンドウを表示させる方法は？','','<p>普段どこにあるかわからない、 Application変数(TApplication)のウィンドウ。 本当にあるのかどうか確認するために表示させることにしました。 表示させてもあまり意味がない、役立たずなサンプルです。 <br />\rフォームの OnCreate に書いた場合のサンプルです。 フォーム表示と同時に、スクリーン左上にアプリケーションのウィンドウが表示されます。</p>\r<pre class=\"brush: delphi\">\rprocedure TForm1.FormCreate(Sender: TObject);\rbegin\r  SetWindowLong(Application.Handle, GWL_STYLE, WS_CAPTION);\r  SetWindowPos(Application.Handle, HWND_TOP, 0, 0, 100, 100, 0);\rend;\r</pre>','',1,3646,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-08-11 16:57:17','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0037',3,0,'2002-01-30 23:50:01','[Delphi] 数値を表す文字列を数値に変換','','<p><strong>StrToInt</strong> は、10進または16進表記の整数型の数値を表す文字列(S)を数値に変換します。 しかし、Sが有効な数値を表していない場合、<strong>StrToInt</strong> は EConvertError 例外を生成します。<br />きちんと例外処理していても、開発環境で作業している際には、例外発生のダイアログが出てうっとうしいものです。 Delphi７以降の場合、<strong>TryStrToIntDef</strong> を使うと例外が発生せずチェックが可能です。<strong>StrToInt</strong> を使う場合でも 例外発生時に何か特別な値をセットするようなプログラムの場合には、<strong>StrToIntDef</strong> が有効です。 また 、Val 手続きを使うと2番目の引数の型を変更することで、数値チェックをする数字の範囲を変更可能です。</p>\r<p>StrToIntは整数型の場合に有効ですが、他にExtended型に変換するStrToFloatや、通過型に変換するStrToCurrなど用途に合わせて選択してください。</p>\r<dl><dt>Delphi7以降の場合</dt><dd>\r<pre class=\"brush: delphi\">TryStrToIntDef(s);\r</pre>\r</dd><dt>Delphi6までや、細かい制御が必要な場合</dt><dd>\r<pre class=\"brush: delphi\">///数値チェック\r///チェック対象文字列\r/// True:数値文字列, Flase:非数値文字列\rfunction IsNumeric(s: String): Boolean;\rvar\r  c: Integer;\r  n: Extended;  // ここの型を変えることでチェック範囲を変更できます。\rbegin\r  Val(s, n, c);\r  Result := (c = 0);\rend;\r</pre>\r</dd></dl>','',1,29600,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2013-04-06 22:19:31','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0038',3,0,'2002-05-20 09:46:00','[Delphi] フォームの OnCreate イベントや OnShow イベント中にクローズさせる','','<p>フォームの OnCretae イベントや OnShow イベントでは、Close メソッドをコールしても、クローズさせることはできません。<br />\r原因は、OnCreate イベントの段階では、まだメッセージループが開始されていないからということのようです。<br />\rこれらのイベント中で、クローズさせたい場合には、下記のように記述します。</p>\r<pre class=\"brush: delphi;\" title=\"フォームの OnCreate イベントや OnShow イベント中にクローズさせる\">\rPostMessage(Handle, WM_CLOSE, 0, 0);</pre>\r<p>こうすることで現在実行中のイベント終了後、クローズしてくれるようになります。<br />\rですから厳密にはイベント中ではありません。でもやりたいことはだいたいできると思います。</p>\r<p><b>ボーランドの公式回答では、raise で処理するとのことです。</b></p>\r<p>□CodeGearのホームページ<br />\r<a href=\"http://www.codegear.com/\">http://www.codegear.com/</a></p>\r<p>□CodeGearのサポートページ<br />\r<a href=\"http://support.codegear.com/\">http://support.codegear.com/</a></p>\r<p>□CodeGearの旧Delphi FAQサイト<br />\rhttp://support.codegear.com/article/37355</p>\r<p>□該当の公式回答 - Form の OnCreate の処理中に中断<br />\rhttp://support.codegear.com/article/37355#37355_tocentry18</p>','',1,11066,1,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.codegear.com/\">http://www.codegear.com/</a>\n<a href=\"http://support.codegear.com/\">http://support.codegear...</a>',0,1,0,0,0,'2010-11-17 14:49:16','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0039',3,0,'2002-05-20 10:03:00','[Delphi] FindFirst、FindNext中に追加されたファイルは見けることができる？',null,'ディレクトリ中のファイルの一覧を取得するには、FindFirst、FindNext 関数を使ってリストアップします。 このときファイルは辞書順にファイルを見つけるようです。<br />\nところでこの関数でファイルを検索中に追加されたファイルは、FindNext 関数で見つけ出すことができるでしょうか？テストの結果、FindFirst 関数を実行後に追加されたファイルは見つけることができませんでした。 どうやら FindFirst 関数実行時にリストを作成し、その後 FindNext 関数でそのリストを読み出して返しているのではないかと想像できます。 もしかしたら、EnumWindow API や、WNetEnumResource API も WNetOpenEnum API 以降に追加されたリソースは発見できないかもしれません。','',1,7520,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0040',3,0,'2002-05-20 10:56:00','[Delphi] ソースファイルのないパッケージの追加方法',null,'インストール手順\n<ol>\n<li>どこか適当なフォルダにアーカイブファイルの中身すべて(*.bpl,*dcu,*resなどがあると思います。)を展開します。</li>\n<li>1で展開した先が $(Delphi)\\Lib でない場合、Delphiのライブラリパスの設定が必要です。詳細は、ライブラリパスの追加を参照してください。</li>\n<li>Delphiのメニューバーから[コンポーネント|パッケージのインストール]でプロジェクトオプションダイアログボックスを開きます。<br />\n追加ボタンをクリックし、JDBGrids.bpl を選択し、開く、OKの順でボタンをクリックします。</li>\n</ol>','<strong>※ライブラリパスの追加</strong>\n<ol>\n<li>Delphiのメニューの[ツール|環境オプション]で環境オプションダイアログボックスを開きます。</li>\n<li>このダイアログボックスの中のライブラリタブを表示します。</li>\n<li>ライブラリパスのエディットボックス横の「...」と表記のあるボタンをクリックします。</li>\n<li>ディレクトリダイアログが現れたら、下部のエディットボックスに追加したいディレクトリパスを入力し追加をクリックします。</li>\n<li>それぞれのダイアログでOKボタンをクリック(計2回)し、終了です。</li>\n</ol>',1,6720,0,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0041',3,0,'2002-06-12 11:20:00','[Delphi] ボタン・チェックボックスの描画','','<p>リストやグリッドに<em>ボタン</em>や<em>チェックボックス</em>を 表示したいと考えたことはないですか？<br />私はグリッドにボタンとチェックボックスの両方を付け加えました。ダウンロードしていただいた方々の中から数人の方が描画方法について質問されましたので、ここで解説したいと思います。 <em>ボタン</em>や<em>チェックボックス</em>を描画するには、DrawFrameControl API を使用します。この API は、Delphi Professional 以上をお持ちの方でしたら、TBitBlt、TDBGrid や TCheckListBox などで使用されています。 DrawFrameControl API は SDK で以下のように定義されています。詳細は<a href=\"http://msdn.microsoft.com/ja-jp/library/cc428492.aspx\">こちら</a>。</p>\r<pre class=\"brush:c\">BOOL DrawFrameControl(\r HDC hdc,     // デバイスコンテキストのハンドル\r LPRECT lprc, // 境界の長方形\r UINT uType, // フレームコントロールのタイプ\r UINT uState // フレームコントロールのスタイル\r);\r</pre>\r<p><strong>パラメータ説明:</strong></p>\r<dl><dt><em>hdc</em></dt><dd>コントロールの描画に使いたいデバイスコンテキストのハンドルを指定します。</dd><dt><em>lprc</em></dt><dd>長方形の論理座標を保持する 1 個の RECT 構造体へのポインタを指定します。</dd><dt><em>uType</em></dt><dd>フレームコントロールのタイプを指定します。ボタン、メニューやｽｸﾛｰﾙﾊﾞｰなどを指定します。</dd><dt><em>uState</em></dt><dd>フレームコントロールの初期状態を指定します。</dd></dl>\r<p>uTypeでボタンを指定した場合は、チェックボックスの状態を指定します。</p>','<p>実際に Delphi で使用した例は以下のようになります。</p>\r<p>以下コードは、ストリンググリッドのセルの描画の際に動作し、 4番目の列の場合のみボタンを描画します。</p>\r<pre class=\"brush:delphi\" title=\"ボタン表示サンプル\">procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;\r  Rect: TRect; State: TGridDrawState);\rbegin\r  if (ARow &gt;= TStringGrid(Sender).FixedRows) and (ACol = 1) then\r    DrawFrameControl(TStringGrid(Sender).Canvas.Handle,\r      Rect, DFC_BUTTON, DFCS_BUTTONPUSH);\rend;\r</pre>\r<p>同様にチェックボックスを表示する場合。</p>\r<pre class=\"brush:delphi\" title=\"チェックボックス表示サンプル\">procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;\r  Rect: TRect; State: TGridDrawState);\rbegin\r  if (ARow &gt;= TStringGrid(Sender).FixedRows) and (ACol = 2) then\r    DrawFrameControl(TStringGrid(Sender).Canvas.Handle,\r      Rect, DFC_BUTTON, DFCS_BUTTONCHECK);\rend;\r</pre>\r<p>チェックボックスも、ボタンのひとつの状態なんですね。後はクリックされてるときのみ、へこんだ状態にするなどの操作が必要です。へこんだ状態には DFCS_PUSHED、チェックされた状態には DFCS_CHECKED さらに 使用不可を表現するためには DFCS_INACTIVE を使用します。 第4引数に指定しますが、ビット演算のために or を使って複数の定数を組み合わせて指定します。</p>\r<pre class=\"brush:delphi\" title=\"チェックボックス表示サンプル(チェック済)\">procedure TForm1.StringGrid1DrawCell(Sender: TObject; ACol, ARow: Integer;\r  Rect: TRect; State: TGridDrawState);\rbegin\r  if (ARow &gt;= TStringGrid(Sender).FixedRows) \rand (ACol = 3) then\r    DrawFrameControl(TStringGrid(Sender).Canvas.Handle,\r      Rect, DFC_BUTTON, DFCS_BUTTONPUSH or DFCS_PUSHED);\rend;\r</pre>',1,20304,1,0,'1970-01-01 09:00:00',0,'<a href=\"http://msdn.microsoft.com/ja-jp/library/cc428492.aspx\">こちら</a>',0,1,0,0,0,'2012-10-06 12:27:59','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0042',3,0,'2002-08-28 08:56:00','[Delphi] 実行中のアプリケーションのインスタンスの取得','','<p>つい最近まで実行中のアプリケーションやフォームのハンドルなどを取得するには、FindWindow API や EnumWindow API を使用してクラス名やタイトルで引っ掛けて取得するものだと思ってました。 しかし、OLEオブジェクトであれば VB が GetObject 関数でインスタンスを取得できるように、Delphi は GetActiveOleObject 関数でインスタンスを取得できます。(※1 Excel 2000 で GetObject を使用すると問題が発生することがあるようです。 詳細はここを参照してください。<br />\r<a href=\"http://support.microsoft.com/default.aspx?scid=http://www.microsoft.com/japan/support/kb/articles/JP413/9/00.asp\">http://support.microsoft.com/default.aspx?scid=http://www.microsoft.com/japan/support/kb/articles/JP413/9/00.asp</a>) <br />\r<em>GetActiveOleObject関数で外部アプリケーションにアクセスする</em><br />\rCreateOleObject関数は、外部アプリケーションの新しいインスタンスを作成する関数でした。 したがって、すでにアプリケーションが起動している状態でCreateObject関数を使うと、同一のアプリケーションが次々に起動してしまうことになります。<br />\r　一方、GetObject関数は、すでに起動している外部アプリケーションにアクセスする関数になります。 したがって、GetObject関数を使えば、同一のアプリケーションが複数起動することはありません。<br />\rVB の GetObject関数は 2 つの引数をとりますが、Delphi の GetActiveOleObject はクラス名のみを引数にとります。</p>\r<pre class=\"brush: delphi\">\rfunction GetActiveOleObject(const ClassName: string): IDispatch;\r</pre>\r<p>以下のサンプルでは、GetObject関数を使ってWordにアクセスしています。すでにWordが起動している場合はそのまま処理を続行しますが、未起動のときには EOleSysError のエラーが発生します。このエラーを検知したときには、CreateOleObject 関数で Word を起動しています。（※2 このサンプルプログラムを動作させるには、implementation 部に ComObj を追加する必要があります。）</p>\r<pre class=\"brush: delphi\">\rprocedure TForm1.Button1Click(Sender: TObject);\rvar\r  objWord: OleVariant;\r  bAppOpen: Boolean;\rbegin\r  try\r    objWord := GetActiveOleObject(\'Word.Application\');\r    bAppOpen := true;\r  except\r    on E: EOleSysError do\r    begin\r      bAppOpen := false;\r    end;\r  end;\r\r  // Wordのインスタンスが作成されていなかったら作成する\r  if not bAppOpen then\r  begin\r    objWord := CreateOleObject(\'Word.Application\');\r\r    // 新規文書を挿入する\r    objWord.Visible := true;\r    objWord.Documents.Add;\r  end;\r  objWord := Unassigned;\rend;\r</pre>','',1,11708,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://support.microsoft.com/default.aspx?scid=http://www.microsoft.com/japan/support/kb/articles/JP413/9/00.asp\">http://support.microsof...</a>',0,1,0,0,0,'2011-08-11 16:58:49','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0043',3,0,'2002-11-26 15:13:00','[Delphi] 簡単なファイル移動方法',null,'Delphiでファイルの移動をする際に、いつもどんなコマンドを使用していますか？ FileCopy API とDelteFile API を組み合わせて使ってますか？<br />\nこれからは、API を使うよりも簡単にできる1発関数を使いましょう！<br />\nこの関数は通常のフォルダ間の移動、ドライブ間の移動に加え、UNCで記述されたフォルダにも移動できます。<br />\nただし、移動先のフォルダが未定義だったり、すでに同名のファイルが存在していると失敗し、 False を返します。<br />\nその関数は、<em>RenameFile 関数</em>です。一見名前変更しか対応していないと見せかけておいて、ファイル移動もOKなんです。<br />\n使用例は以下のとおり、\n<pre class=\"code\">\nRenameFile(\'c:\\autoexec.bat\', \'d:\\autoexec.bat\');\n</pre>\n繰り返しになりますが、この関数は失敗すると False を、成功すると True を返します。','',1,14284,3,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0044',3,0,'2002-12-26 22:47:00','[Delphi] 切り捨て、四捨五入、切り上げ','','<p>Delphiで切り捨て、四捨五入、切り上げする際にどんな関数を使っていますか？<br />Floor、Trunc、Round、SimpleRound、Ceil などを使っていることと思う。<br />これらの関数は、戻り値の範囲がLongintの範囲であったり、正負での扱いが対照でなかったりするので作ってみた。<br />x に丸めたい値を、Factor に丸め位置(小数点以下桁数：小数部第一位は1、整数部１桁目は-1)を与える。<br /><strong>※Delphi7 以降には、標準で通常の四捨五入関数 (SimpleRoundTo) が付いている。</strong></p>\r<dl><dt><strong>切り捨て</strong></dt><dd>\r<pre class=\"brush: delphi\" title=\"切り捨て\">function MyRoundDown(x: Currency; Factor: Integer): Currency;\rvar\r  dFactor: Double;\rbegin\r  Factor := Factor -1;\r  dFactor := IntPower(10, Factor);\r    if Factor &lt; 0 then Factor := Factor +1;\r  if x &gt;= 0 then\r    Result := Int(x * dFactor) / dFactor\r  else\r    Result := Int((x * dFactor) + 0.9) / dFactor;\rend;\r</pre>\r</dd><dt><strong>四捨五入</strong></dt><dd>\r<pre class=\"brush: delphi\" title=\"四捨五入\">function MySimpleRound(x: Currency; Factor: Integer): Currency;\rvar\r  Sgn: Integer;\r  dFactor: Double;\rbegin\r  if x &gt;= 0 then Sgn := 1 else Sgn := -1;\r  if Factor &lt; 0 then Factor := Factor +1;\r  Factor := Factor -1;\r  dFactor := IntPower(10, Factor);\r  Result := Int(Abs(x) * dFactor + 0.5) / dFactor * Sgn;\rend;\r</pre>\r</dd><dt><strong>切り上げ</strong></dt><dd>\r<pre class=\"brush: delphi\" title=\"切り上げ\">function MyRoundUp(x: Currency; Factor: Integer): Currency;\rvar\r  dFactor: Double;\rbegin\r  Factor := Factor -1;\r  dFactor := IntPower(10, Factor);\r  if Factor &lt; 0 then Factor := Factor +1;\r  if x &gt;= 0 then\r    Result := Int((x * dFactor) + 0.9) / dFactor\r  else\r    Result := Int(x * dFactor) / dFactor;\rend;</pre>\r<pre>&nbsp;</pre>\r</dd></dl>','',1,140637,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 13:55:49','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0046',3,0,'2003-01-13 22:47:00','[Delphi] ユーザーの画面操作禁止','','<p>フォームでボタンをクリックしたとき、メニューをクリックしたときの操作がある程度以上時間がかかる場合ありますよね。こんな時にもう一度、ボタンをクリックされたら...。同じ処理が平行して同時に行われることになってしまいます。<br /> たいていこんな時には、処理中にもう一度ボタンをクリックされないように、Enabled プロパティを使用してクリックできないようにされていると思います。でも複数のオブジェクトを使用不可にするのは面倒な作業です。<br /> そこで今回は、アプリケーション中のすべてのフォームとフォームに張り付いたすべてのオブジェクトが使用不可能になる方法をご紹介します。<br />この方法は、Forms ユニットにある ShowModal や MessageDlg も使用している関数を使用します。</p>\r\n<ul>\r\n<li>ほかのフォームを触れなくする場合、function DisableTaskWindows(ActiveWindow: HWnd): Pointer; を使用します。</li>\r\n<li>逆に使用可能に戻す場合には procedure EnableTaskWindows(WindowList: Pointer); を使用します。</li>\r\n</ul>\r\n<p>で使い方ですが...</p>\r\n<ol>\r\n<li>DisableTaskWindows(0) を実行します。(ちなみに特定のフォームのウィンドウハンドルを渡すと、特定のフォーム以外を使用不可にできます。)<br /> 戻り値のポインタは、適当な変数に保存しておいてください。後で使用します。</li>\r\n<li>特定の処理を書きます</li>\r\n<li>元に戻すタイミングで、EnableTaskWindows(保存しておいたポインタ) を実行します。</li>\r\n</ol>\r\n<p><br />実際のコードは以下のようになります。（斜体部分のみ入力します。）</p>\r\n<pre class=\"brush: delphi\">procedure TForm1.Button1Click(Sender: TObject);\r\nvar\r\n  pDTW: pointer;\r\nbegin\r\n  pDTW := DisableTaskWindows(0);  // 使用不可にして\r\n  try\r\n    Sleep(1000);                  // 処理をして\r\n  finally\r\n    EnableTaskWindows(pDTW);      // 終わったら戻す\r\n  end;\r\nend;\r\n</pre>','',2,8202,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2019-05-21 09:50:26','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0045',3,0,'2003-01-13 22:47:01','[Delphi] アプリケーションタスクをタスクバーに表示させない','','アプリケーションを切り替えるために使用するタスクバー。そこには起動中のアプリケーションが表示されています。<br />\rしかし、タスクトレイに表示するアプリケーションを作成した場合など何らかの理由で、タスクバーに表示させたくない場合もあるでしょう。<br />\r<br />\r今回はそんなときに使える 「タスクバーにタスク表示させない」 方法です。<br />\r<br />\rこの方法は、アプリケーションのウィンドウ設定を変更します。\r<ul>\r<li>アプリケーションのウィンドウを非表示に（元々見えていません）する。</li>\r<li>アプリケーションウィンドウの拡張設定の WS_EX_TOOLWINDOW というフラグをたてる。</li>\r</ul>\r<br />\rこの方法はプロジェクトのソースに対し修正を行います。\r<ol>\r<li>デルファイの開発環境でプロジェクトマネージャを表示します。 </li>\r<li>次にプロジェクトを選択、右クリックポップアップメニューを表示します。</li>\r<li>ソースの表示をクリックすると表示されます。 </li>\r</ol>\r<p>実際のコードは以下のようになります。（斜体部分のみ入力します。）</p>\r<pre class=\"brush: delphi;\" title=\"Format関数6桁の場合\">\rprogram Project1;\ruses\r  Windows,\r  Forms,\r  Unit1 in \'Unit1.pas\' {Form1};\r\r{&#36;R *.res}\r\rbegin\r  Application.Initialize;\r  Application.CreateForm(TForm1, Form1);\r  ShowWindow(Application.Handle, SW_HIDE);\r  SetWindowLong(Application.Handle, GWL_EXSTYLE,\r    GetWindowLong(Application.Handle, GWL_EXSTYLE) or WS_EX_TOOLWINDOW);\r  Application.Run;\rend.\r</pre>','',1,8368,1,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2010-11-09 22:26:24','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0047',3,0,'2003-12-18 14:41:00','[Delphi] Excel をアドイン付きで起動する','','<p>通常 Excel を起動して OLE オートメーションとして使用したい場合には、CreateOleObject を使用します。<br />\rただ、この方法ですと個人マクロブック(PERSONAL.XLS)が使えなかったり、アドインが読み込まれていなかったりするなどいろいろ不都合が多いのも事実です。<br />\r<br />\r今回はそんなときに使える 「Excel をふつうに起動させる」方法です。<br />\r<br />\rこの方法は、ExcelをCreateProcessで非OLEアプリと同じように起動させて、その後GetActiveOleObjectでOLEを取得します。<br />\rExcel を起動するのは、CreateExcelProcess 関数です。ここでは「Excel.Application」という識別子から CLSID を取得し、さらにその CLSID から起動情報を取得した結果を利用してプロセスを作成しています。 また、起動後すぐには OLE のインスタンスを捕まえることができないので、最大 0.5 秒を 10 回計 5 秒を待つ設定にしています。 途中で SetForegroundWindow しているのは XP 上での Excel のバグ対策です。</p>\r<pre class=\"brush:delphi\">\rprocedure TForm1.Button1Click(Sender: TObject);\r\r  // Excelプロセス生成\r  function CreateExcelProcess(out hProcess: THandle): Bool;\r\r    function GetExcelRegInfo: String;\r    const\r      KeyFormat = \'CLSID%sLocalServer32\';\r    var\r      Key: String;\r    begin\r      Key := Format(KeyFormat, [GUIDToString(ProgIDToClassID(\'Excel.Application\'))]);\r      Result := GetRegStringValue(Key, \'\');\r    end;\r\r  var\r    RegInfo: String;\r    PROCESSINFO: TProcessInformation;\r    STARTUPINFO: TStartupInfo;\r  begin\r    Result := false;\r\r    RegInfo := GetExcelRegInfo;\r    // Excel が導入されていない場合は、RegInfoが空文字列\r    if (RegInfo = \'\') then exit;\r\r    // 起動情報構造体\r    with STARTUPINFO do\r    begin\r      cb := SizeOf(STARTUPINFO); // 構造体のサイズをセット\r      lpReserved := nil;         // 上記以外は初期化\r      lpDesktop  := nil;\r      lpTitle    := nil;\r      dwFlags := 0;\r      cbReserved2 := 0;\r      lpReserved2 := nil;\r      dwysize := 0;\r    end;\r\r    // \'/e\' を付加すると初期のワークブックが抑制できる\r    Result := CreateProcess(nil, PChar(RegInfo + \' /e\'),\r                nil, nil, false, 0, nil, nil, STARTUPINFO, PROCESSINFO);\r    hProcess := PROCESSINFO.hProcess;\r  end;\r\rconst\r  RetryCount = 10;\r  SErrorRunExcel = \'Excelの起動に失敗しました。\';\rvar\r  Excel: OleVariant;\r  hProcess: THandle;      // Excel Process Handle\r  i: Integer;\rbegin\r  CreateExcelProcess(hProcess);\r  try\r    Excel := GetActiveOleObject(\'Excel.Application\');\r  except\r    on E: EOleSysError do\r    begin\r      // Excelがまだ起動していない場合には、起動をかける\r      if (E.ErrorCode = &#36;FFFFFFFF800401E3) then\r        if not CreateExcelProcess(hProcess) then\r          raise Exception.Create(SErrorRunExcel);\r\r      // Excel再取得\r      for i := 0 to RetryCount do\r      begin\r        sleep(500);\r        SetForegroundWindow(Handle);\r        try Excel := GetActiveOleObject(\'Excel.Application\') except end;\r        if not VarIsEmpty(Excel) then break;\r        // ループ最終回で取得できていなかった場合、\r        if (RetryCount = i) then raise Exception.Create(SErrorRunExcel);\r      end;\r    end;\r    on E: Exception do exit;\r  end;  // Excel起動ループ\r\r  Excel := unassigned;\rend;\r</pre>','',1,7365,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-06-30 13:21:06','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0048',3,0,'2003-12-18 14:42:00','[Delphi] 一回で深い階層のディレクトリを作成する','','<p>多階層のディレクトリを作成するには親ディレクトリから１つずつ作成していきます。<br /> しかしこれでは面倒なので、ForceDirectories 関数を使って一発で作成することができます。<br /> また、APIを使っても一発で作成することができます。<br /> ForceDirectories は Delphi のヘルプに解説があるので、以下では API を使用する方法を解説します。<br /> <br /> 使用するAPIは、「MakeSureDirectoryPathExists」です。<br /> この API と ForceDirectories との違いとしては、ForceDirectories は作成したいディレクトリを引数に指定するのに対し、 MakeSureDirectoryPathExists はファイル名を指定します。ディレクトリ名を指定したい場合は末尾に「\\」を付けて渡す必要があります。<br /> <br />このAPIを使用するには以下の定義が必要です。</p>\r\n<pre class=\"brush: delphi;\" title=\"MakeSureDirectoryPathExists\">interface\r\n  function MakeSureDirectoryPathExists(DirPath: LPCSTR): Bool; stdcall;\r\nimplementation\r\n  function MakeSureDirectoryPathExists; external \'IMAGEHLP.DLL\' name \'MakeSureDirectoryPathExists\';\r\n</pre>\r\n<p>DirPath にはファイル名を指定します。 パスの最後のコンポーネントがファイル名ではなくディレクトリである場合、文字列の最後に円記号（\\）を記述しなければなりません。 このAPIは失敗すると False を返します。 こんな感じになります</p>\r\n<pre class=\"brush: delphi;\" title=\"MakeSureDirectoryPathExists\">procedure TForm1.Button1Click(Sender: TObject);\r\nbegin\r\n  if not MakeSureDirectoryPathExists(PChar(\'c:temp\')) then\r\n    raise Exception.Create(\'Cannot create c:temp\');\r\nend;\r\n</pre>\r\n<p><em>補足</em></p>\r\n<ol>\r\n<li>設定可能なファイル名の長さは200-260文字程度みたいです。</li>\r\n<li>APIなので String を PWideChar または PChar で型キャストする必要があります。</li>\r\n</ol>\r\n<p><em>参照</em></p>\r\n<ol>\r\n<li><a href=\"https://msdn.microsoft.com/ja-jp/library/cc428990.aspx\">Microsoft Developer Network Library</a></li>\r\n</ol>\r\n<p>2015.11.20 MSDNのリンク先が変更になっていたので修正</p>','',2,8633,0,0,'1970-01-01 09:00:00',0,'<a href=\"https://msdn.microsoft.com/ja-jp/library/cc428990.aspx\">Microsoft Developer Net...</a>',0,1,0,0,0,'2015-11-20 09:21:47','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0049',3,0,'2004-02-18 12:42:00','[Delphi] フォームの表示完了時','','<p>フォームを表示しているときに起こるイベントには「OnCreate」「OnShow」「OnActivate」などがありますが、表示し終わったときのイベントがありません。 これを取得するには「CMShowingChanged」メッセージをトラップします。(このメッセージを知るまでは、OnCreateで独自メッセージをポストし、トラップしてました。(^o^;))<br />実際のコードは以下のようになります。</p>\r<pre class=\"brush: delphi;\" title=\"フォームの表示完了時\">type\r  TForm1 = class(TForm)\rprivate\r  { Private 宣言 }\r  (略)\r  procedure CMShowingChanged(var Message: TMessage); message CM_SHOWINGCHANGED;\r  (略)\rend;\r\rprocedure TForm1.CMShowingChanged(var Message: TMessage);\rbegin\r  inherited;  // 通常の CMShowingChagened をまず実行\r  if (Visible) then\r  begin\r    Update; // 完全に描画\r    // 実際の処理を記入\r  end;\rend;\r</pre>','',1,12671,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 13:51:21','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0050',3,0,'2004-02-18 12:42:30','[Delphi] 入力禁止中に発生したユーザによる入力の消去','','<p>ある特定の処理実行中は、フォームやボタンの Enabled プロパティを False に設定し、２度同じ処理を実行されないようにしたりします。 しかし、Enabled が False でも True に変更する前にユーザがマウスクリックまたはEnterキーなどで処理をしていた場合、その操作に関連する処理は行われてしまいます。 今回はそのような問題への対策です。<br />以下の関数をボタンの Enabled を True にする際になどに実行します。</p>\r<pre class=\"brush: delphi\">procedure PurgeMsgQueue(AHandle: HWND);\rvar\r  Msg: TMsg;\rbegin\r  // マウスのメッセージをキューから除去\r  while PeekMessage(Msg, AHandle, WM_CLOSE, WM_QUIT, PM_NOREMOVE) do exit;\r  while PeekMessage(Msg, AHandle, WM_DESTROY, WM_DESTROY, PM_NOREMOVE) do exit;\r  while PeekMessage(Msg, AHandle, WM_MOUSEFIRST, WM_MOUSELAST, PM_REMOVE) do;\r  // そのほかのメッセージをキューから除去\r  while PeekMessage(Msg, AHandle, WM_CLOSE, WM_QUIT, PM_NOREMOVE) do exit;\r  while PeekMessage(Msg, AHandle, WM_DESTROY, WM_DESTROY, PM_NOREMOVE) do exit;\r  while PeekMessage(Msg, AHandle, WM_KEYDOWN, WM_KEYDOWN, PM_REMOVE) do;\rend;\r</pre>\r<p>でも、この方法だと取り除きたいマウスとキーボードのメッセージの数だけ記述しないとダメなので、実用性はいかがなものだろうか？</p>\r<p>別案として、別スレッドで処理するかマウスとキーボードの処理を別ウィンドウに処理させてしまう方法がある。</p>','',1,7488,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 13:50:42','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0051',3,0,'2004-06-30 00:02:00','[Delphi] フリガナを自動で入力する (for VCL.Net)','','<p>WM_IME_COMPOSITION メッセージが発生したときに、ImmGetCompositionString 関数を使ってFEP (IME など) が持つフリガナを取得します。<br /><br />この例は、フリガナ機能付きコンポーネントの作成例です。<br />TEdit コンポーネントに KanaOut プロパティを追加しています。 この追加したプロパティに、Edit1(TEdit クラス) を設定すると、入力した文字のフリガナが Edit1.Text に入力されていきます。</p>\r<pre class=\"brush: delphi\">unit KanaEdit;\r\rinterface\r\ruses\r  Windows, Messages, Classes, Graphics, Controls, StdCtrls;\r\rtype\r  { TKanaEdit }\r  TKanaEdit = class(TEdit)\r  private\r    FKanaOut: TEdit; // KanaOutプロパティ\r  protected\r    procedure SetKanaOut(AValue:TEdit);\r    procedure WndProc(var Msg: TMessage); override;\r  published\r    // プロパティ\r    ...\r    property KanaOut: TEdit read FKanaOut write SetKanaOut;\r    ...\r  end;\r\rprocedure Register;\r\rimplementation\r\ruses\r  IMM;\r\rprocedure Register;\rbegin\r  RegisterComponents(\'Samples\', [TKanaEdit]);\rend;\r\r{*******************************************************************************\r機能: カナ出力プロパティーセット\r引数:\r戻値:\r*******************************************************************************}\rprocedure TKanaEdit.SetKanaOut(AValue: TEdit);\rbegin\r  if (AValue = nil) or (AValue = Self) then\r  begin\r    FKanaOut := nil;\r  end\r  else\r  begin\r    FKanaOut := AValue;\r  end;\rend;\r\r{*******************************************************************************\r機能: メッセージ処理\r引数:\r戻値:\r*******************************************************************************}\rprocedure TKanaEdit.WndProc(var Msg: TMessage);\rvar\r  imc: HIMC; // IMEのコンテキストを格納\r  sbKana: StringBuilder;\r  nSize: Integer;\rbegin\r  if (FKanaOut &lt;&gt; nil) then\r  begin\r    if (Msg.Msg = WM_IME_ENDCOMPOSITION) then\r    begin\r      imc := ImmGetContext(Handle);\r      case Msg.Msg of\r        WM_IME_ENDCOMPOSITION:\r        begin\r          // 変換結果の「読み」を取得\r          nSize := ImmGetCompositionString(imc, GCS_RESULTREADSTR, nil, 0);\r          sbKana := StringBuilder.Create;\r          sbKana.Length := nSize;\r          ImmGetCompositionString(imc, GCS_RESULTREADSTR, sbKana, nSize+1);\r          ImmReleaseContext(Handle, imc);\r          // 更新後文字列作成\r          FKanaOut.Text := FKanaOut.Text + sbKana.ToString;\r        end; // WM_IME_ENDCOMPOSITION\r      end; // case\r    end;  // if\r  end;  // if\r  inherited;\rend;\rend.\r</pre>','',1,5951,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 13:21:34','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050101_happy_new_year',3,0,'2005-01-01 00:00:00','新年あけまして、おめでとうございます',null,'<p>新年あけまして、おめでとうございます。</p>\r\n<p>新年と言うことで何か新しい試みをと思い、タイトルを新たにしブログなるぺージを作ってしまいました。<br />ここには、くろねこが日々思った疑問などを書き連ねていきたいと思います。日々疑問に思うことなのであまりサイトの内容とは無関係な内容が多くなるかと思いますが、何か同意できることや意見などがありましたら反応頂けるとうれしく思います。<br /></p>\r\n','<p>昨年末に Delphi2005 を購入しデバッグ出来ないなーと、マニュアルをキコキコ印刷紙ながら読んでると...<br />.Net 環境では WinXP \r\nが必要だと！ がーん！ くろねこはいままで Win2000 で開発していたので(Windows2003 Sever \r\nも持ってはいましたがほとんど使うことなく、また年末にオークションで売ってしましました。)これはイカンとおもい WinXP \r\nを開発PC用に買ってしまいました。<br />1台のPCには1つずつライセンスが必要なので数台有ると MSDN の Library \r\nの方がよかったかとも後悔...<br />Delphi2005 といえば 12/30 \r\nに交換用メディアが届いてたけど、このコストって無駄だなー。<br />この儲け損なった利益分は次回 Delphi の売値に跳ね返ってくるのかな？ \r\n</p>',1,2663,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050102_goback',3,0,'2005-01-02 19:55:09','Symantec社のNorton GoBack ここがダメ',null,'<p>まず Norton GoBack を知らない人のためにどういうものかを説明すると</p>\r<p>Windows が起動しないというトラブルや、重要ファイルの上書き、動作不良、ウィルス感染によるデータの消失などで取り返しのつかない状況に陥ったときに、<strong>システムを正常だった時点にまで戻したり、消失したファイルを簡単に復元できるデータリカバリーソフト</strong>だ。<br />\rインストール直後から自動バックアップを開始し、常時 HDD 内のファイルを監視する。トラブルが発生したら、リストを使って任意の時点にまでシステムを簡単に戻すことができる。戻し方も、ディスク全体を一気に戻すやり方と、過去の HDD の内容を参照しながらファイル単位で復帰させる方法が有るらしい。<em>(くろねこはいつも全部戻してました。)</em>PCが起動しないという場合でも、起動ディスクに自動で作成された「GoBack ドライブ」にアクセスしてデータを復旧できるというのがうたい文句だ。<em>(こんな時、くろねこはいつも Ghost でした。)</em><br />\rふつうのバックアップソフトである Norton Ghost や Symantec System Recovery とはまた違う特徴を持っていて、互いに足りない部分を保管するように作ってある。</p>','<p>しかし、GoBack 仕様上の大きな問題点がいくつかある。このことを考えて使用を決めないと、トラブル時に痛い目に遭う。<br />\r大きく問題点をまとめると<br />\r1. HDDのアクセススピードが遅くなる<br />\r2. HDDの寿命が短くなる<br />\r<strong>3. HDD全体を１つのパーティションとして独自の方法で管理する</strong></p>\r<p>問題点(1),(2)については普通に誰でもわかる(説明されれば理解できる)ことなのだが、GoBack は基本的にいつでも元に戻せるように HDD の片隅の自分専用領域に元に戻すべき変更情報を書き込んでいる。ということは書き込むべき情報を元のデータと新しいデータで計算して複製して2カ所に書き込んでいるので、遅くなって当然。また、単純に考えて書き込む量が増えたので消耗品である HDD の耐久性も減るので寿命は必ず短くなる。どうやってもさけられない問題点だ。<br />\rまた、この問題について遅くなることは自体は所々にふれてあるが、くろねこが知る限り Symantec はどの程度遅くなるとか寿命が短くなるとかふれていない。</p>\r<p>問題点(3)について GoBackではすでに述べたように、 HDD を1つのパーティションとして管理している。では、以前にあったパーティションはどうなるのか？それは GoBack が仮想パーティションを以前と同じパーティション構成で提供している。<br />\rGoBack の <a href=\"http://yougo.ascii24.com/gh/33/003379.html\">MBR(マスターブートレコード)</a>を介して起動すると、仮想ドライブが見えるため、いつもどおりで見た目には何も変わらない。通常の状態ではこのようにふつうに見えるようになっている。しかし、他のPCに接続して確認すると、不明なパーティションになっていることがわかる。<br />\rこのことが、基本的仕様の間違いでトラブル対策ツールとしては致命的欠陥となっている。<br />\rまず、HDD が壊れた場合、他の PC に接続し壊れていない部分のデータを、取り出そうと思っても取り出すことが出来ない。<br />\r次に、通常論理的に破損した場合には、壊れたパーティションのみが問題となるケースがほとんどだが GoBack を導入していると被害の範囲はドライブ全体が対象となる。<br />\r顕著な例で言うと、ただ MBR が破損しただけの場合(※1)、GoBack 未使用時には FIXMBR(2000, XP で使用可能な修復ツール)で MBR だけ修復することになり(※2)、だいたい１０分程度の修復時間となる。<br />\rしかし、GoBack 導入時には、FDISK(9x系の HDD ユーティリティ)などで MBR を修復後、HDD 全体を Ghost などのバックアップツールから戻すことを Symantec から求められる。この方法だと、バックアップ以降のデータを取り出すことは出来ない。<br />\rこの問題を回避するために自分自身は他の HDD に OS と GoBack をいったんインストールし、GoBack の MBR を使い起動する環境を作成しその環境からデータを取り出すことで回避した。しかしこの環境から GoBack をアンインストールするのに必要だった時間は８時間ほど(0.8TB時)。これはHDDの容量によっても変わる。</p>\r<p>以前、他のツールで同様の問題が有った。それはかつて Microsoft 社が提供していた <a href=\"http://yougo.ascii24.com/gh/04/000439.html\">DoubleSpace</a> などの<a href=\"http://yougo.ascii24.com/gh/05/000553.html\">ディスクダブラー</a>と呼ばれるたぐいのユーティリティ。このユーティリティも複数のファイルを一つのファイルにまとめ、独自ユーティリティで仮想ファイルシステムを提供していた。このため、この管理ファイルが壊れると壊れていない部分に格納されていたファイルも取り出せ無くなる。このため上位 OS である NTは(2000，XPも)、NTFS というファイルシステム自体に圧縮機能を詰め込み、ファイル単位で管理することで1このファイルのトラブルが複数のファイルに影響を与えるのを防いだ。</p>\r<p>Symantec 社には(3)の問題点について伝えたが、当分改善する気は無いらしい。</p>\r<p>購入を考えている人はこのことをよく理解した上で、購入してほしい。<br />\rちなみに、くろねこはもう使用をやめました。</p>\r<p>※1 ブートセクタが破損<br />\rMBRには、ブートセクタを呼び出すマスターブートコードやパーティションテーブルなど、重要なプログラム／データが記録されている。特に複数のOSを共存させる場合はMBRを書き換える機会が増えるが、設定が不適切だったりすると既存のOSが起動できなくなってしまうこともある。また、何らかのトラブルでMBRが破損すると、ハードディスクからOSを起動することができなくなってしまう。</p>\r<p>※2 <a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;314503\">FIXMBRを使うべき状況</a></p>\r<p class=\"add\">追記<br />\rGoBack が１つのパーティションで管理していて、仮想パーティションを提供していると書いた。<br />\r他のPCから見たときには、実際そのように見える。しかし、完全に独自の方法で管理するとアンインストール時などかなり面倒なので、中身は通常のドライブとほとんど変わらないのかもしれない。<br />\rアンインストール時にはかなりの時間がかかるので、もしかすると本当に独自の方法で管理しているのかもしれないが...</p>',1,9684,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://yougo.ascii24.com/gh/33/003379.html\">MBR(マスターブートレコード)</a>\n<a href=\"http://yougo.ascii24.com/gh/04/000439.html\">DoubleSpace</a>\n<a href=\"http://yougo.ascii24.com/gh/05/000553.html\">ディスクダブラー</a>\n<a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;314503\">FIXMBRを使うべき状況</a>',0,1,1,0,0,'2008-12-08 10:23:52','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050104_red_bean_soup',3,0,'2005-01-04 23:51:07','ぜんざい作ってみた！',null,'年末年始(12/29-1/16)の間嫁さんは実家に帰ってしまっている。<br />\rくろねこはというと、今年はお客さんのお客さんのシステムが入れ替えなので年末年始とも出勤でした。一日と二日は土日なのでお休みだった。一日にとりあえずお正月だからと何かお正月ポイものが食べたいとスーパーに買いに出た。<br />\rお雑煮作るのはむずかしそうなので、ぜんざいを作ろうとお餅とあんこを買ってきた。あんこの裏に書いてある説明書を見ながら我流で作った。<br />\r意外と簡単でお湯を沸かしてあんこ溶かして、お塩を適量入れしばらく火にかけた。これだけでべースが出来て、後はそこに食べたいだけの焼き餅をつっこむ。途中お塩を入れてから味見をしたんだけど、もうちょっと押しをを入れるとどうなるのかなと思って追加したらまずくなった。さらにあんこを追加して味を直す羽目になってしまった。<br />\rたくさん作ったぜんざいも毎日食べると(途中で甘くてやになるときも多々あった)、今日で無くなってしまった。こうなるとちと寂しい。あんこがまだ残ってるから嫁が帰ってきてからまた作って子供と食べるかな。<br />','',1,2470,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:46','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050107_oracle_iso',3,0,'2005-01-07 21:43:01','オラクルって ISO 対応できてへんやん',null,'<p>今日プログラムを作っていてオラクルデータベースから取得した日付をプログラムに表示する部分があった。日頃からオラクルの日付フォーマット書式になれていないくろねこは、Webサイトで表現を扱っているところを探しコーディングするのだが、そのとき気づいた。<br />\r<strong>日付書式セパレータに\'T\'がない！</strong>ISOでは日付書式をIS0 8601として定義していて、以下の形式で表すらしいのだが...</p>','<ol>\r    <li>年のみ<br />\r    YYYY（例：2001） </li>\r    <li>年月<br />\r    YYYY-MM（例：2001-08） </li>\r    <li>年月日<br />\r    YYYY-MM-DD（例：2001-08-02）</li>\r    <li>&nbsp;年月日および時分 <br />\r    YYYY-MM-DDThh:mmTZD（例：2001-08-02T10:45+09:00)</li>\r    <li>年月日および時分秒<br />\r    YYYY-MM-DDThh:mm:ssTZD（例：2001-08-02T10:45:23+09:00）</li>\r    <li>年月日および時分秒および小数部分 <br />\r    YYYY-MM-DDThh:mm:ss.sTZD（例：2001-08-02T10:45:23.5+09:00） </li>\r</ol>\r<p>またOracleで日付をフォーマットする際には TO_CHAR を使うと思うのだが、Tが使えないと言うことは<br />\rSELECT TO_CHAR(sysdate, \'YYYY-MM-DD\'\'T\'\'HH24:MI:SS\') FROM DUAL;<br />\rの様な書き方が出来ないってこと？</p>\r<p>ちなみにDelphiでは、<br />\rFormatDateTime(\'yyyy-mm-dd\'\'T\'\'hh:nn:ss\', 日付);<br />\rと書けばISO対応可能でした。</p>\r<p>ダメじゃんオラクル！</p>\r<p>Delphiでも ISO タイプの書式付き文字列に出力は可能でしたが、日付と時刻の間がスペースでないと、日付型への取り込みはだめでした。</p>',1,4306,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:56','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050109_QRCode',3,0,'2005-01-09 01:49:10','こんなところにも...',null,'<p>近頃携帯電話で簡単に読み取れるらしい<strong>QRコード</strong>。<br />\rくろねこの携帯には未だ付いていません。というのもこの前携帯電話を買い換える機会があったのですが、載っているホンダ フィットのインターナビっていうナビが最新機種にほとんど対応していないため、旧機種を交う羽目に...<br />\rまあそれは置いといて、いま嫁さんが実家に帰っているため食事は自分で作らないといけないのです。で近くのスーパーにお鍋の材料を買いに行って...うおネギたけーと思いつつお肉や白菜やねぎや春菊とか買って家に帰った。その日はお鍋作ったんだけど、今日はお昼にうどんを...うどんに入れようとネギを切ってその袋を捨てようとしたとき、<strong>ネギの袋にQRコード</strong>が...<br />\rえっ、ちょっとまて～い、何でこんなところにQRコードが付いてんの？QRコードを携帯で読み取ると商品説明がみれるらしい。<br />\rちなみに販売会社は<a href=\"http://www.agrication.com/\">こちら</a>なんだけど、携帯でそんなんみてもみにくいし、そもそもQRコード読める携帯電話持ってる人間が少ないこの世の中、主婦に限定してだいたい何％が持ってるんだろ。さらに使い方を知っていて、さらに興味を持つ割合だったら0.1%いれば多い方では...<br />\r実際の効果って有るんだろうか？</p>','',1,4222,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.agrication.com/\">こちら</a>',0,1,1,0,0,'1999-11-30 00:00:26','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050109_441190104411901',3,0,'2005-01-09 12:27:27','4,4119,010円(4411万9010円)',null,'<p><a href=\"http://afromania.org/%7Eoku/\">あなたのお値段鑑定します</a>というぺージがある。<br />\r今日このぺージで自分の価値を占ってみた。久々だ...たぶん5年ぶりくらい？結果、4411万9010円(階級は「普通の高校生級」です（42階級中24番目）)だと...<br />\rとほほ、社会に出てふつうの高校生ぐらいの価値しかないのか...<br />\r数年前まだ会社員だったころ、どことも無く同僚が探してきたこのぺージで自分の価値を占った。そのときには３億円以上有ったと記憶しているが、年月とともに自分の価値を消費し尽くしたのだろうか？今は見る影もなく下がりきってしまっている。<br />\rこのサイト、人間の価値を5種類のカテゴリに分け鑑定している。ちなみに 4,4119,010円の内訳は...以下のような感じ。 \r<ul style=\"MARGIN-TOP: 0px; MARGIN-BOTTOM: 0px\">\r    <li>心 2141万3890円 48.5 % </li>\r    <li>才能 2177万6210円 49.3 % </li>\r    <li>境遇 0円 0 % </li>\r    <li>人徳 92万8910円 2.1 % </li>\r    <li>運 0円 0 % </li>\r</ul></p>\r<p>会社員やめるときに、精も根も尽き果てて心はすっかりすさみきってると思ってたのに...奥底にこんなに価値があったのね。しかし、境遇と運が0円とは...<br />\rまあ、あなたも一度チャレンジしてみて！</p>','',1,2865,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://afromania.org/%7Eoku/\">あなたのお値段鑑定します</a>',0,1,1,0,0,'1999-11-30 00:00:45','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050111_English_School',3,0,'2005-01-11 22:10:19','こんな英会話教室が危ない',null,'<p>昨年、大阪・梅田のJR駅前歩道橋を歩いていると、英会話のお兄さんに声をかけられた。<br />\r暇だったので話しを聞くと、すごいビジネススクールだという。どの辺がすごいか聞くと、</p>\r<ul>\r    <li><strong>日本で唯一履歴書に書ける英会話（ビジネススクール)</strong>＞<em>どこでも書こうと思えばかけると思うが...</em></li>\r    <li><strong>LAD○メソッドという独自の方法がすごい</strong>＞<em>これは結構良いと思う</em></li>\r    <li><strong>英語もパソコンも勉強できる。</strong>＞<em>最近どこでもそうだ</em></li>\r    <li><strong>就職先の斡旋もしている</strong>＞<em>登録企業なのだろうか？</em></li>\r    <li>最近大阪にも出来た＞<em>やっとかい、でも未だHPには大阪校の掲載はない...</em></li>\r</ul>\r<p>とまあ、こんな感じらしい。でも、自分の所の良いところは言うが、他の学校はけなしまくり。<br />\rまあ、ここまではふつうの英会話教室なのだが、この後英会話教室に入って説明を聞く...<br />\rここで自分の学校は、LAD○博士が作ったとも良いカリキュラムで、自分のぺースで学習できると...くろねこが、「昔行ってたNCBと同じやん」とつっこむと同じ人が作ったという...＞じゃあNCBでもいいやん<br />\r今、英会話スクールに行く時間とお金が...と渋ってると、<strong>とある女の子のローン申込書を持ってきて</strong>、目の前に置き、「こんな女の子でも...」っと話し始める。ちょっとまてーい。それ他人に見せるのはプライバシーの侵害では...その申込用紙には<strong>名前・住所・年齢・電話番号</strong>などが記載されてた...<br />\rここで。このときくろねこのは、もうここには行く気が全くなくなった。</p>\r<p>&nbsp;こんな、<em>ろくにプライバシーも守れない英会話スクールにはご注意を！</em></p>','<p>あ、ここの他の本校や新宿・名古屋校でどういう対応がなされているかは不明です。<br />\rたまたまくろねこの相手をした人の自覚がなかったのかもしれませんが、ゴキブリ一匹見たら10匹はいるみたいなものではないかと推測は出来ます。</p>\r<p>個人情報保護法案成立したようなので、このような対応を見たら訴えてあげましょう!!</p>',1,5197,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:03','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050116_kinoko_obj',3,0,'2005-01-16 14:22:12','今日見つけたキノコのオブジェ',null,'<p>本日、とあるお店でスーパーマリオに出てきそうなキノコの焼き物を見つけました。<br />\r大きさは３種類で、一番小さいサイズには何色かあった。<br />\r並べてみると結構かわいい。<br />\r価格は一番大きいもので700円ちょっと、真ん中で300円後半、一番小さいのが119円だった。<br />\r買って帰ると嫁さんに...なのでやめました。<br />\r<a href=\"http://blog.blackcatlab.com/images/gene/kinoko.jpg\"><a href=\"http://www.blackcat.xyz/images/articles/050116_kinoko_obj_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"300\" src=\"http://www.blackcat.xyz/images/articles/050116_kinoko_obj_1.jpg\" alt=\"\"></a><br />\r</a></p>','',1,2926,1,0,'0000-00-00 00:00:00',0,'<a href=\"http://blog.blackcatlab.com/images/gene/kinoko.jpg\">http://blog.blackcatlab...</a>',0,1,1,0,0,'1999-11-30 00:00:40','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050119_key_in_outlet',3,0,'2005-01-19 21:54:38','カギをアウトレットに...',null,'<p>昨日、息子がカギをアウトレット(コンセント)に突っ込んだ！！<br />\r息子は終始泣かなかったが、<strong>「バシッ」</strong>と言う音と共に部屋は真っ暗に...<br />\rそしてブレーカーも落ちた...<br />\r息子は、中指に大きな水泡ができて(<em>やけどのレベルで行くとⅡ度ですね</em>)、近くの病院に連れて行った。<br />\r病院で治療してもらったがそのとき、<strong>水泡はつぶさないほうがよいのだと</strong>...つぶすの感染の危険性があるとのこと。<br />\r<em>感染すると、やけどのレベルがⅢ度になり跡が残りますね。</em></p>\r<p>おいらは、嫁さんにカギ持たせるからだとか、息子の手が届くところに置くからだとか、何でちゃんと見てないのとかこっぴどくしかられた。しかし、おいらが原因？？？子供はいたずらして育つんだし、ずっと監視するにしても限界があるよな...<br />\rしかし、やけどしても泣かないのは強いからか、それともまだ感覚がが鈍いのか？</p>','<p>昨日は水泡をつぶすと化膿するから....といわれていたのだが、今日は病院で水泡の水を抜くためにつぶしたらしい。いったい水泡をつぶすつぶさないの基準はどこにあるんだ？</p>',1,2739,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:39','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050122_sleep',3,0,'2005-01-22 23:32:36','うちの息子はなかなか寝ない',null,'<p>うちの息子はなかなか寝ない。<br />\rこうやってブログを書いている今でも起きている。起きているの紙とシャーペンを渡すと、私のクリアケースの引き出しからのりを出してきて紙に塗って遊んでいる。<br />\rしばらくして、のりを取上に行くと、「めっ！」と言いながら、かたくなにのりを渡そうとせず、右手にのりを持ち左手で追い払いにくる。少し下がって見ていると、なおも追っかけてくる結構しつこい。自分の安全圏を確保するまで続くようだ。私がパソコンの前のいすに座ると、また遊び始める。<br />\rパソコンの前のいすから息子を眺めていると、シャーペンを突き出し、「て！て！」と言いながら紙に手を置き、手の絵を描けと要求する。手の形になぞるだけだから簡単なのだが、なぞり終わらないうちに紙の他の場所に手を写し、また「て！て！」といいながら再度要求を繰り返す。これがしばらく続く。<br />\rこちらとしてはせっかく書いてあげてるんだから、最後まで...と思うが、あちらとしてはかまってもらえていれば、欲求は満たされるのであろう。<br />\rしかし、息子を寝かしつけたはずの嫁は布団の中で、携帯でゲームをしている。私が息子をかまっているひもかまわない日も（むしろかまわない日の方が多いが...）ずっとゲームをしている。<br />\r布団に入って電気を消しても、それは続く<br />\r私もパソコンでいろいろ遊んではいるので人のことは言えないが、何とかならんかなうちの家庭...</p>\r<p>ちゃんと寝かしつける努力はしてほしいな ＞ 嫁</p>\r<p>他の家庭は、どうやってるのか知りたい！</p>','',1,3561,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:56','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050126_delphi2005_pro_1',3,0,'2005-01-26 22:11:28','Delphi2005 アップデート1 全言語版 Professionalでました',null,'<p>待望の全言語対応のDelphi 2005 Pro用 Update1がようやく公開されましたので、早速ダウンロードして、インストールしてみました。<br />\rReadme.txtにも書いてあるとおり、HDDにCD-ROMの内容をコピーして作業しました。実は、年末に開発PCのXP化を行ない、そのときにDelphi 2005を再インストールする機会があったので、そのときコピーしていたのですが。他の方のサイトで見たのですが、HDDにコピーする際にDisk1,2の内容を別々にコピーすると意味が無いようです。Disk1をコピーしたディレクトリに対してDisk2を上書きするような形でコピーするとよいです。<br />\rアップデートするとエイリアスの内容が消えてしまうようです。念のため、アップデートする前にidapi32.cfgのバックアップを取るとよいでしょう。くろねこはとるのを忘れていたことと数も少ないため、デイリーバックアップから戻さず、再作成しました。</p>','',1,4496,0,0,'0000-00-00 00:00:00',2,'',0,1,1,0,0,'1999-11-30 00:00:56','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050130_Hoken',3,0,'2005-01-30 09:52:09','こんな保険屋はやめてしまえ！',null,'<p>くろねこの自動車保険はチューリッヒである。<br />\r約3年前はディーラーで車を買ったときにそのディーラーが代理店であった、東京海上火災に入っていた。<br />\rでは、なぜ自動車保険を変えたのか？その理由を体験談をふまえてお話したい。</p>','2000-2002年頃くろねこは、車に当たられることが多いというか、被害事故が1年に1回くらい有った。そのうちの１件に2002年5月に事故が起こって、警察による処理をすませた。<br />\rその後、保険会社経由で相手側の保険会社と交渉に入ったのだが、後日事故の処理状況が気になり保険会社に5/29に連絡を取った。<br />\rそのときの保険会社の対応が<em>聞いたことにちゃんと答えてくれない</em>。今どういう状況なのか聞いても答えてくれない。「<em>今、相手保険会社と交渉中</em>」ですとの旨しか答えてくれない。<br />\rこちらもMSCに参加中だったこともあり、時間がないのでその日はそれで終わりになった。何か怪しいと思ったので、相手側保険会社の情報を聞いていたこともあり、聞いてみようとTELしたが不在。<br />\rさらに後日、5/31に相手保険会社の日本興和損保からTELがあり、そのときの状況を聞いてみたが「東京海上と連絡を取ったのは5/29午後9:57が最初」だという。<br />\r5/29日は13:00頃TELしていたので、<em>東京海上火災は嘘つきということになった</em>。そのことを東京海上火災にTELすると、「状況を正しく伝えず申し訳ございません」とあくまで嘘をついたとは言わない。<br />\rここで、ふと考えた。今度の事故だけでなく、今までの対応をふまえた上で東京海上火災側の対応について、<em>一本の確立されたポリシーがある</em>と、そのポリシーとは、<br />\r<em>東京海上火災の利益 ＞ 顧客の利益</em><br />\rである。<br />\rまあ、企業なので利益を追うのは仕方ないのだが、顧客が踏みにじられていると感じた。<br />\rより具体的には、東京海上火災側が多少払う金額が多くなったとしても(過失割合が増えても)、人件費を低く抑えて支出を減らし、顧客からは、等級を下げてがっぽり保険料収入をいただく。<br />\rまあ、くろねこが感じたことなので、本当のところはそうではないかもしれないのだが、事実を歪曲させて伝える習慣のある企業の様だと感じた。<br />\rもし、事故が起きたときの保険会社の対応が、今の状況を正確に伝えてくれずあやふやな答えしかしない場合、自分の事故の処理などしていないかもしれない。<br />\r後手に回れば、相手側の言いなりになり過失割合は増えるかもしれないので安心できる保険会社に変えると良いでしょう。<br />\rチューリッヒに変えてから起きた事故は、100%もらい事故(停車中の事故)だったので、対応してもらったことがないので、チューリッヒが良いかどうかはわかりません。<br />\rくろねこが事故が起こった際に保険会社に期待することは、以下のような項目です。<br />\r<ul>\r    <li>事故に相応の過失割合を判定してほしい </li>\r    <li>&uarr;出来れば過失が低い方が良いので交渉力は高い方が良い </li>\r    <li>対応スケジュールの目安を教えてほしい </li>\r    <li>現在の状況を定期的に教えてほしい </li>\r</ul>\r皆さんの期待する項目ってどんな項目ですか？',1,4434,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:14','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050205_snow',3,0,'2005-02-05 22:06:46','雪が降ったら...',null,'<p>今週の水曜日雪が降った。<br />\r仕事場に行くときにＪＲを使うのだが、<strong>雪が降れば必ず遅れる。</strong>まあ、雪が降らずとも遅れるのだが。</p>','こんな時に思うこと、ＪＲって災害対策してるのだろうか？どうやらしていないらしい。<br />\rすると、経費がかかるからというのがその理由のようだ。それ以外にも、経費削減で踏切などのシステムの部品が電機メーカーからの仕入れでまかなうようになったらしい。今までの電車向けの機器メーカーの方がノウハウも有るだろうに...。かといってその辺で変な安心感が出来ても困りますが。<br />\r壊れたら、その部分を交換なので故障の原因がわからない。わからないと言うことは、対策がされない。対策がされないから故障が減らない。だから遅れの件数は減らない。減らないどころか増えている理由がここにありそうだ。<br />\r雪もそうなのだが、車でいうと「<strong>スタッドレスタイヤをはかず運転にでて、のろのろ運転でおくれた。</strong>」といったところでしょうか？こんなことで誰が同情してくれるのでしょうか？<br />\rＪＲはほとんどの区間で寡占状態の企業なので、こんなことをしていても利用者は減らない。だから列車を送らせても、すし詰めにしても利益が減ることはなく、かえって本数が減らせた分だけ儲かるのでしょう。遅れたらその損害保証するぐらいの気持ちで遅れないように努力してほしいものです。<br />\rあ、皆さん知ってましたか？ＪＲを定期で載ってる人は裏面を見てください。<strong>列車が5日間遅れない限り払い戻しは無い</strong>と書いています。5日も遅れる電車がどこにある。中で餓死してしまうぞ。',1,2857,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:48','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050206_adult_site',3,0,'2005-02-06 01:46:56','アダルトサイトの“入口”をクリックしただけで...',null,'<p>今日、ウルティマオンライン(以下UO)で遊んでいると...<br />\rUOで知り合いからQが入って、アダルトサイトのボタンを押したら入会になってしまった知り合いがいるんだけど...みたいな話が舞い込んできた。<br />\r&nbsp;</p>','<p>よくよく聞いてみると、ネットサーフィン中にアダルトサイトを見つけ、<strong>アダルトサイトによくある18歳以上かどうか？というリンクボタンをクリックしたら、実は入会承諾ボタンだった。</strong>そのリンク先のぺージに<strong>入会金3万円、IPは記録したから逃げられないよ。</strong>というような内容が記載されていたという。過去に似たようなメールのリンク先をクリックしたら、アダルトサイト入会で...8万円(入会金+利用料(初回アクセス時に3ヶ月分)+利息+督促手数料)の請求が...みたいな事件があったくろねことしては、払わなくても良いと言うことを１時間くらい話した。<br />\rクレジットカード番号、名前や住所などの個人情報を入力してなければ、本人を特定することはプロバイダーの協力無しにはむずかしい。すでに個人情報を得ている者に対してID付きのURLを記載したメールを送るなどして、承諾ボタンをクリックさせた場合はこの限りではないが。<br />\rしかし、この場合も「法律上、利用者が契約をするにあたり錯誤（勘違い）があった場合、その契約は原則として無効となる旨が定められている」のですぐに払う義務が発生する訳ではないようだ。そのあとそのサイトを閲覧していた場合は、さすがにダメでしょうが。そのとき1,2回クリックして見ちゃったぐらいは、どのリンクがどこに行くのかわからないサイトでは何とかなるでしょう。こんな悪徳請求から守ってくれる法律は、「民法第95条」と「電子消費者契約及び電子承諾通知に関する民法の特例に関する法律第3条」だ！むずかしいときには、住んでいる地方自治体の無料弁護士相談・警察にご相談を。<br />\rしつこい電話・メールでの請求には、</p>\r<ul>\r    <li>無視を決め込む</li>\r    <li>個人情報は一切開示せず(名前もNG)、「書面でアクセスログなどとともに督促してくれ」という。</li>\r    <li>相手の情報をよく聞いて(企業名と担当者名くらいしか言わないことが多いですが)、警察に相談。</li>\r</ul>\r<p>悪徳業者はすでにリストに載っている場合も多いので、ネットで探してるのも良いでしょう。<br />\rこんな悪徳業者には、１円たりとも払ってはいけません。<br />\r<em>※相手からの督促は無視で対応できる場合が多いと思いますが、<strong>裁判所から届いた通知にはちゃんと目を通しましょう</strong>。少額訴訟の通知だったりすると、その日に裁判所に行かないと自動的に裁判に負けて、払わなくても良いお金を払わないといけ無くなることも有るようです。</em></p>',1,3077,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:16','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050209_tdbimage_gdi_error',3,0,'2005-02-09 22:24:54','バグ：TDBImageでコピペすると、GDI+で一般的なエラーが発生。',null,'<p>.Net Framework 環境下でTDBImageで画像をペーストすると、<br />\r<strong>プロジェクト xxxxx は未処理の例外クラス System.Runtime.InteropServices.ExernalException (メッセージ\'GDI+で一般的なエラーが発生しました。\')に遭遇しました。</strong>がでる。<br />\rUpdate1以前からあるのだが、Update1後でも修正されていないようだ。<br />\r今日、MLを見て思い出して検証プログラムを作って試してみたが、同じ現象が出た。<br />\rまあ、DBに画像をほりこむ人はあまりいないだろうが、使用する予定の方は要注意。<br />\rQCには登録済みだが、機械翻訳の英文のため内容が担当者に伝わるか疑問。(日本語もあやしいくろねこ)</p>','<p>検証プログラム&darr;</p>\r<pre><strong>unit</strong> UDBImage;\r\r<strong>interface</strong>\r\r<strong>uses</strong>\r  Windows, Messages, SysUtils, Variants, Classes, Graphics, Controls, Forms,\r  Dialogs, Borland.Vcl.Db, Borland.Vcl.DBTables, Borland.Vcl.DBCtrls,\r  Borland.Vcl.ExtCtrls, System.ComponentModel;\r\r<strong>type</strong>\r  TForm11 = class(TForm)\r    DataSource1: TDataSource;\r    DBNavigator1: TDBNavigator;\r    DBImage1: TDBImage;\r    Table1: TTable;\r  <strong>private</strong>\r    { Private 宣言 }\r  <strong>public</strong>\r    { Public 宣言 }\r  <strong>end</strong>;\r\r<strong>var</strong>\r  Form11: TForm11;\r\r<strong>implementation</strong>\r\r{&#36;R *.nfm}\r\r<strong>end</strong>.</pre>\r<p><em>検証方法</em> </p>\r<ol>\r    <li>DBImageに画像が表示されている状態でCtrl+Cでコピー。 </li>\r    <li>+ で新規レコードに移動。 </li>\r    <li>DBImage上でCtrl+Vでペースト。 </li>\r    <li>TDNavigatorの保存ボタンか、移動ボタンでレコードを保存しようとすると、上記エラーが発生する。 </li>\r</ol>\r<p>※ Delphi8でも検証したが、同じでした。</p>\r<p>QC登録URL(Report #: 9952)<br />\r<a href=\"http://qc.borland.com/wc/qcmain.aspx?d=9952\">http://qc.borland.com/wc/qcmain.aspx?d=9952</a></p>',1,4139,1,0,'0000-00-00 00:00:00',0,'<a href=\"http://qc.borland.com/wc/qcmain.aspx?d=9952\">http://qc.borland.com/w...</a>',0,1,1,0,0,'1999-11-30 00:00:31','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050215_ic_card',3,0,'2005-02-15 00:37:35','非接触型ICクレジットカード',null,'<p>先週、JCBから新しいクレジットカードが届いた。<br />\r新しいカードはスキミング対策なのかICカードになっていた。セキュリティが向上するのは良いことだ。<br />\r<br />\rと、思ったがちょっとまてー。<br />\rICカードって本当にセキュリティが上がってるのだろうか？ICOCA や SUICA に代表されるように、ICカードは非接触型が多いはず...ということは、<strong>わざわざスキミングしなくても近くによれば他人のクレジットカード情報を取り出せるのでは...</strong><br />\rちょっと調べて見ました。ICカード読み取り装置っていくらぐらいなのか。<br />\r公的個人認証ＩＣカードリーダーですが、<strong>ビッグカメラで接触型が3千円弱、非接触型が2万円弱くらい</strong>ですね。カードリーダ自体は入手できそうなので、ソフトウェアの開発キットさえ入手できれば、中身は読めそうです。<br />\rクレジットカード情報は暗号化されているでしょうが、どのくらいのセキュリティ強度があるのでしょうか？128ビットくらいあるのかな？しかし、暗号化強度128ビットでも昔のどこかの会社のように「<strong>実際には内何ビットしか使ってない</strong>」ということだと全く意味がないし。<br />\r<br />\r時間があれば、クレジットカード会社に確認してみようかと思います。<br />\r<em>ICカードの持ち運び時には、アルミケースに入れておいた方が安全かも...</em></p>','<p><strong>問い合わせしたら聞きたいこと一覧</strong></p>\r<ol>\r    <li>カードが盗難された場合に、警察とJCBに届けを行えば60日前以降の分は免責とのことだが、偽造カードの場合は？</li>\r    <li>暗証番号が数字4桁というのはあまりにセキュリティが低いと思うがいかがか？</li>\r    <li>ICチップにクレジットカード番号・暗証番号などがなどが保持されているようだが、実際にはどのような情報が保持されているのか？</li>\r    <li>ICチップによりセキュリティがアップしているとのことだが、ICチップになっただけではセキュリティは向上しない。<br />\r    実際にどのようなセキュリティ対策が行われているのか？</li>\r    <li>ICチップに保持された暗証番号を書き換えることによって、また書き換えられたカードを偽造することにより暗証番号を知る必要なく利用できるようになるがこれに関して意見はあるか？(個人的には暗証番号はサーバに持つべきだと思うが)</li>\r    <li>ICチップは非接触タイプだと思うが、これだとカードにふれずしてスキミングが可能であるがこれに関して意見は？</li>\r    <li>ICチップと磁気ストライプでセキュリティの観点から見ると安全性はどちらか低い方にまで下がるのでかなり危険だと思うが、磁気ストライプの方を使用できないようにすることはできるのか？</li>\r</ol>',1,3534,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:58','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0053',3,0,'2005-02-15 22:05:00','[Delphi] コンポーネントを使用したらアドレス違反が...',null,'コンポーネントを自身のプログラムに組み込んだら、アプリケーションの起動時または、追加したフォームの作成時に「アドレス違反が発生した。」ということはありませんか？こんな時、くろねこ製のコンポーネントだと、ふつうは真っ先にコンポーネントのバグを疑います。(またテスト漏れしてやがると、サポート掲示板にでも苦情を書き込んでやってください。)がしかし、ほかのプログラムでは正常に動いてるのに...<br />\nこんな時には、プロジェクトの設定を確認してください。プロジェクト|オプション|パッケージ の「実行時パッケージを使って構築」にチェックがついていませんか？このチェックが ON の場合には、パッケージ本体のファイルが必要になります。具体的にはアプリケーション実行時にパスの通ったディレクトリに、<strong>*.bpl</strong> ファイルが必要になります。\n<h4>実行時パッケージを使って構築って？</h4>\n実行時パッケージを使って構築を使うと DLL を使った時のように、重複するコードをプログラムの外に出すので EXE ファイルのサイズを小さくできます。実行時に BPL ファイルを読み込んでダイナミックにプログラムと結合してアプリケーションの動作に寄与します。このため実行時に参照できる状態にないと、アドレス違反が発生するのです。 小さいアプリケーションの場合には、実行時パッケージを使わない方がよいでしょう。EXE 一つで配布が完了するので、配布ファイルの管理が非常に楽になります。<br />\nではいつ実行時パッケージを使った方がよいのでしょうか？それは、プログラムの配布サイズが企業ポリシーで制限されている場合や、頻繁に修正されるようなプログラムで修正される部分と修正されない部分を分けてしまう場合などがあります。大きなアプリケーションですと、サブシステム毎に分割を行うということもあるでしょう。<br />\n分割してしまうと、その実行時パッケージに修正を行った場合(機能拡張やバグ修正など)、にその実行時パッケージを配布すればよいので、配布するプログラムのサイズを大幅にカットできます。大企業やソフトハウスなどで遠隔地のパソコンに修正プログラムを配布しなければいけない場合には、時間の短縮にもなりますね。','',1,7047,1,0,'1970-01-01 09:00:00',0,null,0,1,0,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050215_cpu',3,0,'2005-02-15 23:41:09','CPU買いました。起動しない....',null,'<p>オークションでCPU買いました。</p>\r<p>本日、帰宅したら届いていたので早速開封。そして取り付け。<br />\rシリコングリスがうっすらとしかついていなかったので、長くは動かせないと思い。BIOS画面まで立ち上がるのを確認した。そこでご飯のが出来たので、とりあえず夕食に...</p>','<p>夕食後、はやる気持ちを抑えつつ、パソコン工房へ。行ってみるとしまってて「がーん」。<br />\rしまってるかなと思いつつも、ヤマダ電機へ。行ってみると開いている。そこでシリコングリスを求めるも、売り切れ。代わりに熱伝導シートを購入し、改めてCPU装着。<br />\r電源を入れてみると、電源投入後３秒くらいで切れる。何度やっても同じ。<br />\rごくまれに、なんかマザーボードがしゃべってくれるが内容が聞き取れない。元のCPUに戻すと正常に起動する。<br />\rそこで最新のBIOSにアップグレードする。今まで400MHｚに対応してなかったのだが、このBIOSでは対応しているみたい。(今までくろねこのA7N8X Delux は Rev2.0xのみ400MHｚに対応。くろねこはRev1.0xなので対応してなかった。)。<br />\rBIOSも最新になったところで、もう一度チャレンジしたが、やはり３秒。<br />\rこれはメーカーサポートにお願いするしかない。まあ、他にPCはあるのであわてはしないが、早めにサポートに連絡しておく方が何かと良いだろう。<br />\rまず、マザーボードの販売代理店にマザーボードとCPUの対応状況を確認して、対応が取れていたらCPU購入店にサポートをお願いする流れだろうな。もし、マザーボードと対応が取れていないんであれば、ジャンクで再度ヤフオクに流すか....</p>\r<p class=\"add\">2/17 熱伝導シートをやめてシリコングリスに変更したら、無事動くようになりました。<br />\r今で約4時間ほど動かしてますが、問題ないようです。<br />\rでも、マザーボード、メーカーサイトでは操作確認取れていないことも判明。<br />\rリビジョンが2.0xだと正式サポートなんだけどな...</p>',1,7206,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050118_cms_tempra',3,0,'2005-02-18 21:23:48','てんぷら(てんぷらづくし)',null,'<p><a href=\"http://tempura.scopesd.jp/\">てんぷら....</a><br />\r食べ物ではありません。CMSというツールです。<br />\rホームページを管理する新しいツールなのです。今日発売の<a href=\"http://book.mycom.co.jp/wd/\">Web Desingning(ウェブ デザイニング)</a>の<strong>特集2：XOOPS？ Zope？ TikiWiki？ フリーCMSツールガイド</strong> を見ていくつか紹介されていたCMSツールの中からこれってよさげと思いました。<br />\r早速帰宅後、ウェブで検索。<br />\rまだまだ、これからのようですがとりあえず具体的な使用方法とサンプルが動くようになったら、使ってみたいなと思います。<br />\r特集によると、「テンプレートに部品をはめていく」みたいな形で使用できるようなので、本当なら今までほしかった夢のツールだなーと期待。<br />\rMacromedia の DreamWeaver もいいけど、個人にはちょっと高いよね。ホームページビルダーはバージョンアップ版を&#92;3,500で買ったくろねことしては、DreamWeaverのトライアル版でお試しした後、ヤフオクで物色したけど MX 2004 は3万円以上。た、たかーい。約10倍はするのです。<br />\rマジで通信大学の学生になって、ソフト代を浮かそうかと検討中。</p>','<p>個人的には、ホームページビルダーの購入は安さのみにつられた失敗だったと思っています。<br />\r今時、XHTML 非対応 CSS2.0 非対応だなんて....<br />\rしかも、サポートはIBMがするって？<br />\rいえいえ、まともなサポートは行っていません。しかも、「機能一覧を教えてもらえないの？CSS対応状況とか一覧もらえない？」と聞くと、資料がないので無理だそうです。<br />\r「レイヤー機能使いたいんですが、対応してます？」と聞くと、「レイヤーって何ですか？」と聞き返されて困った困った。あれは使えない。</p>',1,5265,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://tempura.scopesd.jp/\">てんぷら....</a>\n<a href=\"http://book.mycom.co.jp/wd/\">Web Desingning(ウェブ デザイニング)</a>',0,1,1,0,0,'1999-11-30 00:00:04','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050223_peverify',3,0,'2005-02-23 22:55:26','PEVerify',null,'<p>今頃になってやっと <strong>PEVerify</strong> ツールを知り(昔どこかで見たような気はするけど、忘れてました)、JDBGridのサンプルプログラムをチェックしてみました。<br />\rすると、下記のような検査結果が...</p>\r<blockquote>Unable to OpenScopeOnMemory for IMetaDataImport:8013110B</blockquote>\r<p>う、しまった。こんなコンポーネントを公開していたのか...</p>','<p>とりあえず、修正をしようとネットで解決方法を探るが見つからず、元がTDBGridなのでTDBGridを含むプログラムは？と思ってこっちも検査するが、当たり前のごとくこっちはあっさり試験にパス。<br />\rコンポーネントのソースコードを眺めるが、問題点が不明、そこでもう一度最初からJDBGridを使った一番簡単なテストプログラムを作成する。<br />\rすると、今度はあっさりパス。ということは...サンプルプログラムが悪いのか!!<br />\rということで、<strong>.Net Framework用のサンプルプログラムを近々リリース</strong>することにします。</p>\r<p class=\"add\">3/8 やっとちょっとやる気が起きて、サンプルプログラムを修正し、アップしました。<br />\rなんか、だんだんやる気が起きなくなってきてる。年かな。</p>',1,3659,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:07','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050223_css',3,0,'2005-02-23 23:13:37','スタイルシートの設定',null,'<p>今までホームページの確認はIE6でのみ、行ってました。<br />\rしかし、アクセスログのブラウザを見ていると少なからず Firefox があったので、インストールして確認してみました。<br />\rすると、ぐちゃぐちゃレイアウトの裏に文字が隠れてたりするんです。丸１日かかって原因がわかりました。今までくろねこは外部スタイルシートの設定を、各ページで以下のように書いていました。</p>\r<blockquote><strong>xxxxx.htm</strong><br />\r&lt;link rel=&quot;stylesheet&quot; href=&quot;/css/~layout.css&quot; type=&quot;text/css&quot;<br />\rtitle=&quot;レイアウト&quot; media=&quot;screen,print&quot; /&gt;<br />\r&lt;link rel=&quot;stylesheet&quot; href=&quot;/css/~styles.css&quot; type=&quot;text/css&quot;<br />\rtitle=&quot;スタイル&quot; media=&quot;screen,print&quot; /&gt;<br />\r<br />\r<strong>~layout.css</strong><br />\r@import &quot;layout.css&quot;<br />\r<br />\r<strong>~style.css</strong><br />\r@import &quot;style.css&quot;</blockquote>','<p>でもこれだと２つめのスタイルシートが Firefox の場合に正しく取り込めていないようなのです。<br />\rでも、以下のように書き直すことでだいたい表示できるようになりました。</p>\r<blockquote><strong>xxxxx.htm</strong><br />\r&lt;link rel=&quot;stylesheet&quot; href=&quot;/css/@import.css&quot; type=&quot;text/css&quot;<br />\rtitle=&quot;スタイルシート&quot; media=&quot;screen,print&quot; /&gt;<br />\r<br />\r<strong>@import.css</strong><br />\r@import url(layout.css)<br />\r@import url(style.css)</blockquote>\r<p>firefox では、linkタグ一回でスタイルシートを取り込まないといけないようですね。<br />\rまだ、書き直せていないページも多いので順次書き換えていきます。</p>',1,3332,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:15','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050302_final_return',3,0,'2005-03-02 17:19:20','確定申告',null,'<p>終わらない確定申告<br />\rくろねこは今年も白色申告。<br />\rMoneyで確定申告用のデータを管理していたが、データ入力したは良いけど領収書がない。というのが結構あった。最初からもらえないものはよしとして（税務署曰く、多少なら領収書が無くてもOKらしい。諸会費とか、なかなかもらいにくい場合もあるし。）、何でDVD-Rの領収書とかがない？<br />\r仕方ないから、そういう行のデータは無効化する。<br />\rうう、経費が減っていく...<br />\r配偶者特別控除(38万円)も無くなって、それだけで今年は税金が38,000円上がる計算に...来年は青色申告だ！と思っていくつか青色申告ソフトウェアをピックアップする。<br />\rくろねこが目を付けたのは、こんな感じ。</p>\r<ol>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B00068KVPA/letsplaywithd-22\">やよいの青色申告 05</a></li>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0002MVZ6E/letsplaywithd-22\">わくわく財務会計 2...</a></li>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0006GPUN0/letsplaywithd-22\">やるぞ!青色申告 2005</a></li>\r</ol>\r<p>あと、ネットで青色申告サービスがあったが、データをこちらで保存できないので何かあったときに怖いのでパス。</p>','<p>アマゾンで、やよいとわくわくを調べてみる。さらに各社のホームページも見てみる。<br />\rやよいの青色申告05はアマゾンでの評価が低かった。でも一番売れてる。<strong>弥生のＨＰを見る限り購入前のサポートがメールしかない、さらに最大5日もかかる。これだと、購入後のサポートも心配だ。</strong>ということでとりあえずパス。<br />\rわくわく財務会計2 はアマゾンでの評価はない。仕方がないので、上記二本の体験版をダウンロードしてきて試す。やよいは何を買ったの？というところから入力できてらくちんだ。勘定科目を知らなくても入力できそう。しかし、わくわくは、伝票形式で入力していくようだ。<strong>サポートに電話をかけて聞いてみる。</strong><em>非常に丁寧な応対で好感が持てる。</em>今ならサービスで青色申告の本も付いてくるのでこれで勉強して入力する。やはり最低限の知識は必要とのこと。これにしようかなと思ったとき、Vectorで<a href=\"http://shop.vector.co.jp/service/special/kakutei2005/\">こんなの</a>みつけた。くろねこが、福利厚生って何を含める？と思って引いた言葉に「残業時の夜食代や休憩時のお菓子代なども福利厚生費として計上すればよい」が引っかかった。<br />\rやるぞ！はあんまり興味がなかったが、<strong>税理士のサポート0円と、「仕分けナビ」</strong>がかなり引っかかる。しかも安い。早速、体験版で...と思ったが体験版ダウンロードにない。仕方がないので、サポートにお電話。<br />\r<strong>「残業時の夜食代や休憩時のお菓子代なども福利厚生費として計上すればよい」ってほんと？</strong>どこの税務署でもそれでまかり通る？と聞いてみると、ユーザー登録後に税理士に確認してくださいだと。<br />\r<em>いけるかいけないかわからないものまで案内に出すなよ。</em>と思いつつ、仕分けナビの件とか聞いてみると結構使えそう。でもくろねこは来年度用 にほしいので、やるぞ!確定申告は適さないらしい。お勧めは、やるぞ!青色申告をとりあえず買って、来年度版がでてからやるぞ!!確定申告を買うのがお得 らしい。というのも、青色申告ｈあんまりバージョンが上がっても昨日が変わらないが、確定申告は毎年内容が変わるからだと。<br />\rんー。おもしろそうだから、これ買ってみようかな...</p>',1,3661,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B00068KVPA/letsplaywithd-22\">やよいの青色申告 05</a>\n<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0002MVZ6E/letsplaywithd-22\">わくわく財務会計 2...</a>\n<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0006GPUN0/letsplaywithd-22\">やるぞ!青色申告 2005</a>\n<a href=\"http://shop.vector.co.jp/service/special/kakutei2005/\">こんなの</a>',0,1,1,0,0,'1999-11-30 00:00:53','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050305_original_sin',3,0,'2005-03-05 02:03:46','原罪...',null,'<p>今日、<a href=\"http://www.a-seed.jp/index2.html\">アップルシード</a>の<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0001X9BME/letsplaywithd-22\">OVA</a>を見た。<br />\r士郎正宗の作品で、CGが多用してあるのだが動きが荒いかった。特に人物の髪の毛の動きが...でも全体的に絵はきれい。<br />\r内容を一言で表すと、人の原罪と人のとるべき道？みたいな感じなのかな？<br />\r人は人を傷つけ、争いをやめない。人間は罪深き生き物で、その罪故に絶滅する考え方とそれに対して、人間は人間で運命を切り開く両者の争い。</p>','<p>くろねこ的には、原罪って何なのだろうか？とおもう。<br />\rキリスト教的考えから原罪というものがあると思うが、キリスト教自体も原罪を背負っているように思う。<br />\r十字軍に代表される行為にキリスト教の本性が見え隠れする。しかし、その原罪も本能にインプリメントされた重要な機能なのだと思う。人間は互いに争いそして傷つけ殺し合う。そうして人間自体が増えすぎ、種としての滅亡を防いでると、人はその知恵故に滅びもするし、存続もする。<br />\rどんなにルールや法律を作くり禁止しようとも、決して無くなることのない争いが、それを物語っている。</p>\r<p>しかし、原罪っていろいろな映画のテーマになっていると思うんだが、機動戦士ガンダム逆襲のシャアでも、サイド1のロンデニオンでアムロとシャアの会話にそのようなネタが。<br />\r誰か人類の皆に英知を授けてくれるような人は現れるのだろうか？アムロはどうやって実現するつもりだったのだろうか？＞無理だなきっと。</p>',1,3489,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.a-seed.jp/index2.html\">アップルシード</a>\n<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0001X9BME/letsplaywithd-22\">OVA</a>',0,1,1,0,0,'1999-11-30 00:00:29','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0052',3,0,'2005-03-10 22:05:00','[Delphi] 半角(SBCS)と全角(MBCS)を区別する (for VCL.Net)','','<p>半角文字と全角文字を区別する方法です。.Net環境ではDelphiもほかの言語と同じように Unicode になってしまったので、従来のような ByteType 関数による半角文字と全角文字の判定は行うことができません。<br />\r同じように、Win32 API のIsDBCSLeadByte などの API も使用できなくなっています。<br />\r（ここでは半角 = 1バイト文字、全角文字 = 2バイト以上の文字としています。2バイト半角文字もありますが、使用される頻度がほとんど無いため考慮の対象から除外しています。）<br />\rそこで、Unicodeの環境では、Shift-JIS(Windows環境ではコードページ932と定義されています)の形に変換してからチェックを行う必要があります。<br />\r以下は、エディットボックスに半角文字しか入力させないようにする例です。このコードを埋め込むには uses に System.Text を追加する必要があります。</p>\r<pre class=\"brush: delphi; highlight:[9]\" >\rprocedure TForm5.Edit1KeyPress(Sender: TObject; var Key: Char);\rconst\r  VK_Z = 26;\rvar\r  nByteSize: Integer;\rbegin\r  if not (Ord(Key) in [VK_BACK, VK_RETURN, VK_Z]) then // 除外キー\r  begin\r    nByteSize := Encoding.GetEncoding(932).GetByteCount(String(Key));\r    if (nByteSize <> 1) then Key := #0;\r  end;\rend;\r</pre>','',1,13832,1,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-03-18 13:10:43','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0054',3,0,'2005-03-10 22:05:00','[Delphi] アプリケーションの多重起動を防止する(.Net)','','<p>アプリケーションの多重起動を防止したい場面は結構あるのではないでしょうか？ 処理結果を特定のファイルに出力するケースなどがあった場合、複数のアプリケーションがその処理を行うと、最悪そのファイルが壊れるケースが出てきそうですし、ファイルが壊れなくても、内容が変になる危険性が高いと思います。 多重起動防止方法にはいくつか方法があると思いますが、ここではもっとも実装が一般的だと思われる Mutex を使った方法をご紹介します。<br />\rMutex に付いての詳細は、<a href=\"http://www.atmarkit.co.jp/fdotnet/dotnettips/145winmutex/winmutex.html\">@ITにわかりやすい解説</a>があったのでそちらを参照してもらえれば、くろねこの下手な文章よりわかりやすいと思います。<br />\rただ、@IT では Delphi のサンプルが無かったので、Delphi での多重起動防止についてサンプルを作ってみました。<br />\rDelphi で .Net 対応アプリを作るのは大きく分けて2とおりの方法があります。VCL.Net を使う方法と、 Windows Form を使用する方法です。VCL.Net で Mutex を実装する際にまた2とおりの方法に分かれます。2とおりの方法とは、VCL.Net (SyncObjs ユニット) にある TMutex クラスを使う方法と、.Net Framework (System.Threading) にある Mutex クラスを使う方法です。くろねこ的には、.Net Framework を使用する方が美しいかと思います。</p>','<p>以下のサンプルをダウンロードできるようにしました。3つのサンプルがまとめてアーカイブしてあります。プロジェクトグループでそれぞれを確認するとわかりやすいと思います。プロジェクトグループでの順番はこのぺージの順番と同じにしてあります。</p>\r<p>Delphi VCL.Net で .Net Framework の Mutex クラスを使って多重起動防止を実現</p>\r<p>Delphi で一番使うケースになるのではないでしょうか？@IT の記事と同じくWindiws 2000 以降ではグローバル Mutex を使用しています。</p>\r<pre class=\"brush: delphi;\" title=\"MutexSample\">\rconst \r  sAppconstName = \'MutexSample\'; \rvar \r  sMutexName: String; \r  mutexObject: Mutex; \r[STAThread] \rbegin \r  if (Win32Platform = VER_PLATFORM_WIN32_NT) and (Win32MajorVersion &gt;= 5) then \r    sMutexName := \'Global\' + sAppconstName \r  else \r    sMutexName := sAppconstName; \r \r  try \r    // ミューテックスを生成する \r    mutexObject := Mutex.Create(false, sMutexName); \r  except \r    on E: Exception {ApplicationException} do \r    begin \r      // グローバル・ミューテックスによる多重起動禁止 \r      Application.MessageBox(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\'); \r      exit; \r    end; \r  end; \r \r  // ミューテックスを取得する \r  if (mutexObject.WaitOne(0, false)) then \r  begin \r    // アプリケーションを実行 \r    Application.Initialize; \r    Application.CreateForm(TForm12, Form12); \r    Application.Run; \r \r    // ミューテックスを解放する \r    mutexObject.ReleaseMutex(); \r  end \r  else \r  begin \r    //  警告を表示して終了 \r    Application.MessageBox(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\'); \r  end; \r \r  // ミューテックスを破棄する \r  mutexObject.Close(); \rend.\r</pre>\r<p>Delphi VCL.Net で SyncObjs の TMutex クラスを使って多重起動防止を実現 さきほどと同じ VCL.Net です。ただ SyncObjs の TMutex クラスを利用しています。mutexObject.ReleaseMutex(); に相当する記述がわからず、とりあえず Free しています。もしかするとメモリリークが発生しているかもしれません。 P/Invoke を多用しているようで、美しさで先ほどの例の方が良いかと思います。</p>\r<pre class=\"brush: delphi;\" title=\"MutexSample\">\rconst\r  sAppconstName = \'MutexSample\';\rvar\r  sMutexName: String;\r  Mutex: TMutex;\r  MutexAttributes: TSecurityAttributes;\r[STAThread]\rbegin\r  if (Win32Platform = VER_PLATFORM_WIN32_NT) and (Win32MajorVersion &gt;= 5) then     sMutexName := \'Global\' + sAppconstName   else     sMutexName := sAppconstName;\r  try\r    // ミューテックスを生成する\r    Mutex := TMutex.Create(MutexAttributes, false, sMutexName);\r  except\r    on E: Exception {ApplicationException} do\r    begin\r      // グローバル・ミューテックスによる多重起動禁止\r      Application.MessageBox(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\');\r      exit;\r    end;\r  end;\r\r  // ミューテックスを取得する\r  if (Mutex.WaitFor(0) = wrSignaled) then\r  begin\r    // アプリケーションを実行\r    Application.Initialize;\r    Application.CreateForm(TForm12, Form12);\r    Application.Run;\r    // ミューテックスを解放する\r    Mutex.Release;\r  end\r  else\r  begin\r    //  警告を表示して終了\r    Application.MessageBox(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\');\r  end;\r\r  // ミューテックスを破棄する\r  FreeAndNil(Mutex);\rend.\r</pre>\r<p>Delphi Windows Form で .Net Framework の Mutex クラスを使って多重起動防止を実現 Windows Form での実装例です。Windows Form を利用してプログラムを作成するなら、C# で作成した方が良いかもしれませんね。コードもほとんど変わらないと思います。</p>\r<pre class=\"brush: delphi;\" title=\"MutexSample\">\r// アプリケーション固定名\rconst\r  sAppconstName: String = \'MutexSample\';\r\r// 多重起動を禁止するミューテックス\rvar\r  sMutexName: String;\r  mutexObject: Mutex;\r  os: OperatingSystem;\r[STAThread]\rbegin\r  // Windows 2000（NT 5.0）以降のみグローバル・ミューテックス利用可\r  os := Environment.OSVersion;\r  if ((os.Platform = PlatformID.Win32NT) and (os.Version.Major &gt;= 5)) then\r    sMutexName := \'Global\' + sAppconstName\r  else\r    sMutexName := sAppconstName;\r\r  try\r    // ミューテックスを生成する\r    mutexObject := Mutex.Create(false, sMutexName);\r  except\r    on E: Exception {ApplicationException} do\r    begin\r      // グローバル・ミューテックスによる多重起動禁止\r      MessageBox.Show(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\');\r      exit;\r    end;\r  end;\r\r  // ミューテックスを取得する\r  if (mutexObject.WaitOne(0, false)) then\r  begin\r    // アプリケーションを実行\r    Application.Run(TWinForm.Create);\r\r    // ミューテックスを解放する\r    mutexObject.ReleaseMutex();\r  end\r  else\r  begin\r    //  警告を表示して終了\r    MessageBox.Show(\'すでに起動しています。2つ同時には起動できません。\', \'多重起動禁止\');\r  end;\r\r  // ミューテックスを破棄する\r  mutexObject.Close();\rend.\r</pre>\r<p>サンプルプログラムのダウンロードは&rarr;[File:29]</p>',1,11451,1,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.atmarkit.co.jp/fdotnet/dotnettips/145winmutex/winmutex.html\">@ITにわかりやすい解説</a>',0,1,0,0,0,'2011-07-13 11:20:25','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0055',3,0,'2005-03-10 22:05:40','[Delphi] ひらがなからカタカナへ、カタカナからひらがなへ(.Net)','','<p>ひらがなからカタカナに、カタカナからひらがなに変換したい時って無いですか？たとえば、フリガナ入力欄などにユーザがカタカナって書いてるのにひらがなで入力してくる人いませんか？そんなとき、変換関数があったら便利ですよね。<br />\rでも、結構こんな日本語の変換関数を作るのは骨が折れるもの、作ってもデバッグが大変。だったら、あるものを使う方が楽じゃない？標準で日本語変換してくれる関数を持った言語って...と考えると C 言語とかありますね。でも、C 言語は .Net Frramework には見あたらないです。C# にはそのような変換関数は無いようです。でも、Visual Basic には StrConv 関数がありますね。これを使いましょう。<br />\r今までだと、他の言語の機能を使うときは、その言語でその機能を呼び出す DLL を作って使っていたかもしれませんが、StrConv は .Net Framework で Microsoft.VisualBasic アセンブリとして、元々入っています。ということは、これを使っても配布の必要すらないということです。<br />\rこれを呼び出すには、プロジェクトツリーの「参照先」を右クリックして、参照の追加で <strong>Microsoft.VisualBasic</strong> を追加します。これだけで、使う準備は完了です。<br />\rあとは、必要な場所で <strong>StrConv</strong>を呼び出すだけです。</p>\r<dl>\r    <dt>カタカナに変換する場合 </dt>\r    <dd>\r    <pre class=\"brush: delphi\">\redtKata.Text := Strings.StrConv(edtHira.Text, VbStrConv.Katakana);\r    </pre>\r    </dd>\r    <dt>ひらがなに変換する場合 </dt>\r    <dd>\r    <pre class=\"brush: delphi\">\redtHira.Text := Strings.StrConv(edtKata.Text, VbStrConv.Hiragana);\r    </pre>\r    </dd>\r</dl>\r<p>StrConv には、半角&hArr;全角変換などの機能があります。これらも同様の方法で使えるので、是非試してみてください。</p>','',1,7088,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-13 11:18:39','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050312_delphi2005_update2_eng',3,0,'2005-03-12 06:58:56','Delphi2005 Update2 for English release.',null,'<p>英語版 Delphi 2005 のUpdate2がでました。<br />\r更新内容を見ようとリリースノートを見たのですが、内容はCodeCentral参照と言うことで何も記載されていませんでした。仕方なく、CodeCentralを見たのですがどこに載ってるかわからない。<br />\rでも、日本語版のUpdate2が待ち遠しいですね。<br />\r<em>今度はProfessionalだけ遅れてということはやめてほしいな...</em></p>\r<p>Delphi 8 のGeneral Update3もでてますね。これもAvailable Englishになっているんですが...</p>\r<p>□関連記事</p>\r<ul>\r    <li>[story:050126_delphi2005_pro_1]</li>\r</ul>','',1,2863,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:36','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050313_fit_door',3,0,'2005-03-13 17:19:12','ホンダ フィット(車)のドアが閉まらん',null,'<p>くろねこのくるまはHonda の Fit 1.5Wだ。<br />\r買って約半年がたとうとしている...半年の間にも結構いろんなことがあって、最初は<strong>駐車場で駐車スペースに止めようとしてバックしてきた他の車に当てられた</strong>。次は、義理の弟の結婚式に山陽道を走ってたらいきなり<strong>フロントガラスにヒビ</strong>が...<br />\r最近は、<strong>インターナビがつながらん</strong> ＆ <strong>車のドアが閉まらん</strong></p>','<p>Fit 1.5W にはスマートキーという車から離れたら自動でカギがかかるシステムが搭載されているが、これがなかなか言うことを聞かない。半ドアだと閉まらないシステムになっているようなのだが、半ドアでも無いようなのに閉まらん時がある。いつも起こるわけではないというのが一番腹が立つ。いつも起こったら即ディーラーにいけるのに...<br />\r全部のドアが閉まったら「ピッ」って音が鳴るのだが、閉まらん時はそれすらならない。でも半ドアではなさそう。なさそうと言うのは、半ドアと確認する方法が無いのだ。もう一度締め直して確認するぐらいしか...</p>\r<p><em>くろねこ的には、<strong>ドアが閉まってない状態でキーが遠ざかったら警告音を鳴らしてほしい</strong>んだよね。エンジンかけたまま離れたら警告してくれるのに、ドア開けっ放しはなぜ警告してくれないんだろう。</em></p>\r<p class=\"add\">ドアが閉まらなかった原因：<br />\rドアの下側にシールを貼ってたのが原因みたい...<br />\r破がしてから約1ヶ月試してみたら、まだ一回しか問題が起きてない。<br />\r<br />\rもうしばらく様子見よ...</p>',1,6416,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:33','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050314_consumption_tax',3,0,'2005-03-14 23:43:48','消費税',null,'<p>消費税反対の人たちって消費税廃止って叫んでるじゃないですか。<br />\r共産党とか。</p>\r<p>消費税ってなんでだめなんだ？くろねこ的には消費税が悪いんじゃなくて制度が悪いのだと思う。<br />\r消費税は累進課税制度でないとか、言うけれどみんな使った分だけ納める税金があっても良いのではないかと思う。それよりも消費税で一番汚いと思うのが<strong>賃金に消費税が付かない</strong>こと。<br />\r<strong>賃金に消費税が付加されれば、消費税が上がっても収入がそれ以上に増える</strong>からOKだよね。(収入より支出が少ないという仮定に基づいています。)年金生活者は苦しいんじゃない？という所を考えてみると、消費税が上がり物価が上がる。物価が上がると<strong>年金は物価上昇分に対応する</strong>と言うことになっているので、政府の対応が早ければ問題ないわけだよね。<br />\r問題は貯金をたくさん持っている人。この人たちは物価が上昇した分貯金が目減りするので損をする。でも、ここで考えてほしい。貯金をたくさん持っている人ってどんなにと？<br />\r貯金をたくさん持っている人はお金持ちが多いよね。その人たちのお金が減ると言うことは、<strong>消費税は累進課税</strong>だと言うことにならないのかな？</p>\r<p>誰か詳しい方、教えて頂けないでしょうか？</p>','',1,2951,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:24','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050316_means_lady_first',3,0,'2005-03-16 20:21:09','レディーファーストって知ってる？',null,'<p>レディーファーストっての本当の？大元の？意味知ってますか？<br />\r<br />\rとあるホームページ<a href=\"http://www.point.ne.jp/contents/shittoku/manners/mann15.html\">http://www.point.ne.jp/contents/shittoku/manners/mann15.html</a>レディーファーストの起源についてかかれています。<br />\r中世ヨーロッパの先に食わせて毒味のことは知らなかったのですが、近代ヨーロッパでの<strong>女子供はひ弱で、男よりも一段格が下がった生き物、なので先を譲る</strong>という考え方から来ていると思っていました。さらに上があったとは...<br />\rレディーファーストが現代のマナーかどうかはわかりませんが、それが当然と大きなかおをした態度のでかいやつには譲る気持ちも失せますね。<br />\r<br />\rそういえば、最近のマナーを商売にしてる奴らって、<strong>マナーを自己満足に</strong>してませんかね。</p>','',1,2950,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.point.ne.jp/contents/shittoku/manners/mann15.html\">http://www.point.ne.jp/...</a>',0,1,1,0,0,'1999-11-30 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050318_movabletype_to_lolipoblog',3,0,'2005-03-18 21:21:20','MovableType から ロリポブログに移行中!!',null,'<p>容量が増えたから...いやそういうことじゃ無いんだけど...<br />\rくろねこのブログを MovableType から ロリポブログに移行中。<br />\r<br />\r移行するに当たって、MovableType から ロリポブログに移行するに当たっていくつかのメリットとデメリットを考えた。</p>\r<dl><dt><strong>MovableTypeであることのメリット</strong></dt><dd>\r<ul>\r    <li>どこのホスティングに移ってもデータを持って行ける。</li>\r    <li>一件あたりの画像サイズの制限などの制限が事実上ない。</li>\r    <li>MovableType は結構有名なので関連書籍・テンプレートなどがおおい</li>\r    <li>カテゴリが複数登録できる</li>\r</ul>\r</dd></dl><dl><dt><strong>ロリポップであることのメリット</strong></dt><dd>\r<ul>\r    <li>ロリポップのホスティングサービスの容量を消費しない。</li>\r    <li>しかも、ブログの容量のカウントは画像のみ。さらに100MBに増えた。</li>\r    <li>ロリポップのホスティングサービスの容量を消費しない。</li>\r    <li>管理が簡単そう。</li>\r    <li>ロリポのサービスの増加はめまぐるしい(今後に期待できる)。</li>\r    <li>キヌガサと連携できる。</li>\r</ul>\r</dd></dl>\r<p>まあ、ロリポやめるときは自前でデータ移行スクリプトでも組むか... 当分なさそうだが。それよりまた、テンプレート作る手間がかかるな。<br />\rロリポにスパムフィルタがついてASP.NETが動いてくれれば、安いし容量多いし、サービスも豊富だし言うこと無いのだが。<br />\rスパムフィルタだけでも何とかなりませんかね。</p>','',1,3573,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:42','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050319_creating_blog_template',3,0,'2005-03-19 23:13:02','ブログテンプレート作成中...',null,'<p>MovableType から ロリポブログに移行中...<br />\r<br />\rサイトの中でブログだけ雰囲気が変わるのはちょっと...と思い、テンプレート作成中。ブログだけじゃや無くて掲示板とかも全然違うんだけど<br />\rとりあえずブログはテンプレートを変更できる仕組みがあるから...<br />\r<br />\rでもかなりしんどい。CSSをちょっとずつ変更して、雰囲気を見ながら換えていったんだけど、一日かかってやっとここまで。<br />\rまだ、コメントとトラックバック部分は作れてない。<br />\r<br />\rまた、時間をおいてゆっくりかかるぽ。</p>','',1,3100,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:32','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050321_umekoji',3,0,'2005-03-21 22:13:36','梅小路蒸気機関車博物館に行ってきました',null,'<p>梅小路蒸気機関車博物館に行ってきました。<br />\r<br />\r今日はなぜかスチーム号が動いていました。<br />\r動いていたので、息子と嫁と姪っ子と乗車してしまいました。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/050321_umekoji_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"300\" src=\"http://www.blackcat.xyz/images/articles/050321_umekoji_1.jpg\" alt=\"\"></a></p>','<p>これが、動いてたスチーム号。息子とかが写ってる写真もあるけどWEBに乗っけると危なそうなので、差し障りの無いのになってしまった。<br />\r帰り際、建物から出たとき、スチーム号最後の案内があった。最終運転の後ターンテーブルに載って車庫に帰っていくらしい。<br />\r<em>くそ、おいしいところを逃してしまった。</em>再入館は出来ないので、出来ればこれから行く人は、おいしいところを逃さないようにしてください。<br />\r<br />\r<a href=\"http://www.mtm.or.jp/uslm/\">梅小路蒸気機関車館</a><br />\r<br />\r開館日・休館日 <br />\r&nbsp; 9：30～17：00（入館は16：30まで） &nbsp;<br />\r&nbsp; 毎週月曜日（祝日の場合は開館）※学校の春・夏休みは開館 <br />\r&nbsp; 年末年始（12&#8260;29～1&#8260;3） &nbsp;<br />\r料金<br />\r&nbsp; 大人(高校生以上) 400円<br />\r&nbsp; 小人(4歳以上)&nbsp;&nbsp;&nbsp; 100円<br />\r<br />\rSLスチーム号乗車料金<br />\r&nbsp; 大人(高校生以上) 200円<br />\r&nbsp; 小人(4歳以上)&nbsp;&nbsp;&nbsp; 100円</p>',1,3750,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/050321_umekoji_1_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.mtm.or.jp/uslm/\">梅小路蒸気機関車館</a>',0,1,1,0,0,'1999-11-30 00:00:12','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050321_image_patch',3,0,'2005-03-21 23:48:45','画像変換',null,'<p>ウルティマオンラインで画像変換してみる。</p>\r<p>画像変換してみようと思ったきっかけは、こちらの<a href=\"http://dog-arufa.hiho.jp/\">こちらUO警察犬の派出所</a>にある<a href=\"http://dog-arufa.hiho.jp/pvp/Tec.htm#その他\">＜その他の環境＞の記事</a>による。<br />\rここに書いてあるように<a href=\"http://k1g0.hp.infoseek.co.jp/UOURAF.LZH\">UltimaOnine Uraura Tool</a> を使って木を切り株に、葉っぱや枝をマッシュルームに換えてみる。<br />\rほんとは、葉っぱは何もないのに換えたかったんだけど、わからなかったので、マッシュルームに...フラワーズに換えても良かったかも。<br />\r赤いマッシュルームに換えちゃうと、クエストの時に困るから赤くないマッシュルームに換えてみました。</p>\r<p>換えた画像変換後のファイルは<a href=\"http://www.jnishida.com/downloads/uo/gazo-henkan.cab\">こちら</a>に...<br />\r2005/03/21現在のファイルを使用しています。解凍すると <strong>artidx.mul</strong> というファイルが出来ます。<br />\rこのファイルでウルティマオンラインのフォルダにある同名のファイルを置き換えます。</p>\r<p><em>※注意1 置き換え前には必ずバックアップを！パッチ適用時などに元に戻す必要があるようです。</em><br />\r<em>※注意2 このファイルを利用した結果不利益を被ってもくろねこは一切保証できません。自己責任でお願いします。</em></p>\r<p><strong>変更したら、じゃまな木がすっきりして、トクノの森にいるルンビを倒すのがとても楽になりました。</strong></p>','',1,5825,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://dog-arufa.hiho.jp/\">こちらUO警察犬の派出所</a>\n<a href=\"http://dog-arufa.hiho.jp/pvp/Tec.htm#その他\">＜その他の環境＞の記事</a>\n<a href=\"http://k1g0.hp.infoseek.co.jp/UOURAF.LZH\">UltimaOnine Uraura Tool</a>\n<a href=\"http://www.jnishida.com/downloads/uo/gazo-henkan.cab\">こちら</a>',0,1,1,0,0,'1999-11-30 00:00:05','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050323_spam_filter',3,0,'2005-03-23 23:45:49','ロリポにも待望のスパムフィルタが!!',null,'<p>待ってました!<br />\rロリポにも待望のスパムフィルタが!!<br />\r<br />\r<em>ずっと待ってたんですよ、<strong>スパムフィルタ</strong></em><br />\r安さに惹かれて月1,000円くらいのレンタルサーバから移ってきて、はや１年がたとうかとしています。スパムメールも膨大<strong>になってきたのでとりあえずメールアドレスを変えるかー</strong>とユーザ専用ぺージをあけてぼーっと眺めていたら、<em>ウイルス・迷惑メール設定</em>と<em>メール受信設定</em>が!!!<br />\rうーむ、当初ロリポに決めたときから<em>データベースが使えたり、カートがあったりただの激安ホスティングサービスとはひと味違う</em>と思っていたが。<br />\rロリポって望めば何でも付くような気がしてきました。<br />\r次は、ASP.NETが使えるようにならないかな...あとアクセスログがFTPで取れるようにならないかな。<br />\r<br />\r3/29がとても楽しみです。作ったアドレスは必要なくなったので、とりあえず消しておこっと...</p>','',1,3735,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:29','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050324_uo_guidebook',3,0,'2005-03-24 23:42:55','新しいUO公式ガイドブック!',null,'<p>今度新しいウルティマオンラインの公式ガイドブック <strong><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4840230358/letsplaywithd-22\"> ウルティマオンライン 公式コンプリートガイド 武刀の天地対応版</a></strong> がでるらしい。<br />\r前の同様の公式ガイドブックはパブ18対応だったので、今度でるのがパブ31対応だと仮定すると、パブが13回もあったことになるのか。<br />\r<br />\rそろそろくろねこが持ってる公式ガイドブックも古くなったので、新しいのを買うかな。でもそろそろ引退も考えた方が良いかも。<br />\r<br />\rこちらの<a href=\"http://blog.slowlife.lolipop.jp/\">ぺージの方</a>もUOではなくROですが引退されたようですね。本日、この方のぺージを途中までですが読んで、自分の引退時に周りからどういう反応があるかと想像してしまいました。<br />\r引退するのももう時期を逃した感があるのですが、アカウント料だけ払いつつ細々とやり続けるか、それともきっぱりやめてみんなの記憶からフェードアウトするか。<em>MMOって変にゲーム内に資産が残って、またやりたいときにそのまま残ってるというものじゃないのが、やめられない理由 </em>だなーと思うくろねこです。</p>','',1,3075,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4840230358/letsplaywithd-22\"> ウルティマオン',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050327_xml',3,0,'2005-03-27 17:25:35','XML宣言',null,'<p>くろねこのホームページは左側のサイドバーと右側のメインコンテンツ部分に分けて、メインコンテンツ部分にブログの内容などを書いています。<br />\r<br />\rテーブルタグを使って左右に分割すると問題ないのですが、CSSを使って左右に分割するとコンテンツの内容によって短い方のエリアが途中で終わってしまう結果になります。左右の分割線を引いていると途中で線が切れてみっともないです。(家の嫁曰く、気にするほどでもないらしいですが)<br />\rそこで背景画像を使って左右の分割線を引いて見ました。そこで気づいた問題点。IE と firefox でボーダーの扱いが違うと言うことです。IE6の互換モードではボーダーはサイズ指定の中に含まれるみたいなのですが、IE6 の通常のモードと firefox ではサイズ+ボーダーになるみたいです(こっちが正しいみたいですね)。<br />\r仕方ないから、XML宣言をとって互換モードから通常モードに移行しようとして、ふと気づきました。<br />\r<em>XML宣言って文字コードがUniCodeならとっても問題ないでしょうが、ロリポブログの様にEUC-JPなら削除できない</em>ということです。<br />\r実際のブラウズには問題ないようですがどうしても気になります。<br />\rでも、ロリポブログのテンプレートいくつか見たところ全部XML宣言がないのですね。この辺はモラルなのか!!それともしらないだけで削除可能なのかな？</p>','',1,3183,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:05','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050327_game',3,0,'2005-03-27 23:24:28','懐かしのあのゲームをもう一度',null,'<p>懐かしのあのゲームをもう一度<br />\r本日、ICQで知った謎の中国人女性にアドレスをいただきました。<br />\r結構良くできていると思うので、皆さんにも見てもらおうと思いました。</p>\r<p>しかし、このゲームが版権の問題をクリアできているのかどうかは不明です。教えてもらったのは直アドレスですが、直リンクはまずいかもしれないので、<a href=\"http://www.80smusiclyrics.com/\">トップぺージ</a>をリンクします。<br />\r暇があれば、お試しください。</p>','<p>リンク先にジャンプするとスクリプトエラーが発生しますが、無視してやれば特に問題はないようです。<br />\rもしかすると、この問題があるので直アドレスを教えてくれたのかな？</p>',1,3607,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.80smusiclyrics.com/\">トップぺージ</a>',0,1,1,0,0,'1999-11-30 00:00:20','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050331_hosting_service',3,0,'2005-03-31 20:13:39','すごいホスティングサーバ見つけた',null,'<p>すごいホスティングサーバ見つけた!!<br />\r見つけた!!ってこれ最初に使ってたホスティングサービスじゃない...<br />\r何でこんなに安くなってるの？<br />\rくろねこが使ってたとき5年ほど前から2年ほど使ったような気がする。そのホスティングサービスは <a href=\"http://www.sakura.ne.jp/\">SAKURA Internet</a>、当時税抜きで2,000円だった。(年払いだと10ヶ月分だったと思う。)当時はそれでもかなり安いと思ってたが、もっと安いサイトを見つけて移った。２年ほどしてスパムフィルタがほしくて他を探してるときに、高機能で安いロリポップを見つけてまた移った。<br />\rしかし、その間に最初のところが<em>パワーアップ＆激安に</em>なってたなんて!!!<br />\r<br />\rロリポと比べてブログやカート機能もない、あと機能のいくつかは<strong>スタンダードプラン以上だけど</strong>、</p>\r<ul>\r    <li>容量がでかい300MB(125円)-3GB(1,500円)まで</li>\r    <li>料金も125円から</li>\r    <li>シェルコマンドが使える(<strong>自動化もサポート</strong>)</li>\r    <li><em>セキュアメール対応</em></li>\r    <li><em>電話ポート対応</em></li>\r</ul>\r<p>など、<br />\rスタンダードプランならロリポよりパワーユーザー向きだと思う。<br />\rくろねこ的には、初心者はロリポでパワーユーザはさくらで!!という感じなのだ!!<br />\r<br />\r未だ使えぬロリポのスパムメールフィルタやウィルスチェック機能もあるし、しかもメールが暗号化して送受信可能!!!<br />\r<br />\r<em>心揺れまくり...</em></p>','',1,2752,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.sakura.ne.jp/\">SAKURA Internet</a>',0,1,1,0,0,'1999-11-30 00:00:15','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050401_delphi2005_update2_jpn',3,0,'2005-04-01 08:26:09','Delphi2005 アップデート2 日本語版でました',null,'<p>やっぱりというか何というか、今日にリリースがアナウンスされてたDelphi2005 アップデート2。これをダウンロードしようと先ほど <a href=\"http://www.borland.com/products/downloads/registered/download_delphi.html\">Delphi Registered User Updates</a> に見に行ったら、<em>日本語版は Architect 版しかありませんでした</em>。<br />\r<br />\rとほほ...<br />\rまた Professional ユーザは待たないといけないようです。<br />\rそれとも、今日中にもう一度リリースがあるのかな？</p>','<p>日本語サイトに以下のような説明が追加されていました。</p>\r<blockquote>※アップデート2日本語版は、Architect、Enterprise、Professionalの順に、公開を予定しています。まだ、公開されていないエディションにつきましては、今しばらくお待ちいただきますようお願い申し上げます。</blockquote>\r<p>具体的な日にちを書けー</p>\r<p class=\"add\">4/13<br />\rうちに帰って Update2 を導入しようと思ったが、導入できませんでした。<br />\rError 1706. 正しい Delphi 2005 Professionalのソースではないと。旧メディアも新メディアも試しましたがダメでした。一度HDDに全コピーしてインストールしたからかな？元の場所に全部戻してみましたが、それから試しても無駄でした。ちなみにアンインストールもダメでした。</p>\r<p class=\"add\">4/16<br />\rBorland の インストールアシストを使う決心をしました。<br />\r月曜日には何らかの回答が得られるものと期待しています。</p>\r<p>□関連記事</p>\r<ul>\r    <li>[story:050312_delphi2005_update2_eng]</li>\r    <li>[story:050126_delphi2005_pro_1]</li>\r</ul>',1,3704,0,0,'0000-00-00 00:00:00',1,'<a href=\"http://www.borland.com/products/downloads/registered/download_delphi.html\">Delphi Registered User ...</a>',0,1,1,0,0,'1999-11-30 00:00:29','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050402_nara_park',3,0,'2005-04-02 22:29:40','奈良公園に行ってきました',null,'<p>本日、奈良公園に行ってきました。<br />\r<br />\r元々行くつもりでは無かったんですが、桜を求めて南に南に進んでいったら、嫁の一言で奈良公園に行くことになりました。<br />\r奈良公園では、しかとしかの糞がいっぱいで、転んだら一撃。<br />\r息子が転ばないようにずーっと見てるような状況でした。<br />\r(公園内では転ばなかったのですが、最後の再後で駐車場でこけてました。)<br />\r<br />\r奈良公園付近の大仏前駐車場奥に「おばたり庵」という店があるのですが、結構まずかったです。<br />\rさすがオバタリアンが作ってるだけある。食べた後ゴミ箱も設置されていないので捨てるところに困りました。<br />\rまあ、引き取ってもらいましたが、まあオバタリアンだから脳タリンなのは多めに見ておきましょうか。<br />\r<br />\r奈良に行ったので、帰りに彩華ラーメンでラーメン食べてきました。いつもは友人とおいしいと噂の屋台の方に行くのですが、今日は息子がいるので奈良の店舗の方に行きました。<br />\r<br />\r何か、屋台の方が食いに行ったーという雰囲気があってうまいような気もするけど、店舗の方が落ち着いて食べられますな。</p>','',1,4062,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:35','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('50403_trap',3,0,'2005-04-03 02:53:29','ＰＫの罠にはめられた',null,'<p>いやー、見事にはまってしまいました。<br />\r<br />\r奴らの手口はこうです。</p>\r<ol>\r    <li>禅都 TAF交換所入り口付近で、「古代SOSボトル行きませんか～」と仲間を集める振りをする</li>\r    <li>直接船に行きますんでこのカギにリコしてくださいと、カギを地面に置く</li>\r    <li>リコするとそこはFの船の上、いつものPK <strong>Solution</strong> がFSを詠唱して待ちかまえている</li>\r</ol>\r<p>飛んだところにいきなり赤ネームがいたので、びっくりしてしまい何も出来ず終わりました。落ち着いて行動せねば...<br />\rこの罠のみそは船のカギは<em>トランメルなのかフェルッカなのかわからない</em>ということですね。<br />\r<br />\r皆さんが同じ罠にはまらないよう、切に願います。</p>','',1,4056,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:11','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050403_bress_arcane_robe',3,0,'2005-04-03 11:06:09','ブレス属性神秘ローブって出来ないのね...',null,'<p>ブレス属性神秘グッズがほしくて、作ってみようと思い試しましたが出来ませんでした。</p>\r<dl><dt>試した方法</dt><dd>\r<ul>\r    <li>神秘化してから服ブレス使用</li>\r    <li>服ブレス使用してからジェムを使用</li>\r</ul>\r</dd></dl>\r<p>んー残念。</p>','',1,3779,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050406_msnet_tdd',3,0,'2005-04-06 20:44:34','MS.NETでのテスト駆動開発を読みました。',null,'<p>最近では無くなってしまったのですが...MS.NETでのテスト駆動開発を読み終えました。読み終えて思ったことです。<br />\r一般的な例だけでなく、 ADO.NET や Web サービスを TDD で作るといった、 実践的とも言える内容が含まれて好感が持てました。また、システムを検証していく上でのステップについて、改めて考える良い機会となりました。</p>','<p>しかし、この本を読んで思うことは、<em>やはり TDD で GUI を開発することは不可能だと言うことです</em>。FIT による ADO.NET の例が記載されていますが、本当の画面出力を開いてとせず、ブラウザに送られる XML が検証のターゲットです。本当の画面を相手としていないので、現在もまだ主流だと思われる<em>クライアントサーバタイプのアプリケーションに対しては、本書の実例は役には立たない</em>&lt; でしょう。またユーザと開発者のデータの見方はかなり違うので、その辺も実際のテスト現場に落とし込んでいくのはむずかしいかと思います。顧客が外部要求 仕様の一つの項目について注目したとき、その項目はデータベース上では複数の項目や複数のテーブルに表現されている(正規形崩しや、歴史的理由によって) かもしれません。ユーザのテストは、「このエントリからこんなデータを入力した、次にこんな操作をした。だからこういうデータがあるはず、そうすると、こ ういう感じでこの画面には表示されるだろう。」というのが一般的なのではないでしょうか？とすると、TDD での検証も、こんなデータがあるからではなく、「この画面からエントリを入力した。すると関連画面はAとBだから、AとBでこのエントリ内容が確認でき る。」というテストになるのでしょうか？<br />\rただ、GUI 以外の部分については適用できると思います。画面を切り離したクラスについては TDD の有効性が良く表れるでしょう。<br />\rでも、予期しない例外に備えるとか、拡張性を持たせるという考えはTDDには無いのだなということも知りました。くろねこ的に最小限の機能しか積まないというのが引っかかります。<br />\r将来予想される事項への機能は、拡張性として積んでおきたいたちなので...あと、予期しない例外については、ケースを上げられないことも多く、そのために最近のコンパイラは例外構文があると信じています。ある意味、この点においては、退化なのかなとも思います。</p>\r<p>TDDはさておき、くろねこの TJDBGrid にも DUnit などの xUnit によるテストを取り込みたいのですが、機能が多く全体が大きいのとGUI 出力部分のテストなど難題は多く、導入に踏み込めません。</p>\r<p>さらに実践に即した現実解を模索する必要がありそうです。<br />\rただ TDD 理解するという目的で .Net 環境で開発する開発者にとって、おすすめです。</p>',1,3858,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'2008-11-11 23:46:39','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050410_gundam_tenshi',3,0,'2005-04-10 19:37:53','ガンダム天使',null,'<p>ガンダム天使 なんじゃそりゃと思う人がほとんどだろう。<br />\rこんな名称のガンダムは存在しない。ではこのガンダム天使とは何なのだろうか？<br />\r実はくろねこが乗っているフィットに搭載されているインターナビのコマンドなのだ！<br />\r本当はランダム停止なのだが、フィットに搭載のインターナビなかなか思うように聞いてくれず的はずれな解釈をしてくれることが多い。<br />\rある時、HDD内の曲をランダム再生しようとして、&quot;ランダム&quot;と発音したところ、全く違った結果になった。<br />\rそこで裏をかいて、&quot;マンダム&quot;(男性用整髪料の名前？)と言ってみた。これも聞いてくれなかったので、次に&quot;ガンダム&quot;と発声してみた。すると見事に&quot;ランダム&quot;再生が始まった。では、ランダム停止は&quot;ガンダム天使&quot;でいけるのではと思いやってみたところ、これもうまくいった。<br />\r<br />\r普段は誤変換されていらいらしがちな音声認識ナビなのだが、こうした変換リストを作ってみると意外に楽しいかもしれない。</p>','',1,3897,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:27','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050415_doraemon',3,0,'2005-04-15 23:28:12','ドラえもんの声と絵が...',null,'<p>今日からドラえもんの声優が変わったと聞き見てみた。</p>\r<p><em>なんじゃこりゃ、ドラえもんのパロディかとおもった！</em><br />\r全然雰囲気が変わって、別のものに見えて、雰囲気がつぶれた。</p>\r<p>何で全部声優を取っ替える必要があったのだろうか？しかも昔の作品引っ張ってきて作り直してないか？<br />\rたぶんこうだ。<br />\r声優が老朽化してきたので...<br />\r無理させづらい<br />\rいきなりぶっ壊れる可能性あり<br />\rぶっ壊れたときに急に代役を捜すのがむずかしいし費用もかかる(人捜し+教育費用+労災代)</p>\r<p>今から元に戻せと言ってもきつそうだしな...</p>','',1,3377,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050417_account_title',3,0,'2005-04-17 22:49:28','フリーでやってる人！どの勘定科目かわからなくなること無い？',null,'<p>よさげな本見つけました。</p>\r<p>いや、タイトルだけで判断してるんですが....<br />\rくろねこはフリーで仕事を始めて前回の確定申告で３回目が終わりました。でも<em>勘定科目どれにするかいつも悩んでたんです</em>。しかも次の確定申告からは節税のため青色申告をすると申告してしまったので...</p>\r<p>不安です...</p>\r<p>で、重い腰を上げて青色申告ソフトを書くことにしました。Vector に行くと無料の青色申告ソフトもあるのですが、税理士の無料サポートが受けられると書いてある <a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0006GPUN0/letsplaywithd-22\"> やるぞ!青色申告 2005</a>にすることにしました。それでもこの前、青色申告対応ソフトを作成している複数の会社に問い合わせたときに、&lt; strong&gt;「ある程度経理がわかることが必要です。」といわれたのですがこの本があれば、ばっちりじゃん！という本を見つけました。その本のタイトルは「<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4870308584/letsplaywithd-22\"> どの勘定科目?すぐわかる仕訳事典―領収書・請求書の束がどんどん処理できる</a>」です。どこかでこの本を見つけて読んだり、買うことになって読んだりしたら評価してみたいと思います。</p>\r<p>All About の<a href=\"http://allabout.co.jp/career/freelance/subject/msub_shinkoku.htm\"> このぺージ</a>にもいろいろ載っていて、結構参考になるなと思うのでリンクしておきます。</p>','<p>4/17<br />\rくろねこは、自分の登録しているアフィリエイトサイトの売り上げを伸ばすために、上記リンク先のアマゾンで買いますが、Vector で買う方が若干安いです。<a href=\"http://shop.vector.co.jp/service/servlet/Catalogue.Detail.Top?ITEM_NO =SR047385\">ダウンロード版</a>は6,510円で、<a href=\"http://shop.vector.co.jp/service/servlet/Catalogue.Detail.Top?ITEM_NO =RN32003020\">パッケージ版</a>は7,287円でした。(4/17現在)<br />\r何でパッケージ版は発売元会社名が違うのか疑問です。<br />\r5/1<br />\rくろねこは知らなかったのですが、AMAZONはアフィリエイト紹介料は自分には入らないようです。<br />\rだから、自分自身にもアフィリエイト紹介料がほしい方は、他のアフィリエイトサイトに入った方が良いでしょう。</p>',1,3717,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0006GPUN0/letsplaywithd-22\"> やるぞ!青色申告 2005</a>\n<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4870308584/letsplaywithd-22\"> どの勘定科目?す...</a>\n<a href=\"http://allabout.co.jp/career/freelance/subject/msub_shinkoku.htm\"> このぺージ</a>\n<a href=\"http://shop.vector.co.jp/service/servlet/Catalogue.Detail.Top?ITEM_NO =SR047385\">ダウンロード版</a>\n<a href=\"http://shop.vector.co.jp/service/servlet/Catalogue.Detail.Top?ITEM_NO =RN32003020\">パッケージ版</a>',0,1,1,0,0,'1999-11-30 00:00:38','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050420_pay_tax',3,0,'2005-04-20 20:53:24','所得税払ってきました',null,'<p><em>本当は１９日に銀行から落ちるはずだったんだけど...</em></p>\r<p>口座間違ってて、落ちると思ってた口座から落ちなくて他の口座から落とすように設定していたようです。<br />\r<br />\rなので、朝から銀行に行ってお金をおろして、所得税を払ってきました。<br />\r<br />\r今回も延滞税は付きませんでした。&nbsp;&nbsp; <strong>#って今年もってことかい！</strong><br />\r<br />\r去年は、所得税をいつ払うか全く知らず、督促状が来るまで静観していました。<br />\r<br />\r<em>来年は、絶対普通に払うぞー</em></p>','',1,4619,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:49','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050420_delphi2005_installed_update2_jpn',3,0,'2005-04-20 20:58:52','やっとDelphi2005 Update2導入できました...',null,'<p>今までDelphi 2005 Update2が導入できなくて、Borlandのサポートにお問い合わせしていました。<br />\r<br />\rエラー何ですが、下記のようなエラーがでていました。</p>\r<blockquote>エラー 1706: 製品 (製品名) に対する有効なソースが見つかりませんでした。</blockquote>\r<p>Borlandの回答によると、インストール時にでていた1706は、下記のURIにある問題と同現象であるというものでした。(要はMSI (= Microsoft Installer)が悪くて、Delphi 2005の問題ではないということですね。)</p>\r<blockquote><a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;jp258847\">http://support.microsoft.com/default.aspx?scid=kb;ja;jp258847</a></blockquote>\r<p>しかし、くろねこの環境ではこの方法では問題を解決するに至りませんでした。</p>','<p>そこで、1706でマイクロソフト技術情報を探して、下記のURIを見つけたのですが、試している時間が無くて途中になっていたところに、２通目のサポートのメールが届きました。</p>\r<blockquote><a href=\"http://support.microsoft.com/kb/299803/JA/\">http://support.microsoft.com/kb/299803/JA/</a></blockquote>\r<p>そのメールの内容に上記の方法が記載されていたことと、該当しそうな原因がこれしか見あたらなかったのでこの方法を試すことにしました。(くろねこはインストール時にUpdate1でどうせ必要になるからとすべての内容を一旦、すべてHDD上にコピーしてからインストールしていました。)<br />\r<br />\rすると、この方法に載っているMEDIAPACKAGEPATHが間違っているのではなく、全く無かったのでエラーとなっていたようでした。原因がわかったので、MEDIAPACKAGEPATHを<em>INSTALL</em>と新たに追加したところ、一度途中でこけちゃいましたが正常にUpdate2を導入することが出来るようになりました。<br />\r<br />\rアンインストールも出来ず困っていたので、結構うれしかったです。</p>\r<p>&nbsp;□関連記事</p>\r<ul>\r    <li>[story:050423_installed_delphi2005_update2]</li>\r    <li>[story:050420_delphi2005_installed_update2_jpn]</li>\r    <li>[story:050401_delphi2005_update2_jpn]</li>\r    <li>[story:050312_delphi2005_update2_eng]</li>\r    <li>[story:050126_delphi2005_pro_1]</li>\r</ul>',1,4059,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;jp258847\">http://support.microsof...</a>\n<a href=\"http://support.microsoft.com/kb/299803/JA/\">http://support.microsof...</a>',0,1,1,0,0,'1999-11-30 00:00:14','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050420_image_patch',3,0,'2005-04-20 22:00:42','画像変換 クライアントパッチ4.0.10a 対応版',null,'<p>画像変換 クライアントパッチ4.0.10a 対応版をアップしました。</p>\r<p>ここ数日使ってますが、特に問題が見あたらないためアップします。</p>\r<p><a href=\"http://www.jnishida.com/downloads/uo/gazo-henkan.cab\">画像変換ファイル</a>はCab形式になっていますので、XPならOSの機能だけで解凍可能です。</p>','',1,4426,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.jnishida.com/downloads/uo/gazo-henkan.cab\">画像変換ファイル</a>',0,1,1,0,0,'1999-11-30 00:00:31','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050423_installed_delphi2005_update2',3,0,'2005-04-23 19:54:40','Delphi 2005 Update2当てたら...',null,'<p>Delphi 2005 Update2導入したら、設計時パッケージを使ってるコンポーネントをコンパイルする時に、以下のようなエラーがでるようになってしまいました。</p>\r<blockquote>\r<p>[致命的エラー] BlackCat.Vcl.JDBGrids.dpk(39): E2225 自動再構築されないパッケージ \'Borland.VclRtl\' を再構築する必要があります</p>\r</blockquote>\r<p>Update2でJDBGridが使ってる下位のコンポーネントのバグ修正が行われていると思うので、再コンパイルしてアップし直そうかと思ったんですが。</p>\r<p>しばらく先になりそうです。</p>\r<p>あ、DBGridもパッチ前後で比較しておかないと...</p>','<p>DBGrid 比較しましたけど変わってない．良かったのか悪かったのか... <br />\rとりあえず、Win32版だけアップしておくかな...</p>\r<p>□関連記事</p>\r<ul>\r    <li>[story:050420_delphi2005_installed_update2_jpn]</li>\r    <li>[story:050312_delphi2005_update2_eng]</li>\r    <li>[story:050126_delphi2005_pro_1]</li>\r</ul>',1,3794,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:40','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050424_heterologous',3,0,'2005-04-24 00:24:47','異種格闘技ならぬ異種族間恋愛...',null,'<p>またまた謎の中国人女性から(ＵＲＬ)いただきました。</p>\r<p>異種族間恋愛フラーッシュ(結構おもろい)<br />\r<a href=\"http://uploads.ungrounded.net/161000/161181_ddautta_mask__550x281_.swf\">http://uploads.ungrounded.net/161000/161181_ddautta_mask__550x281_.swf</a></p>\r<p>これももらったゲーム(計算ゲーム)<br />\r<a href=\"http://www.crazyhill.com/hung/game02/additup.swf\">http://www.crazyhill.com/hung/game02/additup.swf</a> ルールなんですが書いて無いっぽいので...<br />\r最初、直線じゃないといけないと思いこんでたら、曲がってもいけると気づいて... 最後に実はどこでもOKなんだと言うことに気づきました。  単純ですがはまるかも...</p>','',1,4563,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://uploads.ungrounded.net/161000/161181_ddautta_mask__550x281_.swf\">http://uploads.unground...</a>\n<a href=\"http://www.crazyhill.com/hung/game02/additup.swf\">http://www.crazyhill.co...</a>',0,1,1,0,0,'1999-11-30 00:00:12','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050425_quality_control',3,0,'2005-04-25 21:44:11','ソフトウェアも品質管理の法律作ってくれないかな',null,'<p>先週末のトレンドマイクロあれはひどかったと思ったら、今日は JR が大惨事でした。<br />\rその前は、中国人が馬鹿やってました。<br />\r<br />\rまあそれはおいておいて、最近<em>ソフトウェアの品質</em>というものが気になる。<br />\r<br />\r<strong>自分のは棚上げなのだが</strong>、トレンドマイクロとか&lt;em&gt;大きなソフトウェア会社は、きちんとテストしているのだろうか？&lt;/em&gt;トレンドマイクロは個人のスキルに依存していたようだが、チェック体制はしっかりしていたのだろうか？<br />\rトレンドマイクロだけじゃないんだけど、<em>最近のソフトウェアってオンラインでバグ修正できるからというのでかなりテストを手抜きしている</em>ものが多いように思う。これはソフトウェアにバグがあってそれで相手が被害を被ったとしても<em>損害賠償しなくても良い</em>という法律の上にあぐらをかいているのではないだろうか？</p>','<p>そろそろパッケージソフトを販売している会社向けの、<strong>品質基準を定めた法律があっても良いように思う</strong>。<br />\rどこに基準を置くのかが非常にむずかしいが、セキュリティ関連とかだと年間いくつのセキュリティホールが発見されたとか、そんなのでも規制が出来れば良いかもしれない。<br />\r<br />\r基準に達しないソフトウェアは、被害を受けた顧客に対して損害を補償する際に、その範囲が軽減されるとかが有ると良いとも思う。これは、ソフトウェアも損害賠償をするのが前提なのだけれども。<br />\r<br />\rパッケージソフトウェアに品質基準の客観的な判断基準が、広く広まると受託開発ソフトにもその基準が適用されていき、そのうちシェアウェアにも品質基準が要求される様になるかもしれない。<br />\r<br />\rフリーは作者側で、その基準に達そうという人間も出てくると思う。そうして全体として品質基準の底上げが出来れば、バグでいらいらする時間も少なくなって健康的なのにな。と思ったくろねこであった。</p>',1,2856,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:22','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050425_rise_in_the_National_Pension_Plan',3,0,'2005-04-25 23:13:01','国民年金値上がり！',null,'<p>国民年金いつか上がる、上がるとは思ってたけど...<br />\r<br />\r今日社会保険事務所からはがきが届いた。<br />\r4/26に届いて5/2引き落とし、１ヶ月250円値上がりで、年間3,000円値上がり！<br />\r二人で6,000円値上がりだ、いや残高有ったから問題なかったんだけど、急すぎない？<br />\r5/2引き落としだったら、事実上3日しか猶予がないっての！休み取れなかったらどうやって手続きするの？家の嫁なんぞ何の役にもたたんのだぞ！振り替え方法変更する人だっているだろうに...<br />\r<strong>今年の２月頃かな？年払いにすると安くなるので年払いにしませんか？</strong>みたいな通知来てたので年払いに切り替えたんだけど、そのとき社会保険事務所の窓口で手続きしたのね。<br />\r上がるならそのときの書類に書けよ！わかてたんだろ！<br />\r<br />\r国の管理ってずさんだし、人の都合全く考えないし、やになっちゃうよね。</p>','',1,3904,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:33','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050502_aoiro_shinkoku',3,0,'2005-05-02 22:15:59','青色申告がんばってはみるけど',null,'<p>早くも挫折しそう。<br />\r<br />\r次こそは青色申告で65,000円税金削減だ！と意気込んで青色申告の申請をしてから約一ヶ月。</p>','<p>青色申告ソフトを買った。<a href=\"http://www.jnishida.com/blog/archives/2005/04/post_27.htm\">フリーでやってる人！どの勘定科目かわからなくなること無い？</a>でも書いたが、<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B0006GPUN0/letsplaywithd-22\">やるぞ!青色申告 2005</a>を買った。このソフトがとっても使いにくい。<br />\r<br />\r仕訳ナビというのが売りなんだが、実際使い始めてみるとナビの検索機能がとっても使いにくい。ソフトウェアを作ってる人はわかると思うのだが、テキストボックスに文字が入ってないときには、検索ボタンが使えず、入力後ボタンが使えるタイプ。<br />\rそれ自体は結構なのだが、テキストボックスのロストフォーカス時に処理が書いてあるようで、テキストボックスのカーソルが他のテキストボックスに移動しないと、ボタンが有効にならない。また、Enterキーで検索できない。これが非常に使いにくい。<br />\rまた、テキストボックス中にボタンをクリックすると、そのテキストボックスの内容が消えてしまうときがある。Access だとボタンクリック時にロストフォーカスが発生しないのが、原因じゃないかと思う。<br />\r<br />\r<em>致命的にやばいと思うのが、会社のセキュリティへの関心の低さだ。</em><br />\rデータはすべて mdb 形式のデータベースとして保存されている。mdb とは、Microsoft 社の Access というデータべースが使用しているデータベースファイル形式。複数のテーブルが 1 つのファイルに収まるので管理がしやすい。(ただし壊れた場合は、復旧が大変というデメリットもあり。)<br />\rこの mdb 形式のデータベースにはファイルそのものにパスワードを付けて、セキュリティ上の信頼性を上げている。Excel の xls Book ファイルにもパスワードが設定できるが、それと同じと考えて頂ければ問題ないと思う。また、暗号化もサポートされている。<br />\rしかし、<em>この「やるぞ！青色申告2005」では、データベースが持つパスワードは全く使用されていない。暗号化もされていないだろう。</em><br />\r<br />\rまた、データベース内のテーブル・フィールドは日本語名が用いられており、非常にわかりやすい構造になっている。<em>「やるぞ！青色申告2005」で独自に設定されているパスワードもテーブル内に保管されているが、ちょっと考えればパスワードに何が設定されているのか簡単にわかるようになっている。</em><br />\r<br />\rこのように、ちょっと知識が有れば、誰にもわからずに盗み見することが出来るようになっている。<br />\r<br />\r<em>個人的には、もう使わないから返金させてほしいくらいだ。</em><br />\r<br />\rで、とりあえず入力し始めたのだが、くろねこ自身の問題としてプライベートの口座と仕事用の口座が完全に分け切れていない。このため仕訳伝票の入力をどこまですべきなのか全く見えなくなって、仕方がないから本を買おうと、車でいろいろな本屋を巡ってる。<br />\r<br />\rくろねこでも読めそうな本が２冊ほど有ったのだが、一冊が女子大生が語る経理みたいなもので、もう一冊がどしろうと向けと銘打つ一冊。<br />\r家に帰ってきてネットを検索すると、女子大生の方は二種類有る模様。</p>\r<ul>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4534037384/letsplaywithd-22\">&lt;女子大生会計士の事件簿&gt;世界一やさしい会計の本です</a></li>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4534038097/letsplaywithd-22\">&lt;女子大生会計士の事件簿&gt;世界一感動する会計の本です</a></li>\r</ul>\r<p>この２冊。<br />\rどしろうと向けの一冊が、</p>\r<ul>\r    <li><a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4756903797/letsplaywithd-22\">どしろうとでもできる個人事業のこれだけ経理</a></li>\r</ul>\r<p>この三冊の内からとりあえず一冊チョイスして読んでみるつもりです。</p>',1,3602,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.jnishida.com/blog/archives/2005/04/post_27.htm\">フリーでやって',0,1,1,0,0,'1999-11-30 00:00:16','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050503_habanero',3,0,'2005-05-03 23:26:09','ハバネロ栽培キット 世界一辛いトウガラシを収穫しよう',null,'<p>今日、温泉に入りに約５時間ほど掛けて、福井のしきぶ温泉まで出かけた。</p>\r<p>高速で行けばいいのに、ドライブかねて下道で行ったので、道ががすごく混んでて５時間ほどかかった。<br />\rその最中にのどが渇いたので、ミニストップに入った。そのミニストップでそれは売られていた。</p>\r<p>ハバネロ栽培キット 世界一辛いトウガラシを収穫しよう<br />\r<a href=\"http://www.blackcat.xyz/images/articles/050503_habanero_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"320\" src=\"http://www.blackcat.xyz/images/articles/050503_habanero_1.jpg\" alt=\"\"></a></p>\r<p>だ。早速家に帰って落ち着いたら、植えてみた。<br />\rいつ食べられるようになるのか楽しみだ。</p>','<p>この「ハバネロ栽培キット 世界一辛いトウガラシを収穫しよう」の問い合わせ先は、下記のように記載があるので、近くのミニストップにない場合は、直接問い合わせすると購入できるかもしれない。</p>\r<blockquote>\r<p>販売元 <a href=\"http://www.shinofarm.jp/\">篠ファーム</a><br />\rTEL 0771-24-7878<br />\rEメール <a href=\"habanero@shirofarm.jp\">habanero@shirofarm.jp</a></p>\r</blockquote>\r<p>ホームページが見つかったのでのぞいてみたら、やはり売っていた。<br />\r他にもいろいろなトウガラシを扱っているようだ。でもトウガラシのぺージの「BACK」リンクは、リンク先が無くなっているのでクリックしないように。</p>',1,4759,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/050503_habanero_1_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.shinofarm.jp/\">篠ファーム</a>\n<a href=\"habanero@shirofarm.jp\">habanero@shirofarm.jp</a>',0,1,1,0,0,'1999-11-30 00:00:34','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050504_anpanman',3,0,'2005-05-04 17:54:12','アンパンマンは有害アニメ？',null,'<p>最近息子と映画版アンパンマンを見た。<br />\r<br />\r息子はアンパンマンが好きなのだが、一緒に見ているとアンパンマンというのは有害アニメに思えて仕方がない。どの辺が有害かと言うと以下のような所。</p>\r<blockquote>それいけ！アンパンマン きらきら星の涙 という作品がある。<br />\rこの作品は「なんだなんだ王女」という者が、「きらきら星の涙」という宝石をどろんこ魔王に奪い取られたので探しているというストーリーで始まる。で、アンパンマンと王女がその宝石を探して旅をしている間に、その宝石が氷の宮殿に住む氷の女王が持っているかもしれないという情報を手にする。そしてアンパンマン一行は氷の宮殿に勝手に入り(<strong>不法侵入</strong>)、主である氷の女王を倒し(<strong>傷害致死</strong>)勝手に持ち帰ろうとする(<strong>強盗</strong>)。</blockquote>\r<p>これだけでも、３つもの重大な罪を犯している。なぜこのようなシリーズが「<strong>文部科学省選定・日本PTA全国協議会推薦</strong>」となりうるのだろうか？<br />\r<br />\r<em>JRの監督官庁である国土交通省の管理といい、この日本の行政は何か間違ってないか？</em><br />\r<br />\r素朴な疑問であった。<br />\r<br />\r同じ考えの人がすでにいるのではと、ネット検索してみると「ドラえもん」も有害アニメと考える人がいるということがわかった。<strong>のび太が「自立できない大人」が増えた原因だと</strong>。また、</p>\r<blockquote>漫画家の江川達也氏が雑誌『サイゾー』3月号にて、「ドラえもん」は有害アニメだと論じている。</blockquote>\r<p>らしい  まあ、ドラえもんの内容も問題かもしれないが、<a href=\"http://www.ceres.dti.ne.jp/~toshio/DoraColumn/DoraColumn009.html\">ドラコラム009</a>に有るようなパロディの問題も問題だとおもう。<br />\r<br />\r改めて認識したが(昔は何も考えず見てました。)、ドラえもんの映画なんぞパロディの固まりなのにこの矛盾はいったいどう解決するのだろうか？<br />\r<br />\rこれも、素朴な疑問でした。</p>','<p>書くの忘れてた。<br />\r例え盗まれたものでも、正当な手続きを経て丙に渡った場合で、丙に過失がない場合所有権は丙に移るというのをどこかで見た。<br />\r<br />\r確か、「行列の出来る...」だったかと思う。<br />\r<br />\rまあ、間違いなく占有権は有るだろうから、勝手に持っていったら持ち出した方が泥棒になるな、きっと。</p>',1,6354,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.ceres.dti.ne.jp/~toshio/DoraColumn/DoraColumn009.html\">ドラコラム009</a>',0,1,1,0,0,'1999-11-30 00:00:38','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050510_jr',3,0,'2005-05-10 00:10:05','JR定期券払い戻し',null,'<p>尼崎脱線事故・・・<br />\r<br />\rマスコミのJR西日本への 批判 は続く...<br />\r<br />\rマスコミの対応もひどいな、どこの誰が記事を書いてるのかは、全くわからんが自分たちも同じようなひどい対応してるやついないのか？</p>\r<p>まあ、JRには以前にも電話や書き込みで「きく象ＢＯＸ」に、安全について提案してあげたのに、全然聞く耳持ってないし。<br />\rその態度が、今回の事故にでてたね。</p>','<p>一番大切なことは、<em>「利益を求めるのは良いけど、目先の利益だけ追求すると結局利益を得られない」</em>ということじゃないかな。そのあたり考えて安全対策にも力を入れてほしいな。<br />\r安全対策として、義務になった ATS や ATC もそうだけど、<strong>ホームの両側に壁を作るべきだとも思う</strong>&lt;んだよね。<br />\r都営地下鉄や営団地下鉄、JRの東西線にも有るようだけど、あれがあると落ちる人はいなくなるし、飛び込む人もかなりやりにくくなって、電車の遅れなども減って利用者の印象は良くなると思うんだけど...<br />\r<br />\rところで、５日間不通になったので定期券の払い戻しやってたようです。<br />\rふつうにやってたら、都市部では無いと思ってたけど脱線という形で、行われるとは。</p>\r<p>しかし、<strong>5/7以 降に発売した分については、了承済みということで払い戻しに相当する行為は行われない</strong>とのこと、<em>迷惑料として値引きしても良いかと思うんだ</em>けど、実際買ってないのでそのままの値段かどうかは知りません。<br />\r<br />\r値引きされてると良いな。</p>',1,10990,0,0,'0000-00-00 00:00:00',1,'',0,1,1,0,0,'2009-03-27 12:35:32','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050510_son',3,0,'2005-05-10 01:10:52','息子がアンパンマン見ながら...',null,'<p>息子にアンパンマン見せ照る間に夕飯食べてたら....<br />\r<br />\rおいらのOAチェアの上で<em>おしっこ</em>してるー。<br />\r<br />\rしかもこれで二度目...<br />\r<br />\rしかも、「おしっこしてるー」って叫んだのに、家の鬼嫁は動じず漫画に夢中...<br />\r<br />\rおむつくらい、何も言わずとも変えてやれよ...<br />\r<br />\r疲れた...</p>','',1,3181,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050512_jude_community',3,0,'2005-05-12 22:58:54','JUDE Community インストール',null,'<p>仕事で <strong>UML を使ってプログラムを表現する</strong>ことを始めました。</p>\r<p>UML にはいくつかの図が有るのでどれを使って書くか、まずそれで悩みます。</p>\r<p>どの図で書くか決めても、そのあとの表現方法でさらに悩みます。</p>','<p>今日の所はとりあえず書くコンポーネント仕事で使っているグリッドに絞って、さらに表現する機能も今一番ターゲットにしたい書式関連部分に絞って、クラス図を作るところから始めました。</p>\r<p>Delphi のコンポーネントって、属性に相当するものが<strong>プロパティとフィールド</strong>が有って、その両者の関係をどう表せばいいのか、良くわかりませんでした。</p>\r<p>明日は、機能のフローをステートチャート図かもしくはシーケンス図で表現することにチャレンジしたいと思うのです。</p>\r<p>この二つの図の違いは、状態の変化に重点を置くか、それとも機能の呼び出しというフローを重点的に表現したいのかともうのだが、今回は両方重要何で両方勉強もかねて書こうと思う。</p>\r<p>UML を理解できたら、<em>OMG認定UML技術者資格試験</em>でも受けて、理解のほどが確認できると良いかなと思っとります。</p>',1,6407,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:22','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050512_install_xoops',3,0,'2005-05-12 23:20:00','XOOPS インストール',null,'<p>今日は仕事で UML での表現でかなり詰まったので、本屋に UML 関連で前々からチェックしていた本がないかな？と行ってみた。<br />\r目当ての本は無かったのだが、これまた以前から関心のあった XOOPS 関連の本を見つけ、立ち読みしてしまった。<br />\rつい買ってしまったのだが、自宅に帰って読んだところ、5分でインストールが出来ると書いてあったので、インストールをしてみた。<br />\r5分もかからなかったが、インストールした後どのモジュール(拡張機能)を組み込んで良いのかがわからず、途方に暮れた。<br />\rこれも、ぼちぼちやって行こうと思うが、XOOPS のサイトでモジュール紹介のぺージが、サンプルを見れるようになってたらモジュールのチョイスがしやすいのにと思った。<br />\rサイトのデザインについては、ネットをぐぐったら、<a href=\"http://www.wervival.net/modules/tinycontent/content/xoops/redesign.htm#aboutTheme\">XOOPSのリデザイン</a>というぺージを見つけたので、ここらでも読んでみようと思う。<br />\rインストールは5分だけど、その後は茨の道だね。どのCMSもこうなんだろうか？</p>','',1,4172,0,1,'0000-00-00 00:00:00',0,'<a href=\"http://www.wervival.net/modules/tinycontent/content/xoops/redesign.htm#aboutTheme\">XOOPSのリデザイン</a>',0,1,1,0,0,'2008-11-21 14:29:36','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('050517_habanero',3,0,'2005-05-17 22:20:51','ハバネロの芽が出た',null,'<p>今日朝起きて、ハバネロの水が無くなってないか確認したところ芽が出てた。<br />\r<br />\r<a href=\"http://www.blackcat.xyz/images/articles/050517_habanero_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"319\" src=\"http://www.blackcat.xyz/images/articles/050517_habanero_1.jpg\" alt=\"\"></a><br />\r<br />\r帰ってきて見たら、もうちょっと伸びとった...<br />\r<br />\r植えてから、ちょうど満2週たった。予定どおりだ...<br />\r<br />\rしかし、マニュアルどっかいった...<br />\r<br />\r後は手探りだー...ばんざーい。<br />\r<br />\rでも、楽しみだ...</p>','',1,2955,0,0,'0000-00-00 00:00:00',1,'<a href=\"http://www.blackcat.xyz/images/articles/050517_habanero_1_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:52','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050525_habanero',3,0,'2005-05-25 21:26:29','ハバネロいっぱい生えてきた',null,'<p>さらに約１週間後、ハバネロの双葉が4っつ...<br />\r<br />\r<a href=\"http://www.blackcat.xyz/images/articles/050525_habanero_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"319\" src=\"http://www.blackcat.xyz/images/articles/050525_habanero_1.jpg\" alt=\"\"></a><br />\r<br />\r種はもうちょっと有ったはずなんだが....<br />\r<br />\r液体肥料をたくさんやってるが、もう出てきそうにない...<br />\r<br />\rあとは、いつ間引きするかだな...</p>','',1,2772,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/050525_habanero_1_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:26','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050525_tupdatesql',3,0,'2005-05-25 21:56:11','TUpdateSql ではまった...',null,'<p>Delphi 2005ではまった訳では無いのですが...</p>\r<p>最近仕事で、データベースをUIと直接接続して更新画面を作成してます。<br />\r直接接続してるのは、そっちの方が楽かな？と思ったからですが、<br />\r編集した後、&quot;やっぱやめ！&quot;と言うことがやりたいためだけに、キャッシュアップデートを使用しています。RollBackを使う方法もあるのですが、何か負荷が大きそうなので使ってません。</p>','<p>で、更新対象がマスタ-ディテールタイプなのですが、マスタ側を削除したらディテール側も削除したいので、TUpdateSqlを二つ使って...とやり始めて、2つめのTUpdateSqlによる更新が何度やってもうまくいかない。<br />\r仕方なく、TUpdateSqlが入ってるDBTablesユニットを解読して、以下の問題箇所を発見。</p>\r<pre><strong>procedure</strong> TUpdateSQL.ExecSQL(UpdateKind: TUpdateKind);<br /><strong>begin</strong><br />  <strong>with</strong> Query[UpdateKind] <strong>do</strong><br />  <strong>begin</strong><br />    Prepare;<br />    ExecSQL;<br />    <strong>if</strong> RowsAffected &lt;&gt; 1 <strong>then</strong> DatabaseError(SUpdateFailed);<br />  <strong>end</strong>;<br /><strong>end</strong>;</pre>\r<p><br />\rでこの RowsAffected が比較している&quot;1&quot;ってどう意味だったっけ？とヘルプを引くと...</p>\r<blockquote>最新の問い合わせで実行対象だった行の数を返します。<br />\r(中略)<br />\rRowsAffectedプロパティを調べると，<em>最新の問い合わせ処理で何行が更新または削除された</em>かがわかります。1行も更新または削除されなかった場合，RowsAffectedの値は0になります。<strong>エラーが原因でSQL文が実行されなかった場合は，RowsAffectedの値は-1</strong>になります。後者の場合は，通常，その前に例外が生成されます。</blockquote>\r<p>とある。ということは、ディテール側が0件だった場合にはRowsAffectedプロパティは0な訳で...<br />\rというか、キャッシュアップデートの更新は常に1件が対象？<br />\rまあ、1レコードの更新には1件のUpdateSqlが実行されるので、1件かもしれない。</p>\r<p>&nbsp;</p>\r<p><em>仕方ないので、2個目のUpdateSqlを実行する際には、例外構文で例外クラスがEDatabaseErrorの時にはRowsAffectedが-1でない時以外はエラーを無視する</em>ようにしてしまいました。</p>\r<p>この処理を見ていて思ったのは、キャッシュアップデートの範囲。TQueryなどDataSetがキャッシュしてたら別のQueryから更新をかけたらそ の更新はキャッシュされないのか？とか考えたが、TUpdateSqlの処理を見ていてうまくいくことから、データベースコンポーネントかセッションコン ポーネントあたりでキャッシュしてるようだ。</p>\r<p>ということは、データベースコンポーネントかセッションコンポーネントを複数プログラムに追加したら、片方はキャッシュでもう片方は直でということが出来そうだ...</p>',1,5652,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:46','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050526_delphi2005_update3_jpn',3,0,'2005-05-26 11:09:54','Delphi 2005 General Update 3 (Japanese) リリース.',null,'<p>先週MLでCapricornさんにDelphi 2005 Update3 Englishがでてるのを教えてもらってたので、日本語有るかな？と見てみたら、日本語版が有った！</p>\r<p>早速MLに報告だー。と思ってメールを見たら、すでに報告済みでした。(お昼頃)</p>','<p>自宅に帰ってきてUpdate3を導入しようと思ってやってみたが、今回もうまく導入できなかった...<br />\rいつものごとく、キャンセルボタンをクリックしてもキャンセル出来ないので、仕方なく強制ログオフ。<br />\rアドミニストレータで再ログオンして、Update3の導入を行う。<br />\r先ほどの情報が残っているので、削除の問い合わせがくるので、OKをクリックして前回のユーザのパッチ当て作業を削除し再起動。<br />\rもう一度、Update3の導入作業を行うとすんなり導入可能。もう一個のアカウントも<strong>管理者権限</strong>有るのに何が違う??<br />\rでも、今回の修正あんまり自分にとっては関係なかったり...<br />\rしかし、詳細な修正の一覧はQCサイトに有るらしいが、どこを参照したら良いのかさっぱり不明です....<br />\rあ、今回はUpdate3導入前にUpdate2を導入しておく必要があるようです。</p>\r<p>□関連記事</p>\r<ul>\r    <li>[story:050420_delphi2005_installed_update2_jpn]</li>\r    <li>[story:050423_installed_delphi2005_update2]</li>\r    <li>[story:050420_delphi2005_installed_update2_jpn]</li>\r    <li>[story:050401_delphi2005_update2_jpn]</li>\r    <li>[story:050312_delphi2005_update2_eng]</li>\r    <li>[story:050126_delphi2005_pro_1]</li>\r</ul>',1,3689,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050531_jr',3,0,'2005-05-31 21:59:41','今日も JR 遅れた...',null,'<p>最近毎日遅れてくる JR...</p>\r<p>あの事件以来毎日遅れてくる JR。<strong>安全性といえば、遅れても OK というのがJR の本音</strong>なのだろうか？ もしくは、<strong>安全性に配慮しています。そのため電車が多少遅れています。というポーズ</strong>なのだろうか？ 安全性も重要な要素ではあるが、<em>安全に迅速に且つ正確にそして快適に</em>というのが鉄道会社としてのサービスではないか？</p>','<p>電車が遅れることは、言いたくはないがまあ目をつぶったとして、<em>そのあとの対応がとてもずさんではないだろうか？</em></p>\r<p>JR の場合、通常遅れは電光掲示板に表示されるとともに、アナウンスされる。<br />\rしかし、アナウンスは常時行われるわけではない。しかも、駅の構内放送は濁って聞きにくい。その点電光掲示板は正確にそして見えるところに行けば、いつでもその情報を入手することが出来る。</p>\r<p>しかし、トラブル時のその情報の正確性はかなり低いと言わざるを得ない。電光掲示板の更新タイミングとその管理はいったいどのようにして行われているの か？また、電光掲示板の最下部は JR からのお知らせ欄となっているが、事故の情報が流れてはいない。大きな駅では専用の電光掲示板があって、事故などの情報が流れているが、郊外のホームに設 置されている電光掲示板はその限りではない。<br />\rこの電光掲示板が利用者にとって、常に(場面ごとに)有意義な情報を表示するよう JR に求めたいと思う。</p>\r<p>また、JR の車内放送でも緊急停車した場合などに、<strong>信号が変わり次第....</strong>とか、&lt; strong&gt;先攻列車が...などというアナウンスがあるが、適切な時間がわかるよう改善を求めたい。たぶん具体的な時刻をアナウンスしないのは、はずれたときに苦情がくるからだと思うが、適切なアナウンスを行わない JR を快く思っていない利用者はかなり多いはずだ、また今回はずれても常に適切な情報を提供しようと心がけてシステム化すれば、その精度は自ずと高まっていくと思われる。</p>\r<p><em>JR には、利用者の立場に立った運用改善が求められる。</em></p>',1,3903,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:06','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0056',3,0,'2005-06-01 00:00:00','[Delphi] データ行が 0 行のグリッドを表示する','','<p>Delphi 標準搭載の TStringGrid はデータ行（非固定行）が 0 件（RowCount = FixedRows）になる様に設定することが禁じられています。<br />\r行数を固定行数と等しくなるように設定すると、自動的に固定行の値が減ります。<br />\r<!--<img alt=\"追加した直後のストリンググリッド\" width=\"434\" height=\"320\" src=\"/faq/img/del0056-1.png\" /><br />\r<strong>追加した直後の StringGrid</strong><br />-->また、固定行の数を行数と同じに設定しようとすると、以下のエラーが発生し設定を完了することが出来ません。</p>\r<blockquote>固定行の数は行数より小さくなければなりません.</blockquote>\r<p>仕方がないので、StringGrid のデータ行を隠すことを検討します。隠すことによってユーザからはあたかも存在しないように見せることが出来ます。<br />\r以下のように設定します。</p>\r<pre class=\"brush: delphi\">\rwith StringGrid1 do\rvar\r  i: integer;\rbegin\r  for i := FixedRows to RowCount - 1\r    RowHeights[i] := -GridLineWidth;\rend;\r</pre>\r<p>データ行を隠し行に設定しています。マイナスの GridLineWidth にしているのは、隠すために 0 を設定すると罫線が残ってしまうために、罫線の高さ分も計算して減らしています。<br />\rこれで見た目はデータ行がないように見えますが、マウスカーソルが移動してしまうので移動キーを押された場合の制御が別途必要になることがあります。<br />\r<!--実行すると以下の様な画面になります。<br />\r<img alt=\"データ行が無いストリンググリッド\" width=\"434\" height=\"320\" src=\"/faq/img/del0056-2.png\" /><br /><strong>データ行がない StringGrid</strong>--></p>','',1,9117,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-13 10:59:21','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050610_habanero_dead',3,0,'2005-06-10 00:15:57','ハバネロ枯れた',null,'<p>今日帰宅して、ハバネロの状態を見たら....</p>\r<p><em>枯れてた...</em></p>\r<p>そしてよく見ると、土から根が出て引っこ抜かれた状態に...</p>\r<p>嫁に聞いても知らないと...棚の最上段に置いてあったので、息子は手が届かない...  陰謀だ！</p>\r<p>犯人は誰だ！今日、自宅にいたのは、小さな息子と、そして辛いモノが嫌いな嫁のみ！</p>\r<p>とほほ、また来年挑戦するか...</p>\r<p>来年は引っこ抜かれないように対策を打たねば！</p>','',1,3912,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:42','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050619_restart_hukuchiyama_line',3,0,'2005-06-19 22:55:40','本日JR西日本福知山線運転再開',null,'<p>今日、あのJRによる福知山線大虐殺から５５日ぶりに運転再開した。</p>\r<blockquote>南谷会長は「安心してご利用いただける鉄道の再生に取り組む」と、「安全の誓い」を読み上げた</blockquote>\r<p>とのことだが、実際はどのようなモノだったのだろうか？<br />\r<br />\rJR西にはこれから、「安全性の向上」という問題がつきまとうだろう。</p>','<p>しかし、これはJR西だけの問題なのだろうか？あなたの会社にも同様の問題はないだろうか？<br />\rくろねこがこれまで見た会社の中には同様の問題を抱えているところが少なくないように思う。<br />\rくろねこは職業システムエンジニアでソフトハウスに在籍した経験があるが、以下のような理由で大いに苦しむことがあった。（ある？）</p>\r<ol>\r    <li>営業が適当で工数の見積もりも相談もなく仕事をとってくる</li>\r    <li>当初の工数見積もりを超えて残業しないと終わらないことが判明しても、現場に責任を押しつける</li>\r    <li>どうやっても終わらない状況でも&quot;がんばれ！&quot;の一言ですませようとする</li>\r    <li>残業が一定時間を超えても、健康管理も本人任せ＆残業代は一定時間でカット</li>\r</ol>\r<p>などなど<br />\r<br />\r上記のいずれかに該当する職場で働いていると感じる人は、コンプライアンスに関して再検討してみる必要はないだろうか？<br />\rそして今からでも遅くはない、会社を変えていく努力をするか、もしくはそのような会社を見限って他に移るべきだ！</p>',1,3654,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:53','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050620_overspeed_jr_express',3,0,'2005-06-20 23:39:48','再開二日目にして、速度オーバーでＡＴＳ作動',null,'<p>本日朝、あの尼崎大虐殺現場で<a href=\"http://www.mainichi-msn.co.jp/today/news/20050621k0000m040102000c.html\">特急が速度オーバーで特急列車が緊急停止</a>したそうです。<br />\r<br />\rJR西にはほとほとあきれかえるとともに、このような企業を放置している社会に対してふがいなさを感じます。昨日の再開後、新聞を読みましたが、現場付近のダイヤを見直しただけで直前のカーブ付近には余裕時間は無いであるとか、他の危険部分に関しては国が新型ATSの設置を義務づけたようですが、設置し終わるのは５年後であるとかとても反省があったとは思えない状況です。</p>','<p>やはり、企業は目先の利益が一番なのでしょうか？<br />\rいやそうではなく100人程度の虐殺では、補償費用の方が安全対策費よりも安く付くと、そう判断したのでしょうか？<br />\r<br />\r企業にとってはいかなる犠牲がでようとも、最終的に利益が最大になれば、企業的には問題ないでしょう。しかし、軽視されがちな安全に対し管理を行うのが国 であり、我々の世論ではないでしょうか？鉄道会社などのようにほぼ寡占状態にある企業では、その企業のサービスや製品の使用をやめたいと感じてもそれを実 行に移すのは非常にむずかしい状況にあります。<br />\r<br />\rやはり、ここは国にもっと厳重な管理が要求されると思うのですが、いかがでしょうか？</p>',1,3604,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.mainichi-msn.co.jp/today/news/20050621k0000m040102000c.html\">特急が速度オーバーで特急列車が緊急停止</a>',0,1,1,0,0,'1999-11-30 00:00:52','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050701_chance',3,0,'2005-07-01 19:53:45','偶然って何だろう？',null,'<p>「偶然に～がおこった。」とか「たまたま～が飛び出してきて」ということがありますよね。この偶然とは、たとえば偶然何かが起きる≒何か予期しないことが起きるということだと思うのですが、とある個人については予期せぬことも他人から見れば、それが必然であったりします。<br />\r具体的には、同じような二つの商品があったときに全く同じものであれば、どちらか特定の一方が選ばれるということは偶然でしょう。しかし、実は一件同じに見える二つの商品に明らかな価格差がありその他が同じであれば、一般人は価格のやすい方を選択するでしょう。こうなるとこの選択は偶然でないといえます。</p>','<p>同じように自然界でも既知・未知問わず物理法則に支配されているとすると、自然界で起こる事象全ては必然であって偶然ではない。とある事象の因果系列に対 して、それに含みえない事象または因果的に予測できない事象が発生する事が偶然であれば、含みえない現象もその原因を追及し、元の事象との因果関係を追求 しそれが理解できれば、それは含みえない事象ではなくもはやとある事象の因果系列に含まれている現象であるといえます。</p>\r<p>意のままにならぬものとして、賽の目、比叡山の山法師、鴨川の流れといわれました。</p>\r<p>しかし、賽の目・鴨川の流れは明らかに物理法則に支配されているので、さいころの目などもしかするとさいころを投げる前に目の値がわかるようになるかもしれません。ただ、その物理法則がわからなかったり、計算量が膨大で今の人類に扱えないだけなのかもしれません。<br />\r人の心もその人の過去から現在における環境要因や、またその人を構成する物理的要因などが正確に把握できれば、人の心がわかるようにもなるかもしれません。しかし便利な反面面白みが無くなる世の中になるかもしれません。</p>\r<p>遠い未来かもしれませんが、「偶然」と言う言葉が、概念だけの存在になる日が来るかもしれません。</p>',1,3483,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:42','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_44',3,0,'2005-07-03 12:25:49','居眠り病と思われる人と仕事をすると？',null,'くろねこが働いているある情報システム部でプロジェクトがあり、先月そのプログラムを作成していました。<br />\n<br />\n元々いたくろねこを含むメンバーだけでは足りないので、他から数人人が応援に来てくれたのですがその内の一人が仕事中によく居眠りをするんです。<br />\n<br />\n声を掛けて起こしても普通約三分ほどで居眠りをします。ひどいときはくろねこが起こして席に戻ろうと振り返った瞬間にもう寝てるみたいでした。<br />\n<br />\nチームのリーダーが「あれは病気かな？」と言い出して先月末に、Google で調べたらそれらしいのが出てきました。見つけたホームページ<a href=\"http://www2s.biglobe.ne.jp/~narukohp/3000.html\">ナルコレプシー（居眠り病）はこんな病気</a>の<strong>「ナルコレプシー」への理解は遅れている</strong>中で、<strong>「怠け者」のレッテルを張られることも多い</strong> とかかれていますが、ほとんどかかれているままの症状がでるんです。<br />\n見たままのことを書くと...<br />\n<ol><li>プログラムを組みながら寝る(個人作業中)</li><li>仕様説明中でも寝る(団体作業中)</li><li>集仕事が異常に遅い</li><li>服装もだらしがない</li></ol><br />\n※<em>仕事が遅いという判断は、常人が10-20分で終わる作業が、2時間かかっても終わらなかった</em>という客観的事実に基づいています。<br />\n(2時間待っても出来なかったので、自分で10分でやりました。)<br />\n<br />\nその人がこの病気の患者かどうかは良くわかりませんでしたが(聞いてないので...)、短納期で追われまくってる仕事中に寝られるとこっちがいらいらします。また、眠いから能力が出せないのか、慢性化しているので能力が身に付かないのかどっちもかもしれませんが、こういう人は人と接することが少ない仕事をするべきでしょうね。客先内で仕事をする派遣業で働くのは、顧客に対する印象ということを考えると、こういう疾病を持つ人には向いてないと思います。またプログラマは常に納期に追われているので、能力的にも厳しい感じがします(ここは個人の能力の問題なので一概には言えませんが、普通の人でも眠いと効率はかなり落ちますからね)。<br />\n個人的には今後一緒に作業することは拒否したい気分です。共同で仕事をするにしても、請負で納期指定・品質指定で別作業場でお願いしたいです。<br />\nでも、こうなると収入に影響するでしょうから、疾病は病院に行って直してもらうのが一番なんでしょうね。','',1,5605,3,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_43',3,0,'2005-07-07 23:18:27','ロンドン同時テロ発生！',null,'本日ロンドンで同時テロが発生したらしい...\n\nニュースを見ている限り、<strong>同時テロ</strong>から最初に抱いた印象よりもかなり規模が小さいモノであったが、朝の通勤時間帯の地下鉄駅などで同時テロと、昔の日本のサリン事件を思わせるモノだった。\n\nG8開催と合わせたのかもしくはオリンピック開催地決定と合わせたのかわからないが、テログループとしてどの程度の効果があるのか？G8のメンバーはテロ対抗を打ち出したが、こちらもどこまでテロに対して打撃が与えられるのか？テロを根絶させてもらいたいが、下手にちょっかいを出すとさらに過激化しそうで、そちらも怖い。\n\n<em>そのうち日本でもアルカイダ関連のテロが起きそうで心配だ。</em>\n\n','',1,2521,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050715_katesaien',3,0,'2005-07-15 00:21:00','家庭菜園',null,'<p>くろねこのハバネロ栽培は失敗に終わったが、その影ですくすくと育ってるやつがいた！<br />\r<br />\r<a href=\"http://www.blackcat.xyz/images/articles/050715_katesaien_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"319\" src=\"http://www.blackcat.xyz/images/articles/050715_katesaien_1.jpg\" alt=\"\"></a><br />\r<br />\rベランダでピーマンとなすを育てていたのだが、結構大きくなった。<br />\r<br />\r食べてみたら、結構うまかった。<br />\r<br />\r無農薬で育てたかったのだが、ピーマンは良いとしてなすにはアブラムシがいっぱい付きますな。<br />\r<br />\rしかし、ピーマンの天ぷらを食べながら、ハバネロの天ぷらが食べたかったと思う...</p>','',1,2924,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/050715_katesaien_1_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:55','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xylitol_gum',3,0,'2005-07-15 22:10:31','食品に安心な ロッテキシリトール・ガム',null,'ロッテキシリトール・ガムのボトルタイプにはガムを包んで捨てるためと思われる、<strong>捨て紙</strong>と呼ばれる紙が入っている。<br />\n<br />\nこの捨て紙、見た目は付箋紙そのものなのだが、ボトルの注意書きとして以下のように記載されている。<br />\n<blockquote>●ボトルの中に捨て紙が入っています。\n●捨て紙には食品に安心なノリを使用しています。</blockquote>\n<br />\nうん？食品に安心な？食品に安心でも人体に影響を及ぼすモノでは困るのだが...<br />\n<br />\n<strong>食品に安心とは...捨て紙をガムと混ぜておいても、捨て紙のノリにより食品が変質しないこと</strong>であり、<br />\n<strong>人体に安心とは...捨て紙のノリを口に含んでも身体に悪影響を及ぼすことのないこと</strong>である。<br />\n<br />\n<em>ということで、例え食品に安心でも人体に悪影響があるモノを混ぜられていると、安心して食べられんのだ！</em><br />\n<br />\nロッテよ改善を望む！','',1,4334,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050717_established_interest',3,0,'2005-07-17 14:46:28','既得権益',null,'最近、良く目にするモノに<em>既得権益</em>なるモノがある。<br />\n<br />\nくろねこが理解しているところでは既得権益というやつは、<em>ある特定の人・団体に対し保証されている利益のこと</em>である。<br />\n<br />\n最近小泉が盛んに叫んでいる郵政民営化とは？<br />\n<br />\nそのメリットやデメリットは今ひとつ理解できていないが、それは政治家やメディアにも問題があるなと思う。物事にはメリットとデメリットが必ずあると思っているのだが、いつも政治にはそのメリットとデメリットがきちんと話し合われていない。ほとんどの場合、根拠が示されていないのだ！<br />\n<br />\n既得権益として以前テレビで放送してたのが、\n<blockquote>特定郵便局長というのは、公務員でありながら、その身分がほぼ世襲の様な形で子や孫に受け継がれる</blockquote>\nということ、理由は土地や建物が郵便局長私有物であるかららしい。そして郵便局としてのその土地・建物の使用料を国が支払っているらしい。<br />\nある意味、すごく合理的にも受け取れる。昔は郵便局を建てるお金の負担が大きかっただろうから、とても合理的な発送だったのかもしれない。しかし、今はどこにでもコンビニなどのお店がある。そのお店に郵便局の機能があれば事足りるような気がして、それほど合理的には思えない。<br />\n<br />\nあるサイトによると、特定郵便局長に支払われる金額の内訳として...\n<blockquote>家賃として支払われる額、年間約500万円。<br />\n全国特定郵便局長の平均年収は約920万円。</blockquote>\nふむ...これだけもらえるならくろねこも、特定郵便局長になってみたい...<br />\nしかし、特定郵便局長の募集など知ってる人間でないと、目に付かないような方法で募集されているようだ。くろねこはかつて会社に努めていたときに、公務員になってみたいと郵便局の募集要項を手に入れたが、確か特定郵便局長の募集は記載されていなかった。<br />\n<br />\nしかし、特定郵便局長の所には募集要項が回ってくるようだ。しかもその試験の合格率が極端に高くほとんど落ちないというような内容で報道されていたと思う。また、その試験問題も事前にわかるというような内容だったと記憶している。<br />\n<br />\nこんな内容だと、特定郵便局長の抗議など既得権益を守るため以外の何者でもないように思うな。<br />\n<br />\n話は変わるが他に既得権益といえば...<br />\n部落地域に住んでる人間にも既得権益は多そうだ...<br />\n過去に差別されたからという理由で、すごく安い家賃の物件に住んでるらしい。水道代などの公共料金、NHK受信料、国民年金保険料免除などの特権があるようだ...<br />\n<br />\nさらに、既得権益でネットを検索してみると<a href=\"http://freett.com/iu/memo/Chapter-010607.html#010607080000\">こんなサイト</a>を見つけた...<br />\n日本国内に住んでいる朝鮮人にこんな既得権益があったのか...日本人が苦労して稼いだお金の中から税金を納めているのに在日朝鮮人なんぞにもって行かれていたのか...さらに中国人にはODAとしてもって行かれる...これも既得権益？<br />\n<br />\nついでに、刑務所の囚人を養うのに必要な経費は一人あたり、20数万円/月に及ぶそうだ...犯罪者を守るために血税が...これも既得権益か...<br />\n<br />\n最後にこれには反対しない人も多いかと思うが、軽自動車も既得権益だと思うのだが...<br />\n軽自動車の優遇税制は確か暫定税制のはずで、しかも期限は切れているはず...ここらで軽自動車の仕組みを廃して、自動車グリーン税制に一本化するのはどうだろう？<br />\n<br />\nまあ郵政改革だけでなく既得権益を廃して、国民全員に公平で平等なシステム作りが行われるよう期待したいものだ。','あっそうそう、うちの嫁も働かず、くろねこにたかるという既得権益を手にしているので、<strong>そろそろ外に働きにでてたら？</strong>といっても、<strong>じゃあ家事やってくれるの？</strong>というだけで、いっこうに動く気配がありません。主婦の経済活動の算出基準という指標がほしいくろねこでした。<br />\n<br />\n<strong>8/12 追記</strong><br />\n一部のサイトで、特定郵便局局長の平均年収を家賃抜きと解釈している人がいるようだが、それは誤りだ。<br />\n<blockquote><a href=\"http://www.shugiin.go.jp/itdb_shitsumon.nsf/html/shitsumon/b158020.htm\">衆議院議員長妻昭君提出自ら勤務する特定郵便局へ土地・建物を貸す特定郵便局長に関する質問に対する答弁書</a></blockquote>を見るに、下記のように記されていることから、<blockquote>借入特定郵便局の建物等の賃貸人である当該借入特定郵便局の長に対して平成十四年度に支払われた賃貸借料の年額の平均は約四百九十四万円であり、平成十五年三月に支払われた賃貸借料の月額の平均は約四十万円である。また、「平均年収」とは、当該借入特定郵便局の長に対して支払われた給与の年額を指すものと考えられるところ、平成十四年に支払われた当該額の平均は約九百十五万円である。</blockquote>家賃収入を含めた全体が915万円であり、内家賃収入は40万円/月なので480万円/年であると解釈すべきであろう。しかし、この915万円は家賃収入を含まれていないものが67%を占めているので、単純に計算すると、<em>家賃を含む局長の平均は1251万円/年、家賃収入を得ていない局長は平均771万円/年</em>となる。<br />\nさらに、その局長の合格率が公表されている。この内容が一概に正しいとは言えないと思うが、国会での答弁なのである程度信頼するしかないと思うが、以下のリンク先のようになっている。<blockquote><a href=\"http://www.shugiin.go.jp/itdb_shitsumon.nsf/html/shitsumon/b156116.htm\">衆議院議員長妻昭君提出特定郵便局長の採用が公募でない理由に関する質問に対する答弁書</a></blockquote>この内容から見ても、特定郵便局局長の合格率は、他の<a href=\"http://www.japanpost.jp/pressrelease/japanese/sonota/040202j901.html\">郵政公社職員の合格率(平成15年度:倍率288.5倍=合格率0.35%)</a>などに比べて非常に高いことがわかってもらえるだろうか？',1,6368,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('nec_valuestar',3,0,'2005-07-18 11:49:08','NEC VALUESTAR',null,'最近、だんだんPCがほしくなってきた...\n\n夏になるとあついので、熱量の少ないパソコンが...でもできるだけいいのがほしい...\n\n最近、気になるのがNECのVALUESTARなのだが、Pentium より Athlon 派としては <strong>TX</strong> より <strong>TZ</strong> がほしい。\n\nしかし、この TZ、TX に比べてかなり貧弱なのだ...\nこれが、良く <a href=\"http://pc.watch.impress.co.jp/\">PCWatch</a> で見るインテルの不当廉売と言うやつの結果なのだろうか？\n\nCPU は Athlon の中でも性能が低い Socket754 で 高性能型の Socket939 ではない。グラフィックのバスも AGP でPCI Express x16 ではない。他のバスも同様である。\n\nまとめると、ぱっと見ただけでも以下の通り...\n  CPU：性能が低い Socket754\n  バス：AGP、PCI\n  HDD：Ultra ATA\n約1-2年前の仕様ぽい\n\nこの辺が改善されれば、実売\\69,090(最廉価モデルで\\90,090からクーポンで\\21,000引き)なので、自分用にカスタムするべースとしても良いかも...\n\nとりあえず、121ware に改善要望だけ出しておいた。\n冬パソあたりで高性能水冷PCにあったスペックになることを期待しよう！','',1,2810,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_47',3,0,'2005-07-24 21:13:13','ドアがぼっこり...',null,'今日、買い物に行って、C#の本がないかな～と見に行った\n\nしかし、良い本がなかったので、帰ろうと駐車場から車を出した...\n\nすると、後部座席の方から、<strong>『ぼこぼこ』、『キー』</strong>と言う二つの異音が聞こえてくる...\n\nミラーで助手席側の壁とドアの隙間を確認すると、<em>かなり開いている</em>\n\nカートにぶつけてるわけでもなさそうだし...と思いつつ近くの駐車スペースに入れて降りてみると、\n\n壁の保護のために壁を取り囲むようにして、<em>ポール？が立っていててそれでひっかいたみたい</em>だった...\n\nなんてこった...行きつけの車屋で修理費用を算出してもらうと、約19万円、そしてもうすぐ１年点検なので、併せて20万円...\n\nとってもいたい出費になってしまいました。\n\nこんなことなら、今年も車両保険に入っておくべきだったのかな???\n\nというか、壁際のポールはバックするときにはよく見えてるんだけど、帰るときにはもう見えてないから、\n\n<em>ポールは見えるように(窓の高さぐらいに)背を高めに作っておいてくれるとうれしい...</em>','',1,2572,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_49',3,0,'2005-07-27 20:00:28','進学塾って通うと頭良くなるの？',null,'約1年ほどお世話になっている作業場がある。\n\nそして、その作業場の最寄り駅の駅前に、とある進学塾がある。また、自宅から駅までの間にも進学塾がある。\n<em>そのどちらにも共通することが、こいつらって頭良いのか？</em>\nという素朴な疑問だ...\n\nどうして、そのような疑問があるのかというと、通っている本人に疑問の種があるのではなく、その親に問題があるからだ。\nどういう問題かというと、進学塾に通っている生徒の送迎を親が行っているのだが、塾の授業が終わる前に向かえに来るので、当然子供が出てくるのを待つことになる。\nその待つ場所が問題で、交差点の真ん中であろうが対向車線に駐車があって、通常の車の通行の妨げになる様な場合でも、ちょっと遠慮しているようだが、基本的には自己の利益優先で駐車している。\n\nこのような<em>モラルの無い親の子供では、当然子供もモラルがないだろう。</em>\n<em>親の背中を見て子は育つのだ！</em>\n\n<em>進学塾に通わせる前に、自分の交通道徳みなおせー！</em>というか、<em>道路交通法勉強し直せば？</em>','',1,2887,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('vbvba_ubound1_1',3,0,'2005-07-28 23:49:02','[VB/VBA] 空配列のUBoundが-1にならない？',null,'最近はずっと Microsoft の Excel でVBAプログラムを作成している。<br />\n<br />\nVBA だろうと何だろうと保守性の低いプログラムを作りたくないので、機能単位でクラスモジュールにしているが、所詮 Excel なので、Book 間でソースが共有できない。<br />\nここが、保守管理上一番の問題点かな？と感じている。<br />\n100個プログラムを作って、共通部分に仕様変更があれば、100回修正を行うかモジュール単位でインポートを行う必要がある。<br />\n一つのモジュール内に共通部分と独自部分が共存していれば、単にインポートすれば良い問題ではなくなる。しかし、<strong>VBA のクラスモジュールは継承が出来ないので、<em>機能単位に分けたときに、それをさらに共通部分と独自部分に分けて、独自部分を継承で作る</em>というわけに行かない。</strong><br />\n<br />\n今日、またクラスモジュールを作成し使おうとしたら、こける...<br />\n原因を調べてる内に問題が見つかった。先ほど書いたこける問題とは別の問題だったのだが、動的配列に対し UBound を行うとこけるケースがあった。<br />\n動的配列を作って最初はサイズを 0 にしていたのだが、サイズ 0 の配列に対し UBound を行うとエラーが発生する仕様らしい。どうにかして回避できる方法が無いか、調べていると以下のような回避方法を見つけた。<br />\n<br />\nまず、以下のように宣言を行う。<br />\n<pre class=\"code\">Private Declare Function SafeArrayAllocDescriptor Lib \"oleaut32\" _\n   (ByVal cDims As Long, _\n    ByRef ppsaOut() As Any) As Long\n</pre>\n<br />\n実際に使用する前に、このAPI を適用します。関数内での使用であれば、宣言の直後にやっておくと良いかと思います。今回はクラスモジュールで使用したので、Clear と言うメソッドを作ってそこで使用しました。<br />\n以下のような感じになりました。<br />\n<pre class=\"code\">\n    Dim Hairetsu() As UserType\n    SafeArrayAllocDescriptor 1, Hairetsu\n</pre>\nすると、以降で空配列に対して行う <em>UBound(Hairetsu) が -1</em> になりました。\n<br />\nでも、こける原因が実は別にあって、グローバルで宣言されていたのを使用していると思ったら、実はローカル関数内にも同じように定義していたので、それでアウトになっていたのでした。<br />\nしかし、<strong>ウォッチにコンパイル出来ません</strong>と出すと何かまた別のエラーのように見えちゃいます...<br />\n<br />\nしかし、<em>もう二度と同じ手には引っかからないぞ！</em>という意味を込めてここにメモしておきます。','',1,18568,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_50',3,0,'2005-07-29 00:47:53','ロリポップにドメイン受信拒否機能が追加',null,'やっと、ロリポップにドメイン受信拒否機能が追加された\n\n早速、ドメイン指定でいくつかのメルアドについて、設定を行う。\nふと下に目をやると、アナウンスにはなかった<strong>『件名が英語の場合』</strong>、というのも付いている。これもなかなかよさげだ。\nこれもいくつかのメルアドに設定する。\n\n何か最近回線が遅いから、サーバ側でいらないメールを削除できるのは良いことだ！\n','',1,3599,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('fireworks',3,0,'2005-07-30 23:47:53','花火',null,'先ほど花火を見に行った！\n\n今年はこれで三度目の花火になる。\n１度目は<a href=\"http://www.biwako-visitors.jp/sekaihanabi/\">世界花火大会滋賀</a>を、二度目は<a href=\"http://www.biwako-visitors.jp/search/event.php?id=444\">野洲川の花火</a>を見に行ったが、今日は水口の水口橋の花火を見に行った。\n滋賀の中でも田舎の花火なのであんまり期待はしていなかったのだが、たまたま渋滞で止まったところが、打ち上げを行っていた所すぐ近く、花火のほぼ真下に当たる橋の上だったこと、しかも20分程度ずっと止まったままだったので、思いがけずじっくりと見れた。\n\n結果から言うとかなり満足できた。滋賀で言うと<a href=\"http://park14.wakwak.com/~eiki/sanpo/bhana.html\">琵琶湖花火大会</a>が一番大きいと思うが、二カ所に分散していることと地上からだとそれほど近くない(有料観覧席や船上だと近いかも)。\nしかし、今日はほんとに近かったので数年前に見た江戸川の花火を思い出してしまった。\n江戸川の花火よりも数も時間も打ち上げ箇所も小規模なのだが、近いのでかなり迫力があった。\n花火の臭いもしてきそうな雰囲気があった。しかも、江戸川ほど混んではいない。\n\nしかし、路上駐車は多く、やはり警察の対応は無能の一言がぴったりだった。まあそのおかげでベストポジションが手に入った訳だが...\n\n花火は最高だったが、警察の無能さには脱帽という感じだった!','',1,3056,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_R1c1toA1',3,0,'2005-07-31 01:32:54','[Excel VBA] セルの形式をR1C1形式からA1形式に変換','','<p>なぜ、今まで知らなかったのだろう...</p>\r<p>というか何で今までちゃんと調べなかったのだろう？<br />\rセルの形式をR1C1形式からA1形式に変換するのに自作関数まで作ってたことがとてもばからしい...<br />\rあるはずだとは思っていたのだが、見つからなかった。ヘルプでキーワード検索しても、全文検索しても... オブジェクトパッケージャで上から順に怪しいメソッドを順に試せば、わかったはずだった。しかしやらなかった。<br />\r結論を言うと、<strong>Cells もしくは Range オブジェクトには Address というプロパティがあって、それを利用するとセルもしくは範囲がA1形式の絶対表記で取得できる</strong>。セル自体を参照する分には必ずしも必要ではないが、列を選択する際にはA1形式の方が圧倒的に表記が楽だ！<br />\r使い方はこんな感じ...</p>\r<pre class=\"brush: vb;\">\r    With Worksheets(1)\r        Debug.Print .Range(.Cells(1, 1), .Cells(1, 1)).Address\r        Debug.Print .Cells(1, 1).Address\r    End With\r</pre>\r<p>Excelには便利な機能があるが、使い方を知らないものたくさんある。<br />\r今一番知りたいのは、オートフィルタでフィルタされずに表示されている行だけ、ループで順に処理できる方法。わかったらまたここにメモしておくことにしよう。</p>\r<p>しかし、<em>最近の Office のヘルプはとても使いづらい...</em></p>','<p>あとで、わかったことだが、列選択する際にこんな面倒な変換を行わずとも、Columns プロパティを使えば列選択できることがわかった。ただし1列選択の場合のみだが、たいていのプログラムは問題ないだろう...</p>',1,32293,1,0,'2005-08-30 01:32:54',1,'',0,1,1,0,0,'2011-02-25 09:35:56','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_IsMissing',3,0,'2005-08-04 14:13:27','[Excel VBA] IsMissing...',null,'<p>VB/VBAでは引数にOptional が使える。Delphi、C++、VB.Net にはない機能だ...<br />\r関数を作る際に、Optional A As Variantなど Optional付で指定したパラメータは省略ができるようになる。<br />\rそしてその関数を利用する際に、Optional のパラメータが省略されたかどうかを調べることができるのが、IsMissing というわけ！</p>\r<p>しかし、VB6以前には Optional パラメータには Variant 型しか指定できなかったのが、VB6からは Boolean 型なども指定できるようになった。しかし、Variant 型以外を指定した場合には、IsMissing 関数が使用できないのだ!!</p>\r<p>知らんかった...</p>\r<p>型指定の省略可能パラメータを省略した場合には、デフォルトの省略値が最初からセットされた形で関数が処理されている。<br />\rBoolean であれば False、数値型であれば 0、文字列型であれば空文字列がデフォルトの省略値。<br />\r変数宣言して初期値で初期化しなかったときのデフォルトと同じですな...</p>\r<p>Boolean 型の省略パラメータに対し、 IsMissing を使用して省略判定しようとして期待した結果にならないからと、デバッグして初めてわかったポカミスでした。(T_T)</p>','',1,6275,0,0,'2005-09-03 14:13:27',0,'',0,1,1,0,0,'2009-11-15 22:50:05','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_52',3,0,'2005-08-06 15:26:22','ウルティマオンライン 宝珠の守人 が予約開始',null,'ウルティマオンラインの新版『ウルティマオンライン 宝珠の守人』が９月１日に発売予定だが、３日から一部で予約開始になったようだ。<br />\n<br />\nパラリの記事によると、\n<blockquote>３日から一部で予約受付が行われているUOMLですが、出荷制限し過ぎのようで、わずか１日で既にアップグレード版の予約受付が停止しているようです。<br />\n　まだほとんどの人が予約出来ていないと思うので、また後に予約受付が復活するかどうか定期的にチェックしてみて下さい。</blockquote>\nとあるが、今日アマゾンで確認する限り予約受付しているようだ。(アップグレード版のみ)<br />\n<br />\nということで、アップグレード希望でまだ予約されていない方は以下アマゾンのリンクを作っておくのでどうぞ！<br />\n<br />\n<ul><li>UOMLアップグレードパッケージの購入はこちら<br />\n　<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B000AMCUD8/letsplaywithd-22\">ウルティマオンライン 宝珠の守人 アップグレード専用版（冥府の軍馬付き）</a></li>\n<li>UOML新規アカウントパッケージの購入はこちら<br />\n　<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/B000AMHUY2/letsplaywithd-22\">ウルティマオンライン 宝珠の守人 新規登録版（冥府の軍馬付き）</a></li></ul>\n<br />\nくろねこは最近忙しくて、ウルティマオンラインをやる時間が取れていない...<br />\nやる時間がないのにゲームタイムを買うのはどうかと思い、最近はもっぱら無料のUCGO(βテスト中)に時間を割いている...<br />\nウルティマオンラインも新版がでて、新たな展開があるかもしれないから、今からゲームタイムを買って更新しておくかな？','<strong>8/6 18:23</strong> クリック先のぺージで、お一人様一個の記述を発見しました。<br />\n初回記載時にあったかどうかどうか不明ですが、商品のぺージには見あたりません。<br />\n重要なことは商品のぺージに記載すべきだと思いますが...<br />\n<br />\nしかも、18:23現在商品のぺージで、初回記載時に出来ていた<em>予約が出来ない状態</em>になっています。<br />\n確実にほしい人は、こまめなチェックが必要ですね。<br />\n<br />\n<strong>8/7 0:00</strong> 商品ぺージへの直接リンクに変更しました。<br />\nまた、新規登録版の予約が開始されたようです。アップグレード専用版の予約状況は変わらず停止中でした。既存のユーザはアップグレード版を購入することになると思うので、新規登録版よりはアップグレード専用版の予約開始を期待したいとことですね。<br />\nまあ、予約状受付再開も９月１日に間に合うようにはなると思いますが...',1,2936,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('htmlhelp290bpl',3,0,'2005-08-07 18:39:33','htmlhelp290.bplでアドレス違反発生!',null,'Delphi 2005インストール後、Microsoft SQL Server 2005 Beta 2 CTPをインストールすると htmlhelp290.bpl でアドレス違反発生します。<br />\n<blockquote>モジュール \'htmlhelp290.bpl\' のアドレス 06D177BE でアドレス 00000018 に対する読み込み違反がおきました。.</blockquote>\n<br />\n普段はDelphi2005で遊んでいるくろねこだが、最近のDelphiは質が低くていかん...<br />\nものの質も悪いが、.Net対応状況などを見ていると、どうも志が低いような気がする...<br />\n<br />\nというわけで、.Netで遊ぶなら本家かな？と思い、でも一度C#を買って封を開けただけ！という過去を繰り返したくはないので、とりあえず Beta2でお試しすることにした...<br />\n<br />\nしかし、その後 Delphi 2005を起動すると、上記モジュールでアドレス違反が発生する...<br />\nしかし、犯人がVS2005 Beta2である証拠が無いので、とりあえずDelphi 2005の修復を試みるが失敗！ネットで検索してみると、 VS2005 Beta2中のMS SQL Serverが悪いことが判明。<a href=\"http://qc.borland.com/wc/qcmain.aspx?d=13822\">QC#13822</a> にレポートが上がってた...<br />\n対策方法も以下のように記載されてた。<br />\n<blockquote>Uninstall .Net Framework 1.1 SDK, and reinstall it.</blockquote>\n<br />\n早速、Microsoft .Net Framework 1.1 (Japanese) SDK をアンインストールして、再度インストールすることにした.この対応で、一応正常起動するようになった。しかし、VS2005 側に問題が出ていないかはこれから...','',1,6629,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_53',3,0,'2005-08-08 10:03:19','朝からワン切り...',null,'朝から嫁が『着信あるでー』と息子に携帯を持ってよこした...\n\n電話番号は... <em>0758032211</em> こんな番号知らん...(ΘΘ）ρ\nと思ったのもつかの間...思い出したワン切り番号\n確か、以前かかってたのも京都あたりの 075 からと思い着歴を探す...\nあった... <em>0758221111</em> <a href=\"http://www.age.jp/~busters/one_enq/enq.cgi\">ワン切り番号ワーストランキング</a>  一位やん...あかんやん...\n\nというわけで、晒しておくので皆様お気を付けて！\nあ、それからリンク先のぺージなのですが、管理者が管理してないようで、同じ番号があちこちにあるので、順位は当てにならないかも...いくつか検索して足してみないとって感じですね！でわでわ！','',1,3774,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050808_postoffice',3,0,'2005-08-08 14:20:04','郵政民営化法案 否決',null,'ちょうど今、郵政民営化法案否決のニュースが流れている。\n\n郵政民営化自体には賛成なのだが、法案の中身が良くわからない。\n反対のものも多いが、既得権益がらみの反対なのかそれとも、地方の不利益を考慮したことによる反対なのか、この法案のいいところ悪いところの具体的内容がよく見えていない。\n\nニュースを見ていても、法案がちゃんと煮詰められた上で、審議されたのか伝わってこない。\n\n民営化されれば、特定財源が特定以外のことに使われるような矛盾は無くなるな、きっと。\n道路公団は民営化が決まっているが、ORSE(財団法人道路システム高度化推進機構)のような新たな既得権益が出来るようでは、民営化してもメリットは薄い。ETCのデータベース管理も規格だけ決めて民営化するべきだ！いや、財団法人の純利益を法律で制限すべきか...\n\nいずれにせよ解散総選挙になるようだが、今回はどこに票を入れようか...悩む...\n郵政民営化についてもう少し中身を練り直してほしいと思う反面、北朝鮮による拉致問題に対する外交能力の欠如、そして年金問題など小泉ではまずい問題も山積する。\n他にも、交通マナーのない亀井静香や上野賢一郎、こんなやつがいるところに投票すれば日本の政治は今よりひどくなる...困った...','',1,4482,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_55',3,0,'2005-08-09 00:11:02','琵琶湖花火大会いってきた...',null,'花火はとてもきれいだった...\n\nしかし、その影でむかつくことも多かった。\nロッテリアにバーガー買いに行ったら、花火特別メニューになってて食いたいものが食えない状況になってた...まあそれは良いとして、<strong>16時からの限定メニュー、18:20にはすでに売れ切れの商品</strong>がでてる...<em>限定するならある程度量を確保しろ...全く...発注ミスだ</em>ちゅーに\n\n次に...昨年は無料で観覧出来た部分に新たに壁が出来て、有料観覧席になってた...\n<strong>公共の土地を一企業が私利私欲のために独占するなど許せん</strong>...と思ったら<strong>主催者は県知事</strong>だった...やられた...<em>壁じゃなく金網だったら後ろからでもよく見えるのに...かえてくれー</em>\n来年からは、有料席を検討しよう...\n\nで、今年も無料席を陣取っていたわけだが、<strong>荷物を置いている上からレジャーシートをかぶせてその上から座る阿呆が居った</strong>...むかつくと思っていたら、それを知ってか知らないでか知るよしもないが、<strong>2歳の息子がそいつのレジャーシートに砂利をかけていた</strong>...とりあえず、息子を押さえつけてやめさせるも、心の中では<em>天罰</em>だと思ってたりして...しかし、息子の手はぼろぼろになってた...\n\n後、<strong>阿呆といえば、自分も小さな子供連れているのにたばこを吸って、しかも地面にポイ捨てしているやつ</strong>...ああ、<em>全国禁煙にならないかな...誰かJTもミドリ十字と同じように犯罪企業として訴えてはくれないだろうか、年間JT(厚生労働省)に何人殺されているのか知りたい</em>...\n\n最後に、後ろに座っていた自称京都市立塔南高校の女子高生、うるさい、しかも、<strong>帰り際にゴミをそのまま放置して行きやがった</strong>...そいつら曰く、<em>滋賀県民じゃないから...</em>ということらしい...じゃあくるな\n\nという具合で、むかつくことも多々.\n\nしかし、繰り返すが花火はとてもきれいで、年々発色も良くなっていくように思えた！\n今年の新作の孔雀？もかなりきれいだった。しかし、くろねこ的には柳が一番よかった。\n柳も種類が増えててちょっと赤みのかかった太めの花火がきれいだった！','',1,3164,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0057',3,0,'2005-08-10 12:45:00','[Delphi] DBGrid のスクロールバーを消す','','<p>まず、TDBGird コンポーネントから垂直スクロールバーを消すためには、UpdateScrollBar メソッドをオーバーライドする必要がある。</p>\r<p>UpdateScrollBar メソッドの内部で、スクロールバーの最小値と最大値を 0 に変更するために <strong>SetScrollnfo API</strong> を呼び出さなくてはならない。 (最小値と最大値をともに 0 に変更することで、スクロールバーを表示しないよう視することが出来る。TCustomDBGrid のUpdateScrollBar でこのAPIを用いてスクロールバーの処理を行っている。)</p>\r<p>以下にスクロールバーの非表示化を行ったコンポーネントのコードを示す。</p>\r<pre class=\"brush: delphi; highlight:[37]\">\runit NoScrollbarDBGrid;\r\rinterface\r\ruses\r  SysUtils, Classes, Controls, Grids, DBGrids;\r\rtype\r  TNoScrollbarDBGrid = class(TDBGrid)\r  protected\r    procedure UpdateScrollBar; override;\r  end;\r\rprocedure Register;\r\rimplementation\r\ruses\r  Windows;\r\rprocedure Register;\rbegin\r  RegisterComponents(\'Black Cat\', [TNoScrollbarDBGrid]);\rend;\r\r{ TNoScrollbarDBGrid }\r\rprocedure TNoScrollbarDBGrid.UpdateScrollBar;\rvar\r  si: TScrollInfo;\rbegin\r  inherited;\r  si.cbSize := sizeof(si);\r  si.fMask := SIF_RANGE;\r  si.nMin := 0;\r  si.nMax := 0;\r  SetScrollInfo(Handle, SB_VERT, si, false);\rend;\r\rend.\r</pre>\r<p>一般的に実際に使う場合には、TDBGrid を継承したコンポーネントを作成するより、TCustomDBGrid の様に TCustom～ で始まるコンポーネントを継承する方がオススメだ。 なぜならコーディング量は多少多くなるが、不要なプロパティなどを見せなくすることが出来るからだ。理由として、C++ だと親クラスのメンバを子クラス側で見せないようにすることも可能だが、Delphi では出来ないということがある。</p>\r<p>ちなみに、水平スクロールバーを消すには、SB_VERT を <strong>SB_HORZ</strong> に変えたら出来ると思い、やってみたが出来なかった。何か一ひねり必要なのかもしれない...</p>','',1,12445,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-13 11:21:30','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_56',3,0,'2005-08-13 11:50:03','税金で小遣い稼ぎ!?',null,'<a href=\"http://headlines.yahoo.co.jp/hl?a=20050813-00000401-yom-soci\">Yahoo!ニュース - 読売新聞 - 監修料禁止したら…社保庁の出版物購入５９→１種類に</a>に寄ると、\n<blockquote>監修料の受け取りが禁じられた０４年度から、１種類を除きすべての購入を打ち切っていたことがわかった。</blockquote>\nということらしい。<br />\nまた、残った１種類も冊数を減らし、しかも内作によって１億１千万が173万円に...全体で見れば、5年で41億円が1年で173万円なので、5年で約41億円の節約に...<br />\nということは、<em>41億円も税金の無駄遣いであった</em>と...<br />\n<blockquote>こうした実態について、監修料問題を追及している長妻昭・前衆院議員（民主）は「六法と『事務手続きマニュアル』以外は、業務の遂行に不必要だったということ。小遣いを稼ぐために税金を浪費していたことの動かぬ証拠だ」と批判。</blockquote>という、長妻昭の意見に対し、同庁は、\n<blockquote>監修料とは別な次元の問題として、小冊子などの配布や購入の必要性を検討した結果だ</blockquote>\nと説明しているらしい。<em>郵政民営化が終わったら国民年金民営化が必要ではない</em>？<br />\n<br />\n記事の詳細は、リンク先を参照のこと。','',1,2663,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ucgo',3,0,'2005-08-19 13:30:07','UCGO 正式サービス決定',null,'<p>くろねこが、&beta;テスタをやっているUCGO(<a href=\"http://beta.universalcentury.net/main/index.php\">UniversalCentury.net GUNDAM ONLINE</a>)の<em>正式サービス日が決定</em>しました。</p>\r<p>メンテ明け後、その話題で持ちきり。生産関連のスキル上げも馬鹿らしくなってきて...<br />\rとこれだけだったらいいのだが、未だに不具合も多い UCGO このまま正式サービスはじめても、ユーザが付いてきそうな雰囲気はない...<br />\r&beta;テスタの半分ほどは、やめそうな雰囲気ですね...<br />\rパッケージも結構高そうだし（バンダイへの上納金込みという噂、某開発ソフトハウスと同じか？）、サービス料も月額1,575円とUltima Online一ヶ月分。まとめ払いによるディスカウントもなさそうですね...</p>\r<p>どうなることやら...</p>','',1,31770,0,0,'2005-09-18 13:30:07',0,'<a href=\"http://beta.universalcentury.net/main/index.php\">UniversalCentury.net GU...</a>',0,1,1,0,0,'2009-11-19 00:07:46','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('unicode_utf',3,0,'2005-08-21 18:16:07','Unicode と UTF','','<p>TeraPad を使用していて、Unicode が複数あることに気づく、というか秀丸でも複数あったんだけど...<br /><br />TeraPad には以下の3種類が定義されている。</p>\r<ol>\r<li>Unicode</li>\r<li>UTF-8</li>\r<li>UTF-8N</li>\r</ol>\r<p><br />秀丸では TeraPad と異なり、Unicode という体系の中に以下の4種類が定義されている。</p>\r<ol>\r<li>UTF-16</li>\r<li>UTF-16,Big-Endian</li>\r<li>UTF-8</li>\r<li>UTF-7</li>\r</ol>\r<p><br /><br />秀丸はわかりやすいが TeraPad の Unicode と UTF-8 ってなんだ？<br />どうやら、Unicode は UTF-16 のリトルエンディアンらしいのだが UTF-8N は UTF-8 の BOM 無しの様なのだ。<br />Unicode に付いてはこちらのぺージが参考になるかも？<a href=\"http://homepage1.nifty.com/nomenclator/unicode/ucs_utf.htm\">UCS-2とUTF-8</a> <br />あと、どうやら TeraPad はクリップボードの中のエンコードを確認していないようだ。DreamWeaver からコピーペーストを行うと文字化けを起こす。同様のことを Delphi で試した。すると、Delphi Win32版は各エディションとも全く同じ文字化けを起こした。.Net版は正しく変換して張り付いた。どうやら Win32環境で Delphi で対応しようとすると自前で実装が必要なようですね。</p>','<p>あとで、サポート掲示板に不具合内容を書いておいたら、てらおさんが暫定(0.89a)で修正してくれました。</p>',1,6503,1,0,'1970-01-01 09:00:00',0,'<a href=\"http://homepage1.nifty.com/nomenclator/unicode/ucs_utf.htm\">UCS-2とUTF-8</a>',0,1,1,0,0,'2012-09-02 22:33:25','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_58',3,0,'2005-08-24 21:44:43','家の近所に三日月大造選挙事務所が出来た',null,'家の近所に三日月大造選挙事務所が出来た。\n\nといっても、今週月曜日にオープンした。\nお盆休み中からつぶれた寿司屋を改造して作ってた。選挙が身近に感じられる。\n\nしかし、三日月大造って何してるんだ。<a href=\"http://www.genki1.com/nikki.html\">三日月大造 元気サイト</a>を見てもさっぱり。\n何してるか見るにはやはり活動日記かと思い。活動日記を見てみたがとても見にくい。\nフレームの中にシステム一式が入っているようで、検索とかが一番下までスクロールして空でないと使えないのは、使ってない証拠だ。\nやはり検索は一番見えやすい一番上か、一番下にするにしても、1画面で入るような情報量に制限されたぺージでないと使いにくい。\nまあ、この日記を見ていると時間が原因と思えるが、活動日記も子供の日記で国政について日々どう考えているのかそういうことは伝わってこない。\n三日月が何を考えているか一番わかりやすいのは、「何を考えて、何をやっているの？」の中にある「三日月の政策」だ。\n\nあと、一番活動内容がわかるのが「国会飛脚便 三日月国会質疑応答」だが、質疑応答した内容と感想が記載されているのみ。\nまた、国会質疑概要とビデオライブラリーの内容が、かみ合ってないところがあるというのは困ったことだ。\n質疑応答したのなら、その質疑と回答内容簡潔にまとめ、その内容についての評価を行い、そしてそれについてどう対応していくのかを示すべきではないのか。\n内容的にはぺージ内の内容よりも、TV・ビデオライブラリーの内容の方がかなりわかりやすい。\n「半歩前進」とか、「法案作りに関わっていくこととなる」とか「認識を共有した」とか、そんな抽象的なことをいっているようではまだまだ。\n\nやはり専門家でない一般国民向けには、<em>この法案が成立したら国民の皆さんの生活はこう変わります</em>というようにわかりやすく書くべきではないか？\nどうでなければ、理解の上の集票は望めないだろう。','9/11\n選挙速報中に選挙事務所に行ったところ、とても残念なことがありました。\nその点も含めてWEBサイトの見にくい点も一緒に指摘させていただきました。\n(くろねこのWEBサイトも見やすいとは言えないですね...)\nやはり、人の上に立つ(代表となる)国会議員というお仕事をされるわけですから、自らが決めたルールは守っていただかないと...\n選挙には当選されたようで、三日月氏にとっては良かったですね。\nしかし、民主としては過半数を取れなかったことで、マニフェストにあった年金改革や、子育て支援の月16,000円が支給されないのは悲しいですね...\n',1,4007,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050828_oda_1',3,0,'2005-08-28 12:27:48','経済大国に ODA は必要か？',null,'9/11 に総選挙が行われる。<br />\r\n<br />\r\nということで、くろねこの選挙に対する批評でも書こうかと途中迄用意したが、風邪でダウンしてとりあえずやめにした。<br />\r\nまた、時間があれば書くとしよう。<br />\r\n<br />\r\nところで掲題の件だが、経済大国が発展途上国に対して ODA が必要かと言うことを議論したい訳ではなく、逆で<em>経済大国に対し ODAは必要か？</em>ということである。<br />\r\nというのは、世界でも有数の規模を誇る中国に対し、有償・無償・その他技術協力を合わせて約3兆円ほど ODA を行っている事実がある。この内容については、「<a href=\"http://www.mofa.go.jp/mofaj/gaiko/oda/index/odaproject/index.html\">日本のODAプロジェクト</a>」を参照されたい。<br />\r\n中国は近年大きく経済発展を遂げており、G8 には参加していないが、国連の常任理事国にも入っているし、日本で出回っている品物の多くが中国製になってきている事実もある。(百均ショップなどほとんどが中国製。)また、2002年の資料とちょっと古いが<a href=\"http://www.yorozubp.com/0202/020212.htm\">中国のＧＤＰが日本のそれを追い越す日</a>というような見解もある。<br />\r\nこのような、国に対して ODA を行うよりも、<br />\r\n<ul><li>もっと貧しい国に対して ODA を行う方が効果的ではないか？</li><li>時刻の借金を返す方が先ではないか？<br />\r\n日本も平成17年度末で774兆円ほど借金を抱えている(<a href=\"http://www.takarabe-hrj.co.jp/takarabe/clock/about.htm\">借金時計とは</a>参照)</li><li>このまま ODA を続けるしにても、領土問題の解決とセットにすべきではないか？</li></ul>など考えるとべき所は多い。<br />\r\n領土問題にしても、北方領土ほど尖閣諸島や竹島は取りざたされることが少ないように感じる。<br />\r\n<br />\r\n日本政府としては、“隣国どうし仲良くやっていきましょうよ”というスタンスなのだが、世界の嫌われ者“中朝韓”(どうやら嫌われ者らしい、gooとかで検索してみて！)を相手にそれがどこまで通じるのだろうか？「中国のＧＤＰが日本のそれを追い越す日」が現実になったとき、中国からの ODA はあり得ない。再び中国を追い抜くためには、日本自身の成長が必要なだけである。','昔何かで聞いたのだが、有事が発生したとき「米国の守るべき地図に日本はない」というのがある。<br />どこの国も、我が身が優先なのだ。当然のことだと思うが、日本は第9条を遵守するのであれば、近隣諸国に日本を守った方が自国に対して利益がある。と常日頃から感じてもらうことが、有事の際に日本を守る唯一の方法ではないかと思う。<br />\r\n経済大国に対し、ODA を行っても相手は大して有意義だとは受け取ってはくれないだろう。特に武力により他国を支配しようとしている中国(中国は台湾独立に対して武力で威嚇している)に対してはなおさらだと言える。ODA はもっと喜んでもらえる貧しい国に対して行うべきだろう。',1,3636,1,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_57',3,0,'2005-09-02 00:17:38','ただでおなかいっぱいに出来る方法',null,'本当か嘘か定かではないが...\n\n<a href=\"http://x51.org/x/03/06/3049.php\"><em>太陽を食べる男 NASAが研究へ</em></a>というのを見つけた。この方法が正しいとすると、おなかがすいて仕方のない人は、ひたすら太陽を見ればいいことに...\n<strong>肥満にも効果があるかもしれない。</strong>\n\nNASAも着目し始めたというからすごい。昔の人は断食で太陽を見ていたのだろうか？\n断食も即神仏になるための断食と、こういう生きるための断食とあったのだろうか？\n\n<strong>しかし、ただただすごいとしか言いようのない内容であった...</strong>','',1,3119,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_59',3,0,'2005-09-11 21:41:59','選挙候補者の箱乗りっていいのか？',null,'今日、総選挙でしたね。皆さんはどこに投票されたのでしょうか？<br />\n<br />\n確率的には一番多い自民党なのでしょうか？<br />\n選挙活動において選挙カーに乗って選挙活動すると思いますが、シートベルト装着義務免除なんですよね。<br />\n道路交通法第71条の３において以下のように義務に対する免除が記載されています。<br />\n<br />\n<blockquote>ただし、疾病のため座席ベルトを装着することが療養上適当でない者が自動車を運転するとき、緊急自動車の運転者が当該緊急自動車を運転するとき、その他政令で定めるやむを得ない理由があるときは、この限りでない。</blockquote>\nで、道路交通法施行令第26条の３の２の第１項の八で以下のように免除されています。<br />\n<blockquote>公職選挙法 （昭和二十五年法律第百号）の適用を受ける選挙における公職の候補者又は選挙運動に従事する者が同法第百四十一条 の規定により選挙運動のために使用される自動車を当該選挙運動のため運転するとき。</blockquote>\n前置きが長くなったが、<em>シートベルトしなくても良いからと行って、箱乗りを許しても良いものか？</em><br />\n<strong>箱乗りしながら両手降られたりすると、後ろを走ってる車はすごく迷惑だぞ!! ＞ 上野賢一郎</strong><br />\nしかし、前回選挙では亀井も箱乗りしていたみたいだし、今回選挙では<strong><a href=\"http://www.obuchiyuko.com/\">小渕優子</a></strong>、<strong><a href=\"http://www.muneo.gr.jp/flash.html\">鈴木宗男</a></strong>などテレビに映りながら箱乗り...<br />\nこのような馬鹿どもが日本の政治を左右すると言うことも怖いが、それを放置している警察庁もダメだ...<br />\n<br />\n<em>このような人たちを見つけたら、警察に通報してあげてください</em>','',1,5499,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_60',3,0,'2005-09-15 22:22:53','銀行は信用するに値するか？',null,'<em>銀行は信用に値するのか？</em><br />\nたとえば、<strong>突然あなたの口座から預金が消えていたら...</strong><br />\n<strong>銀行はあなたの預金がなぜ消えたのか調べてくれるだろうか？</strong><br />\nまた、その<em>消えた預金を保護してくれるだろうか？</em><br />\n<br />\n約2年前くらいから気になっていたこの問題、2ch でキャッシュカードのセキュリティの版ができたり、＠ITで FIPS140-2 の記事を見た入りしたときに、クレジットカードやキャッシュカードのセキュリティが気になって仕方なかった...<br />\n実際に、<a href=\"http://nikkeibp.jp/wcs/leaf/CID/onair/jp/biz/357363\">「93.5％がクレジットカードのセキュリティに不安」</a>とのアンケート結果もでているようだ。<br />\n<br />\nクレジットカードのセキュリティはキャッシュカードよりも低くてもまだ安心できる。それは、60-61日間程度損害が保護されるという保護機構があるためだ。<br />\n(この保護機構がどの程度有用かについて疑問点が残る。)<br />\nたとえば、セゾンが管理するクレジットカードだと「毎月末締切、翌々月7日のお支払いなのでお財布にも余裕が。締切後37日間の安心はカード業界最長です」と案内があるが、締め切りは月一回ということは31＋37＝68日間も落ちるまでに時間がある。明細書は20日前後にお届けと有るので、31＋20＝<strong>51日間ぐらい明細が確認できない期間がある</strong>。(インターネットでの途中確認を除く。)<br />\n明細が届いて即確認しないと、<em>保護期間は11日しかない</em>。(セゾンの保護期間は61日間)\nさらに、全額(全明細分・全ケース)保護されるとは限らないだろう。<br />\n(家族が利用していた場合など、ケース外になることがあるようだ。)<br />\nしかし、保護規定があることは良いことだ。一定の制限があるかもしれないが、利用者側としてはスキミングなどの危険に注意を払う必要はあるが、未知の危険から逃れられる方法があるということだ。<br />\n<br />\n話をキャッシュカードに戻すとキャッシュカードはさらに危ない。全く保護規定がない。さらに銀行側にも預金を保護しなければならないという考えはないようだ。これは最高裁の判決による判例を盾にしている。\n(明らかに銀行内部で不正に使用された場合は除く。)<br />\n<br />\nしかし、利用者がどの様に危険から身を守ろうとしても、その情報は企業が持つ情報よりも圧倒的に少なく(銀行がこのような情報を開示しないことにもよる)、そしてそのような専門業務に就いているわけではない。さらに銀行側のシステム上の問題から、暗証番号が抜かれたりする可能性もある。従って銀行側で対策を講じるのが最も工数が少ない。この前郵便局で「暗証番号4桁は少ないよね」と問いかけたら、<strong>4/9997 という確率問題から安全だといわれた</strong>。でも、郵便局のATMのOS はたぶん WindowsNT なのです。ATM メンテナンス中にふたの部分に Windows NT マニュアル入っているのを見たので...<br />\nもし、今でもOSにWindowsNTを使用していたとしたら、OSの脆弱性はどうなってるのでしょうか？考えただけでも恐ろしい...<br />\n<br />\nこのあたりの銀行のシステム上の問題を本にした<a href=\"http://www.amazon.co.jp/exec/obidos/ASIN/4163667202/letsplaywithd-22\">キャッシュカードがあぶない</a>出ていました。<br />\nこの2日ほど前、Java の入門書を買った時に、気になって立ち読みしていたのですが、とても他人事とは思えず今日本をアマゾンで注文してしまいました。<br />\n<br />\nみなさんも、銀行の安全について一度考え直されることをおすすめします。<br />\nそして、みなさんがお使いの銀行にバイオメトリクスなどで保護されたシステムが導入され、キャッシュカードなどの暗号化も FIPS140-2 などに準拠した方法が採られること、そして何より銀行が考え方を改め利用者の危険に対してオープンになることを期待したい。まあ<em>銀行も利益重視で、顧客の安全など自社の利益を損なわなければどうでもいい</em>と思っているので、このあたりは国の管理責任とした方が良いのかもしれない。<br />\nということで、預金保護について国による法律の制定をお願いしたい。<br />\n<br />\n※ほとんど全ての企業は顧客と従業員の安全よりも利益が優先でしょう。<br />\n逆に安全優先といわれた方が気持ちが悪いです。<br />\n安全優先の姿勢をとるのは、安全に配慮しないことで災害が起こった場合に、その補償金・復旧費用などに費用の負担が発生すること。企業イメージの低下による収益の低下が発生するからです。<br />\nまた従業員が離職・死亡した場合には、その授業員が持つ技術力が失われること、また転職の場合には流出などの危険があるからだと考えるのが一般的でしょう。しかし、ほとんどの企業は従業員と油は絞りようと考えている様です。<br />\n<br />\nこのあたりは、雪印やミドリ十字、最近ではJR西日本やアスベスト問題、これからでは日本たばこ産業やこの銀行などが問題となっていくでしょう。','どう考えても、銀行よりクレジットカード会社の方が安全だ。必要以上の限度額が設定されている場合、必要最低限＋α程度の金額に設定する方がよいでしょう。\n設定金額で足りない場合には、カード会社に連絡することで限度額を一時的に変更してもらうことが可能です。\n\n※1 1ヶ月を最長の31日で計算\n※2 カード使用期間が1ヶ月と計算',1,3805,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_61',3,0,'2005-09-15 23:33:53','宗男よ！今度も逮捕されるか？',null,'やはり公職選挙法違反のようです。\n\n20歳未満の選挙活動は禁止されているのですが、宗男の娘(19)が選挙カーに乗って応援演説をしていた。\nこれはどう考えても、<strong>公職選挙法（未成年者の選挙運動の禁止）第137条の2</strong> に引っかかるでしょう!!\n\nどうやら、道民の方で問い合わされた方がいるようで、違反であることは間違いないようです。\n\nまたまた逮捕か？<em>宗男！</em>','',1,2544,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_62',3,0,'2005-09-21 16:45:07','蒜山高原に来た。',null,'蒜山高原に来た。\nちょっと早く来すぎて、どこも開いていなかった。\nしばらくぐるぐる回っていると、蒜山高原センターが開いた。ここでお土産をしこたま買いあさり、併設されてている JOYFUL PARK (遊園地)に目をやった。\nこの遊園地がかなり良かった。何が良かったかと言うと、平日ということもあってか、貸切状態で待たずに乗れる。また、従業員の愛想が良い。誕生日だとフリーパスがもらえるのだが、これにソフトドリンクが付いているのだが、ソフトドリンク以外からも選べた。しかも、ケーキもサービスされるなどサービスも良かった。\nおすすめである。\n是非、近くまで観光に来たら、よって行かれるといいだろう!!','',1,2607,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_63',3,0,'2005-09-22 19:12:23','梨狩りに来た！',null,'蒜山を出て鳥取まで梨狩りに来た\n\n梨が食い放題なのだが、一個あたり150円でテイクアウトも可能。\nなので、小さいやつは現地で食べて大きいものを持って帰るように、現地の生産者から言われた。\nしかし、黄色いのがうまい。熟して落ちてきたやつでも青いのがある。\nたまに袋がかぶっていないのもあるが、そいつがうまい。ただし、見た目はかなり悪い。\n\n食い放題なので、元取るんだーと意気込んで食べ過ぎたので、昼からおなか緩くなった。\n食べ過ぎだ...\n\nしかし、3組いたが悪いやつは他が見てない間に、鞄の中に詰め込んでるのね...','',1,2598,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_64',3,0,'2005-09-22 22:19:08','でっかい砂場',null,'鳥取のでっかい砂場にやってきた。\n\n鳥取砂丘も息子にとっては、大きな砂場でしかなかった。\n落ちてた洗剤スプーンで砂をすくって、山作って遊んでた。\nしかし、砂丘を超えて海側に行く人は、水分をもって行った方が良いですな～。\n全力で上ってきたら、のどからから、しかし砂丘の上に自販機など有ろうはずがない。\n\nやられたー。','',1,2890,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('movabletype_32',3,0,'2005-09-23 19:52:09','MovableType 3.2 βに移行しました',null,'MovableType 3.2 βに移行しました。\n\nMovableType3.2 βに移行する前に、最近 XOOPS から分かれて XOOPS Cube になった XOOPS を最新バージョンにアップデート。\nXOOPS の BackPack でデータベース全体のバックアップを取る。\n次に FFFTP でファイルのバックアップを取った。\n\nしかし、3.2 βに移行したら、データベースが変更されてしまったので、新しいエントリはバックアップを戻したら無くなってしまう。こうなると戻すのがいやになる。\n\nでも、無くなってしまうと大変困るので、βテストに参加される人はデイリーバックアップをかねてフルバックアップが良いでしょう。\n\nアップグレードしたら、管理サイトなどのメニューが、アイコンが増えてちょっとカラフルになりました。\nあと同一日付のエントリの並び順が変わりました。くろねこのつぶやきは日付降順のなのですが、<strong>アップデート前は同一日付のエントリが昇順で並んでいたので何か変だったのですが、今回のバージョンアップで、時刻までを見て降順に設定してくれている</strong>ようです。\n\n何か変になったところは、<strong>メインカテゴリの？のリンクが切れてしまった</strong>ことだけ発見できましたが、アップデートに失敗したのか？もしくはバグなのかまだ不明です。\n\nまあこんな感じなので、繰り返すようですが<em>アップデート前にはバックアップを取ることをオススメします</em>。','',1,4280,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('fit_navi1',3,0,'2005-09-25 19:14:50','フィットのナビが壊れた...',null,'前にフィットのドアが壊れたのはお伝えしたとおりだが、今度はナビが壊れた。<br />\n<br />\n音声認識が全く行われないというか、音声を検出しなくなった。<br />\n<em>ホンダの品質管理っていったいどうなっているんだろうと思う</em>。前の車に付いていた純正オプションナビも壊れて数回取り替えをしましたよ。初回の車検付近から、車を買い換える1年ほど前まで悩まされましたね。<br />\nまた、ナビなどの<strong>オプション品は1年点検の検査対象にも入ってない</strong>のだという。<br />\nナビが壊れても、即安全に支障をきたすわけではないが、やはり車全体を点検してほしい。<br />\nそのために、純正部品でかつメーカオプションで購入しているのだ。ナビが壊れた？と思ってそっちに気を取られている間に事故を起こす人がいないとも限らない。そういう点で考えてもやはり点検項目とすべきだろう。<br />\n<br />\nしかし、ナビが壊れても代替品の貸し出しは無いのですね。昨日、ナビのメーカ(HONDAではなく、OEM供給している元)に発送していたので、今日はナビがありませんでした。先日の旅行に引き続き、今日も大阪市内に行くとき初めて行くところだったので、2時間ほど迷ってしまいましたよ。ええ、嫁にナビをさせたのが敗因かもしれませんが、そもそもナビが壊れなかったらこのようなことにならなかったわけで...<br />\n<br />\nしかし、<strong>AUの助手席ナビというのを使ってみたのですが、全く使えませんね</strong>。<br />\nない方がましですね、全然違う方向に案内しているみたいです。AUのナビを見ている嫁のナビということも有るかもしれませんが、携帯から聞こえる音声を頼りに曲がったらUターンとか、行き止まりとか最悪でした。<br />\n<br />\n時速何キロの車を対象にしているのでしょうか？また、市街地で実地試験しているのでしょうか？<br />\n最後は音声案内は全く当てにせず、まず広域で確認して、曲がり角を確認してと言う具合でしたね。<br />\n<strong>使えない原因の最大の要因は GPS の通信速度不足にある</strong>かと思いますね。嫁に次ぎどっちに曲がるの？って聞いてもまだ通信中って返ってくるので、<strong>通信終わるまで横に車を止めて数分待つ</strong>というのが多かったですね。<br />\n<br />\nたぶん、<em>AU助手席ナビは二度と使う機会はないですね</em>。','MAPFAN のラリーマップの1つを見逃したのが、今回の迷走の直接の原因なのですが...<br />\n嫁曰く2時間迷った敗因としてほかに...<br />\n<ul>\n<li>くろねこが用意した MAPFAN のラリー地図が見にくかった(マップルの大きな地図の方が追いやすい)。</li>\n<li>くろねこが、いらいらして怒るのでナビに集中できない。</li>\n<li>くろねこが、間違いに気づいたときに引き返さなかった。</li></ul>\nなどだと言うことです。',1,3096,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ucgo_1',3,0,'2005-09-28 23:00:00','UCGO 本当に今日でβテストが完了!!',null,'<p>前回、最終パッチ以降は1週間しかないことと、その一部の期間が旅行でつぶれることからその前でもう終わりにしようと思った。</p>\r<p>しかし、旅行から帰ってきたらやっちゃったんですよ。<br />\r最終パッチでどうなったか？&beta;テストが終了した今振り返ってみると...<br />\rくろねこが要望した仕様が実装されてました。<br />\r要望したのは、<strong>まっすぐ向いて撃つだけではなくて、横向いて撃てるようにすること。</strong><br />\r真横は無理でしたが、前方から左右15度くらいづつは自由度が増えましたね。<br />\rそのほかにも、コンテナやバックパックの容量が少なくなってテントに帰る回数が増えたり、生産の資材の値段変更や資材の使用量も変わったりしました。おおむね受け入れられる仕様変更だと思います。<br />\rしかし、安定性はいまいちでした。安定度が増したというよりは、仕様変更によって描画も増えたのかアプリケーションエラー連発でした。<br />\rエラーの発生するケースは、振り向いたときや爆発したときなど、大量の描画が発生するときに多いようです。この点はUCGOであるネオジムの方に報告させていただいたので、製品版がでて最初のパッチで修正されることを希望しています。</p>\r<p>しかし、最終日ネオジムを交えて話をしているところで以外な見落としが発覚しました。<br />\rそれは、<em>GMコール機能がない</em>ということです。<br />\rこれがないと、不具合によって正常なゲームの進行が出来なくなったとき、元に戻すことが出来ないとか、またバグか仕様か判断に困ったときなどに確認してもらうなど、そういう重要なことが出来ないおそれがあります。<br />\rビルの中に閉じこめられたときなど、くろねこも&beta;テスト中にBBSによるGMコールをしたことがありますが、テストではその間が待ててもお金を払っているとそうはいきませんよね。</p>\r<p>とまあこんな感じで、まだまだ未完成な部分が多いままの見切り発車的オンラインゲームですが、製品版をやる方はどんどん開発の方に要望は上げた方が良いですよ。<br />\rでも、無茶は言わないように...</p>\r<p>最低限、安定性が上がればぼちぼち遊んでいけるとは思うのですが、完成度の割に値段が高いです。<br />\r初期費用だけでもただにすれば、ユーザも納得するのではないかと思うのですが、その辺は提供元が考えることなので...</p>\r<p>遊んだ数ヶ月が、思い出になった頃どこからかひょっこり、本運用に顔を出しているかもしれません...</p>','<p>帰宅後、&beta;プログラムを起動してサーバを確認したら、やっぱり無くなってましたね。<br />\rええ、もう削除しましたよ。でも、アンインストール機能が無くて困りましたよ。<br />\rアンインストール機能は是非付けておいてください。マナーです。</p>',1,3571,0,0,'2005-10-28 23:00:00',0,'',0,1,1,0,0,'2009-11-19 00:06:05','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0058',3,0,'2005-09-29 00:10:40','[Delphi] DateTimePicker の書式変更2','','<p>DateTimePicker で中身の日付を表示したくない場合、どの様な対応をしているだろうか？<br />Delphi に関わらず、他の言語処理系にも共通する問題なのだ。この問題を解決するために、DateTimePicker に最初からあるチェックボックスを使用して空白を表現している方もいるのではないだろうか？くろねこも最初そう考えた。<br />しかし、ある時とある設定ミスから発見したある方法がこの問題の解決にぴったりだと思った。<br />その方法は、書式設定に <em>\"g\"</em> を使うという物である。<br />Windows 上での日付書式フォーマットでは \"g\" は元号を表す記号である。しかし、DateTimePicker はこの元号に対応していないらしく、\"g\", \"gg\", \"ggg\" などのフォーマットが指定された時に何も表示しない。これを逆手にとって表示すべき日付が無いときに、これを設定するのだ。<br />これで、<em>データベース中の日付を表示するときなどに現れる Null を DateTimePicker で表現できる。</em><br />このときの書式には Delphi の書式ではなく、Windows の日付書式を使用する。また commctrl ユニットを uses 節に追加する必要がある。 <br /><br />※ Delphi で月をあらわす書式は \"mm\" だが、Windows では \"MM\" となる。<br />&nbsp;</p>\r<pre class=\"brush: delphi\">uses\r  commctrl;\r\rprocedure NullDateFormat;\rvar\r  szFormat: PChar;\rbegin\r  szFormat := \'g\';           // Windows の日付書式\r  SendMessage(DateTimePicker1.Handle, DTM_SETFORMAT, 0, longint(szFormat));\rend;\r</pre>\r<p class=\"add\">2012/04/07 追記<br />Delphi2010 on Windows7 で上記を試してみたところ、\"g\", \"gg\", \"ggg\"のいずれも\"西暦\"と表示された。よってこの方法はすでに使えなくなっている。おそらくOSに依存しているものと思われる。<br />よって、何も表示しないDateTimePickerの実現方法を別途考えないといけないようだ。</p>','',1,10341,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2012-04-07 13:12:04','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('050930_kokuseichosa',3,0,'2005-09-30 08:14:35','国勢調査','','<p><a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%9B%BD%E5%8B%A2%E8%AA%BF%E6%9F%BB&amp;affid=21mTn15NlY\">国勢調査</a>の用紙があなたの所にも届いているでしょう。</p>\r<p>もう記入は済みましたか？くろねこはまだなのです。<br />\rこの記入用紙<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E7%B0%A1%E5%8D%98&amp;affid=21mTn15NlY\">簡単</a>な人には簡単なのですが、むずかしい人にはむずかしい。<br />\r例が少なすぎて自分がどの例に当てはまるのか？当てはまるのがないので考えてしまうんですよね。<br />\rというのも、この国勢調査は<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E8%99%9A%E5%81%BD&amp;affid=21mTn15NlY\">虚偽</a>の<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E8%A8%98%E8%BC%89&amp;affid=21mTn15NlY\">記載</a>をすると、罰則義務があるからなんですよね。</p>\r<p>しかし、それ以前に重要な問題もありました。<br />\rこの国勢調査は、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%80%8B%E4%BA%BA%E6%83%85%E5%A0%B1&amp;affid=21mTn15NlY\"><strong>個人情報</strong></a><strong>の固まりであるにもかかわらず、使用</strong><a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E7%9B%AE%E7%9A%84&amp;affid=21mTn15NlY\"><strong>目的</strong></a><strong>が明らかにされていない</strong>んですよね。<br />\r※<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E7%B5%B1%E8%A8%88%E6%B3%95&amp;affid=21mTn15NlY\">統計法</a>第15条では、「何人も、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E6%8C%87%E5%AE%9A%E7%B5%B1%E8%A8%88&amp;affid=21mTn15NlY\">指定統計</a>を作成するために集められた調査票を、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E7%B5%B1%E8%A8%88&amp;affid=21mTn15NlY\">統計</a>上の目的<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E4%BB%A5%E5%A4%96&amp;affid=21mTn15NlY\">以外</a>に使用してはならない。」と規定されています。参照元&rarr;国勢調査に関するＱ＆Ａ－<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E4%B8%80%E8%88%AC&amp;affid=21mTn15NlY\">一般</a>的な質問（内容）- 国勢調査には、どうしても答えなければいけないのですか？</p>\r<p>しかも、「あなたの調査票は <a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%A4%A7%E5%88%87&amp;affid=21mTn15NlY\">大切</a>に守られます」と書いてあるのだが、調査票だけを守ってもらっても意味がないのです。調査票自体が重要なのではなく、重要なのは記載された個人情報なのです。<br />\rまた、統計法により記入内容を他に漏らすことを禁じられていると書いてあるが、漏らすというのは故意であって過失による漏洩を防ぐという意味には取れないのがちょっと。</p>\r<p>国勢調査に問題意識を持った方たちの<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%B5%E3%82%A4%E3%83%88&amp;affid=21mTn15NlY\">サイト</a>を見つけたのでリンクしておきます。<br />\r<a href=\"http://www.ringo.sakura.ne.jp/~kokusei/\">国勢調査がわかる</a><br />\rこのサイトによると、国勢調査の<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%B0%81%E7%AD%92&amp;affid=21mTn15NlY\">封筒</a>は封をして渡してくださいと書いてあります。</p>','<p>国勢調査って「こく<strong>せ</strong>いちょうさ」ってよむんですね。「こく<strong>ぜ</strong>いちょうさ」だと思ってましたよ。いやー、無知ってこわいな～。</p>',1,3331,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%9B%BD%E5%8B%A2%E8%AA%BF%E6%9F%BB&amp;affid=21mTn15NlY\">国勢調査</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E7%B0%A1%E5%8D%98&amp;affid=21mTn15NlY\">簡単</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E8%99%9A%E5%81%BD&amp;affid=21mTn15NlY\">虚偽</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E8%A8%98%E8%BC%89&amp;affid=21mTn15NlY\">記載</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%80%8B%E4%BA%BA%E6%83%85%E5%A0%B1&amp;affid=21mTn15NlY\">個人情報</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E7%9B%AE%E7%9A%84&amp;affid=21mTn15NlY\">目的</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E7%B5%B1%E8%A8%88%E6%B3%95&amp;affid=21mTn15NlY\">統計法</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E6%8C%87%E5%AE%9A%E7%B5%B1%E8%A8%88&amp;affid=21mTn15NlY\">指定統計</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E7%B5%B1%E8%A8%88&amp;affid=21mTn15NlY\">統計</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E4%BB%A5%E5%A4%96&amp;affid=21mTn15NlY\">以外</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E4%B8%80%E8%88%AC&amp;affid=21mTn15NlY\">一般</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%A4%A7%E5%88%87&amp;affid=21mTn15NlY\">大切</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%B5%E3%82%A4%E3%83%88&amp;affid=21mTn15NlY\">サイト</a>\n<a href=\"http://www.ringo.sakura.ne.jp/~kokusei/\">国勢調査がわかる</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%B0%81%E7%AD%92&amp;affid=21mTn15NlY\">封筒</a>',0,1,1,0,0,'2010-09-22 01:36:49','html',1,0,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_67',3,0,'2005-10-01 00:25:50','シングルクリックがダブルクリック？',null,'今年4月頃に買ったマウス(Microsoft Stanard Wireless Optical Mouse)が6月頃動きが悪くなったので、交換してもらった。\n最初は交換ではなく、修理に出していたので代替用のマウスにArvel のレーザマウスを買った。\n修理せずに交換で保証に応じるとのことだったので、新品をもらったがしばらくレーザマウスの方を使っていたので、そのまましまってあった。\nしかし、嫁の PCのマウスが壊れたのを機に Laser Mouse は嫁に取られた。で、仕方なくワイヤレスマウスを使用していたのだが、このたび電池が古くなったのか、動きが悪いので電池を交換したが、まだなぜか動きが悪い。何かに引っかかる感じでポインタが動かないのだ。\n同様の経験がある方が他にいないかと、ブログに書いてみた。\nもしそんな方が居られたらコメントを頂きたい。\n暇を見て MS に連絡してみようとも思うが、今回も修理に出した方が楽かもしれない。\n\nで、一時的にレーザマウスに交換したのだが、ワイヤレスではないのでUSBポートに接続。引っかかる位置だったのでポートを変えた。\nすると、クリックするとダブルクリックするようになってしまった。\n原因を調査すると、ポートを変えた際に、前のドライバが消えずに追加でもう1個ドライバが入った様だ。\n都合2個入っていることになるので、二個のドライバがそれぞれOSに応答しているのでクリックがダブルクリックになったようだ。\n\nんー。マウスだけでなくOS本体も腐っていたのか＞MS。\nしかし、こういうケースは最近見なかっただけに、久々におもしろかった。\n','',1,4292,2,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('auction_0930_f38454313',3,0,'2005-10-02 21:47:49','いやな雰囲気のオークションになってしまった...',null,'<p>先日、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AA%E3%83%BC%E3%82%AF%E3%82%B7%E3%83%A7%E3%83%B3&amp;affid=21mTn15NlY\">オークション</a>で<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%83%8A%E3%82%A4%E3%83%95&amp;affid=21mTn15NlY\">ナイフ</a>を落札したんですよ。<br />\rそれも、新品のナイフを落札したんですね。ナイフなんてものを落札するのは初めてなので、相場なんてわかりませんから、高いのか安いのか全くわかりませんが、「<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%A2%E3%82%A6%E3%83%88%E3%83%89%E3%82%A2&amp;affid=21mTn15NlY\">アウトドア</a>や<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E9%98%B2%E7%81%BD%E7%94%A8%E5%93%81&amp;affid=21mTn15NlY\">防災用品</a>として多機能でかっこいいナイフがほしかった」ただそれだけなんですよ。</p>\r<p>落札したのが夜でしたので、次の日に出品者から落札通知が来たんですね。<br />\rその内容を読んでびっくりです。<strong>「自分には何があっても責任はないので苦情は受け付けません。」この内容をご理解いただけたものとして、取引を行います</strong>。という旨が書かれていたんですよ。<br />\r<strong>オークション開催中には全くそのような内容は記載されていなかった</strong>ので、いきなりそのような内容を書かれても承伏できません。<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E4%B8%80%E8%88%AC%E5%B8%B8%E8%AD%98&amp;affid=21mTn15NlY\"><strong>一般常識</strong></a><strong>・日本国内法の範囲での責任でお取引をお願いします</strong>。と<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%81%8A%E8%BF%94%E3%81%97&amp;affid=21mTn15NlY\">お返し</a>したんですよ。<br />\rすると、あなたは<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AF%E3%83%AC%E3%83%BC%E3%83%9E%E3%83%BC&amp;affid=21mTn15NlY\">クレーマー</a>だから、お取引できませんと返されました。</p>\r<p>いや～、基本的にくろねこはクレーマーかもしれませんが、お願いした内容はごく一般的な、普通のことしかお願いしてはいないのですが...<br />\r車が壊れたときなどにも、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AF%E3%83%AC%E3%83%BC%E3%83%A0&amp;affid=21mTn15NlY\">クレーム</a>修理と言うことで<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E7%84%A1%E5%84%9F&amp;affid=21mTn15NlY\">無償</a>修理してもらうときもありますが、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E4%BF%9D%E8%A8%BC%E6%9C%9F%E9%96%93&amp;affid=21mTn15NlY\">保証期間</a>内ですし、そもそもこちらに非がないとくろねこは思ってますし、状況は出来る限り説明して納得いただけるようにがんばってはいます。<br />\r話を元に戻します、オークションシステム側に、「それはおかしいから取引を継続してもらうべきか、出品者都合にて削除してもらうべきか判断してください。また必要な内容は最初に示すように、指導並びにオークション全体への<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%95%93%E8%92%99&amp;affid=21mTn15NlY\">啓蒙</a>をお願いします。」とお願いしたのですが、取引には関与しませんとつれない返事を頂きました。</p>\r<p>また、削除権を行使するのは取引への関与では？と再度問い合わせしたところ、「オークションでの取引は、全て<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%BD%93%E4%BA%8B%E8%80%85&amp;affid=21mTn15NlY\">当事者</a>の方同士の責任と判断で行っていただいております。」と、「恐れ入りますが、利用者の方の行動の管理などを行うことはできかねますので、ご理解の程お願いします。」と返答を頂きました。</p>\r<p>そもそも、オークションの報告されているトラブル例に、充分な商品説明がない「ノークレーム・ノーリターン」というのがあるのですが、それに完全に違反しているんですよね。</p>\r<p>また、相手側から「自分は<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E6%B3%95%E5%BE%8B&amp;affid=21mTn15NlY\">法律</a>を遵守していますよ」という旨の返答が返ってきたので、ちょっとむかっと来てしまいました。そこで法律を調べて見たところ、下記のように記載がありました。</p>\r<blockquote>消費者保護法 第15条（消費者保護への協力）①<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E4%BA%8B%E6%A5%AD%E8%80%85&amp;affid=21mTn15NlY\">事業者</a>は、物品又は用役を供給する<br />\r場合において消費者の合理的な選択又は利益を侵害するおそれがある取引条件又は方<br />\r法を使用してはならない。</blockquote>\r<p>くろねこが思うに、<a title=\"このキーワードを百科事典で調べる\" href=\"http://www.dismas.jp/aff/index.php?title=%E5%85%A5%E6%9C%AD&amp;affid=21mTn15NlY\"><em>入札</em></a><em>時に必要な情報を示さないと言うことは、消費者の合理的な選択又は利益を侵害しているのと同義であるということなんですね</em>。</p>\r<p>本当に大変な人にぶち当たってしまいましたよ。<br />\r全く...</p>\r<p>基本的に無関係の人に晒すつもりはないので、オークションID も 相手側のIDも示すつもりはありません。</p>','<p>※上記内容はかなりはしょってます。<br />\r出品者側とのやりとりの内容は、個人情報を除いたすべてを公開掲示板にUPしてますので、もし見つけた方はそれを参照下さい。 <br />\r繰り返しになりますが、晒しになるのを防ぐためリンクを付けたり、IDを公開する様なことはしません。 <br />\r＞今のところは...</p>',1,2755,0,0,'2005-11-01 21:47:49',0,'<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AA%E3%83%BC%E3%82%AF%E3%82%B7%E3%83%A7%E3%83%B3&amp;affid=21mTn15NlY\">オークション</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%83%8A%E3%82%A4%E3%83%95&amp;affid=21mTn15NlY\">ナイフ</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%A2%E3%82%A6%E3%83%88%E3%83%89%E3%82%A2&amp;affid=21mTn15NlY\">アウトドア</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E9%98%B2%E7%81%BD%E7%94%A8%E5%93%81&amp;affid=21mTn15NlY\">防災用品</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E4%B8%80%E8%88%AC%E5%B8%B8%E8%AD%98&amp;affid=21mTn15NlY\">一般常識</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%81%8A%E8%BF%94%E3%81%97&amp;affid=21mTn15NlY\">お返し</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AF%E3%83%AC%E3%83%BC%E3%83%9E%E3%83%BC&amp;affid=21mTn15NlY\">クレーマー</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E3%82%AF%E3%83%AC%E3%83%BC%E3%83%A0&amp;affid=21mTn15NlY\">クレーム</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E7%84%A1%E5%84%9F&amp;affid=21mTn15NlY\">無償</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E4%BF%9D%E8%A8%BC%E6%9C%9F%E9%96%93&amp;affid=21mTn15NlY\">保証期間</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%95%93%E8%92%99&amp;affid=21mTn15NlY\">啓蒙</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%BD%93%E4%BA%8B%E8%80%85&amp;affid=21mTn15NlY\">当事者</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E6%B3%95%E5%BE%8B&amp;affid=21mTn15NlY\">法律</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E4%BA%8B%E6%A5%AD%E8%80%85&amp;affid=21mTn15NlY\">事業者</a>\n<a href=\"http://www.dismas.jp/aff/index.php?title=%E5%85%A5%E6%9C%AD&amp;affid=21mTn15NlY\">入札</a>',0,1,1,0,0,'2009-12-13 10:50:39','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('auction_10061520',3,0,'2005-10-06 22:19:32','いやな雰囲気のオークション...その後...',null,'先日、落札したオークションが出品者の一方的かつ身勝手な理由により、取引中止を宣告されたくろねこだったが...<br />\n<br />\n<strong>このままで引き下がれるかい...</strong><br />\nということで、消費者生活センターに相談を持ちかけた。<br />\nことの詳細を話して非がどちらにあるのか？オークションが落札で終了した場合に、双方に取引の義務があるのか？などを相談した。<br />\n結果、以下のことを確認した。\n<ol><li>こちらに非がない</li>\n<li>一般的にノークレーム・ノーリターンですべての瑕疵(かし)を回避できない</li>\n<li>出品者には問題のない商品を届ける義務があること</li>\n<li>落札者には商品を購入する義務があること</li>\n</ol>\n\nもともと想定していたとおり<em>こちらに非がないこと</em>と、そのような<strong>商慣習を理解してない人と取引をすると、もっとトラブルになる</strong>とご忠告いただいたので、掲示板にその旨を記載して評価を「非常に悪い」で付けることを連絡。\nそして、そのとおり評価を付けた。しかし、身勝手な出品者側は「非常に悪い」で評価を返してくるであろう。\n\nまた、システム側に連絡して対応してもらった方が良いとも言われたが、このようなトラブルが発生しようともシステム側は取引に関与しようとしないこと、削除権を行使できるのにそれをうやむやにしていることなどすでに要望などを連絡していることを伝えた。\nセンター側は、すぐには対応してもらえなくとも消費者側が要望を上げていくことが大切だと言われた。\n\n<em>システムがもうちょっとまともになればこれほど面倒なことにはならないのに...</em>','ところで、オークションの出品者側の拒否権って有るのでしょうか？<br />\n原則的に無いと思うのですが、評価がとても悪い人や過去にトラブルが有った人など、取引することに寄って不利益を被ることが明らかだと予想だれる場合にはあると考えられると思うのです。<br />\nしかし今回の相手に比べると、くろねこは取引数が少ないので絶対数が少ないですが、悪い評価は無いので上記の例に当てはまらないと思うのです。<br />\nメールで返した内容も個人的に問題が無いと思うのですが、人の心を荒立てる表現だったのかもしれません。<br />\nしかし、やはり一番の原因は「商品説明に記載が無かった」これでしょうね。<br />\nたいていの方はちゃんと書いて居られますからね<br />\n<br />\nやはり、「非常に悪い」で評価が返ってきました。やはりという感じです。<br />\nもう、平行線ですね。',1,2482,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_69',3,0,'2005-10-06 22:39:26','アマゾンのシステムっていったいどうなってる？',null,'くろねこは、アマゾンで本などを購入しています。\n\nインターネットで注文して翌日や翌々日あたりに届く商品が多くとても楽しています。\nまあ、近くの本屋で買うことも多いですが...\n\nそのアマゾンで請求に問題が生じました。\n商品を発注してから、間違ったクレジットカードで買い物をしたことに気づき、約40分後に本当に使いたいクレジットカードに変更処理をしたのですが、受注システム側はこのトランザクションを受け付けクレジットカードの更新が行われたのですが、発送システム側は変更処理中？前？に請求情報を読み出したようで変更前のクレジットカードに対し請求を行いました。\n<em>普通、このような一つの情報に対する二つの処理が行われることが無いように、読み出しロックを掛けるんですが、アマゾンには無いようです</em>。\n修正されたとのことですが、まだまだ怪しいです。\n銀行でこのようなことが有ったら、預金がめちゃめちゃになってしまいます。(実際には有るようですが、まれなようで、こっそり直すらしいです＜違法行為です。)\n\nというのは、この話を東京に住む友人と話していたのですが、以前似たような状況に遭遇したようです。\nこのときには、請求情報の変更ではなくキャンセル処理だったようですが、<strong>キャンセルしたにもかかわらず、商品が届いた</strong>ということです。\nまた、その<strong>商品の返品費用は友人持ちだった</strong>ということでした。\n\nどうなってるんでしょうね。','',1,2836,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_70',3,0,'2005-10-06 22:39:26','偽造・盗難カード預貯金者保護法',null,'「偽造・盗難カード預貯金者保護法」がやっと出来たようですね。<br />\n<br />\nでも、施行は来年二月のようです。<br />\n銀行のキャッシュカードを被害防止のため、減らそうと考えていたくろねこには朗報です。<br />\nなぜもっと早くに出来なかったのか？そう考えると、やはり日本は金持ちのための国だから？しか思いつきません。<br />\n<br />\n話を戻すと、今回の法律では100%保護される場合、75%しか保護されない場合と全く保護されない場合とあるようです。<a href=\"http://www5.hokkaido-np.co.jp/motto/20050820/\">参考</a><br />\n<br />\nこの法律で行くと今後は郵便局が一番危ないかもしれません。<br />\nというのも <a href=\"http://news.goo.ne.jp/news/yomiuri/keizai/20050803/20050803it05-yol.html\">gooニュース</a>によると、\n<blockquote>「銀行、信用金庫、日本郵政公社など預貯金を扱う金融機関のキャッシュカードの被害が対象」</blockquote>となっているため<br />\n郵便局は通帳でもキャッシュカードと同様にATMで引き落としできるため、保護されないと非常につらい。<br />\n他のメディアによると、ATMによる取引が対象となっているケースもある。<br />\n<br />\nまた、キャッシュカードも30日しか保護されないようです。前に本つぶやきでご紹介させていただいた「キャッシュカードがあぶない」では30日以上経過してから判明するケースもありました。<br />\nこのようにまだ不十分な法律ですが、非常にうれしいことです。<br />\n<br />\n二年後に見直しもあるとのことですので、そのときに<strong>通帳も対象に含めること、保護期間もクレジットカード会社並に広げることなどとなってくれればさらにうれしい</strong>と思います。','法律施行後も、暗証番号・キャッシュカードの管理は重要です。<br />\n他人にカードを渡して預金をおろしてきてもらうなど、ずぼらな管理は避けましょう。',1,2928,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0059',3,0,'2005-10-06 23:40:52','[Delphi] ファイルのドラッグ＆ドロップ','','<p>TControl を継承したオブジェクトはドラッグ＆ドロップ関連のプロパティやメソッドを持つが、これはそのアプリ内でDelphiのコンポーネントをドラッグする場合にしか使用できない。プロセス外からのドロップを受け取るには、Windows API を使用する必要がある。<br />\rドロップを受け取る Delphi コンポーネント側で、DragAcceptFile を使用して Windows にドロップを受け取ることを伝える。(ShellAPI を uses に追加する必要があります。)<br />\r下記は TForm1 でドロップを受け取るための例。</p>\r<pre class=\"brush: delphi\">\r  TForm1.Create(AOwner: TComponent);\r  begin\r    inherited;\r    DragAcceptFiles(Handle, True);\r  end;\r</pre>\r<p>これで、このForm上にファイルをドラッグすると、マウスカーソルがドロップ可能な形状になる。<br />\r実際にドロップが発生すると、WM_DROPFILES メッセージが発生するので、このメッセージのハンドラを作成する。</p>\r<pre class=\"brush: delphi\">\r  protected\r    procedure WMDropFiles(var Msg: TWMDropFiles); message WM_DROPFILES;\r</pre>\r<p>ドロップされたファイル名の取得は、DragQueryFile を使う。ドロップされた個数を調べるには、以下のようにする。</p>\r<pre class=\"brush: delphi\">\r  hDrop := THandle(Msg.Drop);\r  DropCount := DragQueryFile(hDrop, UINT(-1), nil, 0);\r</pre>\r<p>個々のファイル名の処理は、以下のようにする。</p>\r<pre class=\"brush: delphi\">\rvar\r  hDrop: THandle;\r  i: Integer;\r  FileName: PChar;\rbegin\r  FileName := StrAlloc(MAX_PATH);\r  for i := 0 to Pred(DropCount) do\r  begin\r    DragQueryFile(hDrop, i, FileName, MAX_PATH - 1);    // FileNameの処理\r    ListBox1.Items.Add(StrPas(FileName));               // 処理の一例\r  end;\rend;\r</pre>\r<p>MainFormのどこにドロップしたか知りたい場合は、DragQueryPointを使用する。<br />\r<em>※注意 ドロップ処理が終わってファイル名を格納した領域が不要になったところで使用したメモリの解放が必要。</em></p>\r<pre class=\"brush: delphi\">\rDragFinish(hDrop); \r</pre>\r<p>まとめると...</p>\r<pre class=\"brush: delphi\">\rprocedure TForm1.WMDropFiles(var Msg: TWMDropFiles);\rvar\r  hDrop: THandle;\r  i, DropCount: Integer;\r  FileName: PChar;\rbegin\r  hDrop := THandle(Msg.Drop);\r  try\r   FileName := StrAlloc(MAX_PATH);\r   DropCount := DragQueryFile(hDrop, UINT(-1), nil, 0);\r    for i := 0 to Pred(DropCount) do\r    begin\r      DragQueryFile(hDrop, i, FileName, MAX_PATH - 1);    // FileNameの処理\r      ListBox1.Items.Add(StrPas(FileName));               // 処理の一例\r    end;\r  finally\r    DragFinish(hDrop);\r  end;\rend;\r</pre>\r<p>Delphi2005 Win32, Delphi 2010で動作確認を実施。</p>','',1,12494,1,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-13 11:28:16','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('fit_navi2',3,0,'2005-10-09 18:25:25','フィットのナビが壊れた...その原因',null,'このブログで以前くろねこの乗っている<a href=\"http://www.jnishida.com/blog/archives/2005/09/post_65.htm\">ホンダフィットのナビが壊れた</a>...\nと書いたのですが、<strong>実は壊れたのはナビではなくて、マイクだった</strong>ようです。\n\nフィットに搭載されているインターナビは、ホンダではなく別のどこかの会社が作った製品のOEMのようなんですが、マイクはホンダ製と別々に制作しているようですね。\nそのためナビの制作会社から回答を頂いた後、マイクの取り寄せにさらに1週間かかり、修理期間は2週間に渡りました。\n\nぼちぼちマイクの故障は有るようで、ディーラーにはその情報は公開されているようなのですが、ユーザには公開されていません。<em>故障が発生しているのがわかっているのなら、1年点検などの点検時に点検項目として加えても良さそうなもの</em>と思うのですがいかがでしょうか？\n\nで、昨日そのマイク交換と修理に出していたナビの装着にディーラーに行ったのですが、そこでまた衝撃の事実が!!\nというほど大げさなものではないのですが...\nフィットのドアはスマートキーに対応している車種が有るのですが、その<strong>スマートキーに問題があったようです</strong>。具体的には運転席のドア側のセンサー内のオイルが溶けて漏れだしてくる可能性があるとか...\n\n来週もその問題の改善対策に、ディーラーに1時間かけて行くことになりました...\n10/9現在、ホンダのデータベースには、改善対策として登録されていないようです。\n\nとほほ...','ディーラーに行くこと自体は、ほとんど苦ではないのですが...\n何かと親切にしていただいていますし、対応してくれる整備のにーちゃんもいい人なので...\n\nしかし、ガソリン代と時間が...あとメーカーの問題なのにディーラーが苦しんでいる様子が頭に浮かんで...\nメーカーは自業自得なのでしょうが、損をするのはユーザーとディーラーなのでしょうか？\n\nかといって、リコールをさぼって無償交換を行かなかったら...という話をしていると...\n5年前のリコールをさぼってディーラーに行かなかったおじさんがいて、その車が壊れてしまったらしいです。メーカーからは何度もはがきが届いていたらしいですが、ずーっと放置だったらしいです。\n結局、修理しなかったことでエンジンがいかれてしまって、エンジン自体が交換でかな～りの費用が発生したらしいのですが、その費用の負担はディーラー持ちだったらしいです。その修理に2週間ほどかかったらしいですが、その間の代車費用もディーラー持ちだったようで...\n\nリコールするような車を作ったメーカーにそもそもの問題が有るとは思いますが、5年間も放置するなんて...ユーザの責任は全くないのですかね...\n板挟みのディーラーってかな～り大変なようです。\n<em>皆さんリコールがでたら、命も危険なので出来るだけ早く修理に行きましょう</em>。交換費用自体は無償なので...交通費や手数料などの諸経費は出ないのですけどね！\n',1,5265,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_EmptyQueue',3,0,'2005-10-11 18:33:41','[Excel VBA] 空の配列を管理する','','<p>VBA で配列の中身を順番に処理する場合、LBound から UBound をまでを順に処理します。<br />\rしかし、要素が 0 個の空配列は LBound も UBound も同じく 0 なので、必ず一度処理されてしまいます。</p>\r<p>空になる可能性のある配列を扱う場合には、配列の宣言後以下の処理を行っておくと便利です。</p>\r<pre class=\"brush: vb;\">\rSafeArrayAllocDescriptor 1, [配列]</pre>\r<p>この関数を使用するには、以下の定義文を Decralation に記述しておく必要があります。</p>\r<pre class=\"brush: vb;\">\rPrivate Declare Function SafeArrayAllocDescriptor Lib &quot;oleaut32&quot; \r   (ByVal cDims As Long, _\r    ByRef ppsaOut() As Any) As Long</pre>\r<p>この関数 (Windows API) を使用すると、UBound の値が -1 になります。<br />\rですから、</p>\r<pre class=\"brush: vb;\">\rfor i = LBound([配列]) to UBound([配列])</pre>\r<p>と書いても、空配列の場合には一度も処理されることはありません。<br />\rもちろん、要素がある場合には要素数の回数だけループします。<br />\r<br />\r要素数を求める場合には、以下の式で求めることができます。</p>\r<pre class=\"brush: vb;\">\rUBound([配列]) - LBound([配列]) + 1</pre>','',1,13654,1,0,'2005-11-10 18:33:41',0,'',0,1,1,0,0,'2010-11-03 01:08:02','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_71',3,0,'2005-10-12 23:46:32','キター！悪質懸賞サイト ネクシーズ',null,'今日も悪質懸賞サイトネクシーズより自宅に電話有ったらしい..\n\nくろねこは仕事で外に出かけているので、当然家にはいない...\n数年前、懸賞サイトで携帯番号書き込みしたら、スカパー!のセット当たったとかで、電話があった。\n当たったは良いけど、視聴セットは上げるが契約して月々払ってね～というもの。\n断っても結構しつこい。懸賞サイトに携帯番号書いたことは有るけど、ネクシーズなんかに応募した覚えが全くなかった。\n\n今回も、最近面倒で決まったところにしか応募してなかったのにな～。\nあ、携帯で応募したところが悪かったかな？最近思うのは懸賞サイトに広告出している懸賞サイトには信用できない懸賞サイトが入ってると言うこと。\nおおむね今使ってる<a href=\"http://www.i777net.com/\">アイセブンドットコム</a>、<a href=\"http://www.5050jp.com/\">5050jp</a>、<a href=\"http://www.biglobe.ne.jp/\">BIGLOBE のビンゴ</a> は大丈夫だと思って使っているのだが...\n\nネクシーズは、ググると良い評判は全く書いてないので、電話がかかってきたらきっぱり断った方が無難です。','',1,4553,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051013_tbs',3,0,'2005-10-13 22:43:57','キター！三木谷 TBS株大量取得！',null,'キター！予想どおりというか、予想より早かったというか...\r\n\r\nIT業界による放送業界の買収。似たもんだしね。方向も同じだしね。。。\r\n今のネット業界ってコンテンツってテレビの二次放送じゃないですか、コンテンツ制作能力が有ればネット配信が一時放送でも何の問題もないわけですよ...\r\nただ今だと、一般に普及している割合が低いからというのが問題ですが...\r\n放送業界の人間によるとどうも自分たちが一番だと決め込んでいるようで...\r\n今は放送業界がコンテンツ制作してますが、今後はコンテンツ制作と放送業界が分かれてくることは有るのでしょうか？\r\n予想どおりとか書いたのには理由があって、<a href=\"http://pc.watch.impress.co.jp/\">PC Watch</a> で■笠原一輝のユビキタス情報局■ <a href=\"http://pc.watch.impress.co.jp/docs/2005/0324/ubiq107.htm\">ライブドアショックは放送とITの融合を進める起爆剤となるか?</a>で予想されていたんですね。\r\n\r\nいつも PC Watch の記事はほとんど読んでいるくろねこなので、この記事を読みながら納得していた訳なんですよ。\r\n1年は先かな～と思っていたんですが、村上とか出てきたんでもうちょっと早い？とか考えるより先に来ちゃった...みたいな感じですか？\r\n\r\n敵対買収とか世間では言われているようですが、メディアもね自分たちが買収されてるからって敵意をむき出しにしすぎですよ。\r\n全然公正な立場で報道できてない。そんな気がしますね。だから家の嫁が「卑怯者ー！」って言うんですよ。\r\n<em>ちゃんとルールに従って、市場でどうぞ買って下さいと公開されているものを、買って何が卑怯なのか？\r\nいやなら、上場するな！。敵対買収がいやなら、株主と仲良くしていろ。株主の意向に沿った経営をしていて、適当な配当が有るならそんなに手放すことは無いでしょ。ポイズン・ピルより有効ですよ。</em>\r\n\r\nしかし、<em>海外のハイエナ企業に買収されて経営権強奪されるよりはかなりまし</em>だと思うのですが、何がそんなにいやだったのでしょうか？\r\n自分の会社が乗っ取られるのは何か身分が悪い。それは納得出来るんですが。社員にとってリストラも無いということは、職場改善される可能性も...あ三木谷や堀江もんならそれはないか...\r\nでも、会社に資本が増えると言うことは会社が活性化して良い仕事が出来る機会が増えると言うもんですよ。どうせ買収されなくても、いらない社員はリストラ対象ですし...\r\n\r\n個人的には楽天ってあんまり好きじゃないですけどね。サイト見にくいし、探しにくいし、良いコンテンツもすくない。\r\n最近システムのずさんさが発見できましたが、利用のしやすさではアマゾンの方が全然利用しやすいですね。\r\n\r\nあ、話それちゃいましたが、日本企業が大きくなって世界に羽ばたいていって、世界で利益を稼いできて日本本社に利益を落として、税金たくさん納めてくれると暮らしやすくなるな。','しかし、TBS社長の発言はかなり大人の発言でしたね。敵対買収について予習が出来ていたということでしょうか？\r\nしかし、TBS社員の大人げない発言は、頭の悪さを感じますね。ああいう社員ばかりだと社内での議論も感情論になって、前には進まんでしょうな。\r\n\r\nしかし、今回の買収や村上の買収についてもそうなんですが、法律の抜け穴をついたような感じもありますね。\r\nあと、公共性の強い企業の買収はしょっちゅう起きるとモラルハザードが起きる可能性が有りそうで怖いですね。',1,3206,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_72',3,0,'2005-10-14 23:09:54','総連系団体幹部逮捕、薬事法違反容疑',null,'なんか押し合いへし合いになっていたようですが、犯罪国家の北朝鮮人なんか強制送還した方が良いのではないか？\n\nなんか、一部で恫喝する朝鮮人と思われる人が写っていたが、これが科学者？\n薬事法違反だそうだが、COCOM規制違反容疑並びに拉致監禁容疑もあるようで、そちらの方の犯罪でも多くの北朝鮮人を捕まえ強制送還する方が日本のためになるだろう。\n無論、何の罪もなく暮らしている北朝鮮人は別に日本にいてもらってもかまわないのだが、朝鮮総連と日本政府間で行われたらしい密約による<a href=\"http://plaza.rakuten.co.jp/kawamurakent/diary/200507180000/\">既得権益</a>が本当であるならば、そのあたり見直すべきだろう。\n\nこの事件が、本当の意味での日朝の国交にとって正常化になることを期待する。\nしかし個人的には、国交が正常化が望めない場合には、国交断絶・在日北朝鮮人強制送還でもかまわないと思う。送還を希望しない場合、帰化という選択肢もあるのだから。\nそのぐらい、危険の多い国だと考えている。','',1,3143,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_10',3,0,'2005-10-17 00:51:42','マルチパワーステーションを買った',null,'ヤフーオークションで買った<a href=\"http://www.yamatani.co.jp/radio/5600.html\">マルチパワーステーション</a>が届いた。\n\nこのマルチパワーステーション、スリムなボディに多彩な機能を詰め込んだ優れものなのだが...\n定価 6,300円で、最近はやりの防災用品としてまたアウトドア用品として結構売れているようだ。\nしかし、壊れやすそう。\nリンク先の写真を見ていただきたい。蛍光灯部分が開くようになっていて、手元を照らすのに最適な形になっている。しかし、全体的にギミックが堅いのと、ABS樹脂が薄いようで壊れそう...\nちょっとひねるとパッキっと割れそうである。\nラジオは内蔵アンテナだからか若干不安定。手で持って合わせた後離れようとすると、体が無くなったために寄る電波の回折な無くなるためか、シンクロランプが消えノイズが増えることが多い。\nまた、蛍光灯も懐中電灯も若干暗い感じがする。もうちょっと明るい方が良いかなと思うが、防災用品だと電池の保ちとかの関係もあるのかもしれない。先ほどの壊れそうと言うのも重量を削減した結果かもしれない。このあたりはバランスがむずかしいのかも...\n電源は、4種類あって、通常は3種類(ダイナモ、ソーラー、乾電池)で別売のACアダプタを買うと1つ増えるといった感じ。\nしかし、全体的にあると便利そうである。うたい文句どおり、防災用品としてアウトドア用品として活躍しそうな一品である。','販売元の株式会社ヤマタニ  ここに AU の新 WIN 端末と DOCOMO の FOMA の対応状況の問い合わせをした。\nしかし、約2週間たった今日も回答はない。かなり適当な会社のようだ。\nこちらのメールフィルタに引っかかった様子はないので、問い合わせが向こうのメールフィルタに引っかかった可能性はあるが...\nヤフーオークションで安ければ、4,000円弱から買えるようだ。',1,3992,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('delphi2006',3,0,'2005-10-18 23:08:03','Delphi2006不買運動？',null,'DelWikiにてDelphi2006不買運動が起きているようです。\n本日、その情報がDelphiMLにも流れていました。\n\n原因は、Delphi 2005の品質がすごく悪いからというものの様ですが、くろねこ的にはDelphi 2005よりもDelphi 8の方がもっとひどかったと思います。\n確かにDelphi2005の品質もかなり低く、Delphiの先行きを心配している今日この頃なのですが、いっそのことDelphiを捨ててMS C#に乗り換えようかと言う考えもあります。\nまあ、年を取ってなかなか腰が重くなってつらいのもたしかですが...\n .Net 2.0になってアセンブリもかなり充実してきた MS に比べ、Delphiは2006でも.Net 2.0に正式対応予定はなく、2007になるようです。\n個人的には2006はパスで2007...2007はちょうどWindows Vistaと出荷時期がちょうど重なるようです。\n重なると、Vistaはかなり今までのOSと異なるようなので、また不安定になる可能性が大きくなるかもしれません。すると 2007 もパスで2008に...\n\nこうなると、2008まで買えない。\n100% 完璧なのは無理だとは思いますが、もうちょっとやる気を出してほしいです。\n特に Borland 日本法人なんか何してるんだろうと本気で疑う位何してるのかさっぱりです。\n\nDelphi 5や6の頃が懐かしいです。','Delphi8 は.Net 1.1 spがでたらそれ以降は全く使えない代物でした。\n1.1sp のパッチを導入しなければ OK なのですが、セキュリティ上そういうわけにも行きませんでした。\nとある情報では、Lib を再構築することで回避できる様なことが書かれていましたが、くろねこの環境ではうまくいかず。公式でも無いために不安の残るものでした。\nDelphi史上最悪の製品でしたね...',1,4561,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0060',3,0,'2005-10-18 23:39:00','[Delphi] CoInitializeが呼び出されていません','','<p>Delphi で Excel の機能を使う場合に、CreateOleObject など COM の機能を使って呼び出すのだが、この際に下記のメッセージが表示されることがある。</p>\r<blockquote>CoInitializeが呼び出されていません</blockquote>\r<p>GUI アプリケーションを作っている場合には、Forms ユニットあたりで CoInitialize が呼び出されているのだろうが、CUI アプリだと100% エラーが表示される。<br />\rこのため、CUI アプリケーションでこのエラーメッセージを回避するには、CoInitialize を呼び出すなどの対策が必要になる。また、CoInitialize と対で CoUninitialize を呼び出さないといけない。<br />\r実際の対策は実に簡単で、</p>\r<ol>\r    <li>uses に ActiveX を追加</li>\r    <li>COM 機能を使用しているコードの前に CoInitialize を追加</li>\r    <li>COM 機能を使用し終えたところで、 CoUninitialize を追加</li>\r</ol>\r<p>COM を使うとその部分は、結構長くなることが多いと思うので、クラス化して、その Create と Destroy に それぞれ CoInitialize と CoUninitialize を追加するのがオススメである。</p>\r<p>※複数回 COM 機能を使うときにも、全体を CoInitialize と CoUninitialize で囲むように追加すれば OK !</p>','',1,20351,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-07-13 10:40:52','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_65',3,0,'2005-10-19 00:12:43','メインぺージの再構築で失敗する',null,'Movable Type 3.2 で FAQ を更新するようになってから、効率を追求してモジュール管理を始めた。\nつぶやきも(最初のブログ)、FAQ(2個目のブログ) もほとんど同じ構成なので、同じ名前のモジュールがほとんどでテンプレートもほとんど同じ。\nだから、ほとんどコピーで済むと思っていたのだが...\n\nFAQ の方だけが、新規エントリ追加後から再構築できなくなった。エラーが起こったのか、真っ白のぺージが表示される。\n<a href=\"http://www.sixapart.jp/support/faq_mt_technical_0012.html\">新規ウェブログ作成後にサイトの再構築を行った際にエラーが起こる</a>\nの問題かな？とも思ったが、この問題だとエラーコードがでるし、違うみたいだ。\nしかも、良く検証してみるとエントリのぺージと、再構築のぺージは再構築できず空白のぺージが表示されるが、テンプレートのぺージからだけは再構築が可能。\n場所によって呼び出す、スクリプトが違う？あと気になったのは同じモジュールを使用している「カテゴリ」のテンプレートの再構築は何の問題もなく動いていること。\n\nPHP のプログラムをデバッグ出来るスキルはないし...当分このままかな？はぁあぁぁぁぁ...','※つぶやきは最初のブログでID=1、FAQは2個目だが3.1の時にうまくできなくて悩んだ結果ID=4になってしまった。',1,3036,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051020_nhk',3,0,'2005-10-20 23:13:57','NHK 受信料の請求来てませんか？',null,'<p>家には何度か来てますね...<br />\r<br />\r最後に、</p>\r<blockquote>民事手続きによる受信料の支払い督促の活用などについて検討し...</blockquote>\r<p>と書かれていて、まるで脅しですな...<br />\r<br />\rたしか、あの不祥事以来払ってないので、昨年の8月から払ってないことになりますが、<br />\rその間<strong>テレビが壊れてたとか言われたらどうするんでしょうね</strong>...<br />\rテレビが壊れてたという<strong>立証責任はどちらに生ずるのでしょうか？</strong>ここら辺がすごく疑問です...<br />\rというかですね、たしか NHK 料金を集金で支払ってたんですよ、<strong>集金に来ないと言うことは請求権の放棄じゃないですか？</strong><br />\r<em>それを今更払えって言われても...ええ、何度か受信料の支払い用の振込用紙は来ましたよ。<br />\rでも、支払い方法に集金を選択しているので、当然集金に来てくれるんだろうと、首を長くして待ってたんですよ。</em><br />\rあわよくば、請求権の時効が成立するまで...成立する前に請求して来やがった、ちょっと残念。<br />\r<br />\rまた、思うんですが最初に世帯持って引っ越ししてきたときには、「２ヶ月前の分から払ってください」って言われたんですよ。<br />\rだから、その通り払いました。でもよく考えると、その債務って誰の責任で無くなったんでしょうね。<br />\rNHK 料金て世帯ごとに発生しているので、4ヶ月分くらいは得したんじゃないか？と思うんですが...<br />\r料金が世帯ごとっていうのは不公平ですよね。受像器があったら...ってテレビしか確認しないのも変ですよね.だって<strong>ボーダフォン持ってても払わなくてもいいってボーダフォン言ってました</strong>よ。<br />\r何で？って聞いてもちゃんとした理由は教えてもらえませんでしたね。<br />\r全然<strong>公平じゃない料金システムを勝手に決めて、金払え！というのは、憲法の平等権に反していないのでしょうか？</strong><br />\rまあ、<em>集金に来たら今月分からなら払ってあげます</em>。今までの分については請求に来なかった方にも責任があるし、疑心暗鬼にさせるような集金人を採用してたのも事実でしょ... それじゃあ、危険すぎて払えないよ...</p>','<p>NHK 料金について調べたら興味深いサイトがあったのでリンクしておきます。<br />\r<a href=\"http://www.ypp.info/cresarabank/05_money/105-3.htm\">■　NHK　～料金払ってますか</a>　</p>',1,5520,0,3,'0000-00-00 00:00:00',0,'<a href=\"http://www.ypp.info/cresarabank/05_money/105-3.htm\">■　NHK　～料金払ってますか</a>',0,1,1,0,0,'2008-12-16 12:34:06','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051020_nhk2',3,0,'2005-10-20 23:13:57','NHK 受信料を支払わなくても良い方法って無いかな？',null,'<p><strong>放送法による NHK との契約義務は、受像器が有るのか？無いのか？で決まっている</strong>ようです。<br />\r<br />\rもうちょっとよく考えると、受像器はテレビであってパソコンのモニタではありません。<br />\rもちろん、アンテナでもありません。<br />\rテレビとパソコンのモニタの違いって、くろねこ的に考えると<strong>放送を受信できるかどうか</strong>だと思うのです。<br />\r両方ともテレビの画像を写すことは出来ますが、放送を受信できないのですね。<br />\rじゃあ、放送って何？と考えると NHK ついて言及しているので、NHK 放送だと思うんですね。<br />\rということは、<em>NHK 放送を受信できないテレビを買ったら、契約義務は発生しない</em>。つまり<em>支払義務が発生しないということにならない</em>でしょうか？</p>\r<p>どこか、NHK の写らないテレビを作ってくれませんか？</p>\r<p>どうせくろねこはテレビ見てないので、テレビ自体無くても問題ないのですが...<br />\r嫁がテレビ見るようなので...</p>','',1,3136,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'2008-12-16 12:28:35','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('nhk3',3,0,'2005-10-21 23:14:38','NHK の請求って...',null,'昨日書いたように、NHK 受信料の請求が封書で来たんですが...<br />\n<br />\nいろいろ周りに聞いてみると、受信料払っていない世帯でも、請求が届いているところと届いていない所があるようです。<br />\nまだ、届いていないだけなのかもしれませんが、調査の結果思うに、<strong>ずーっと払っていないところは、世帯の確認が出来ていないので、請求書の発行すら出来ていない</strong>のでは？<br />\nという結論に至りました。<br />\n<br />\nやはり、不公平な集金方法ですな...<br />\n日々技術も進歩しているので、<br />\n<ul><li>私的使用複製などと同様の方法(DRMなど)で番組単位で課金する＝使った分だけという考え</li>\n<li>一人あたりいくらで税金とする＝NHK を道路などと同じように共有財産と考える</li>\n<li>NHK を廃止する OR 民放にする＝公共放送はいらねという考え方</li></ul>\nのどれかがよいと思いますが...<br />\n皆さんはどう思われますか？','',1,2718,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo051025',3,0,'2005-10-25 23:55:17','Xenepic Online ～ ゼネピック オンライン ～',null,'<p>最近、ゼネピック オンライン にはまりました</p>\r<p>ウルティマオンラインよりも絵柄がかわいいですね。</p>','<p>ウルティマオンラインが海外ソフトでアメコミ風？みたいな雰囲気もあるのですが、ゼネピック オンライン は日本的な絵柄です。</p>\r<p>このゲーム、レベル制でレベルが上がるにつれてキャラが強くなっていきます。</p>\r<p>また、ドラクエとかと違って死んでもお金もアイテムも無くならない代わりに、次のレベルまでの経験値が10%減ります。</p>\r<p>これが意外とかなりつらいです。</p>\r<p>息子にじゃまされながらやるので集中できないし、死んだらまた経験値減ってるし...</p>\r<p>最悪の展開に...</p>\r<p>しかも、敵の強さも伏兵的強さのモンスターがいるので、これまた最悪。</p>\r<p>とりあえず、今はラウタの谷あたりで死にまくってます。</p>',1,3956,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('post_68',3,0,'2005-10-29 11:39:18','ひさびさのワン切り',null,'<p>ひさびさのワン切り、掛けてくるなちゅーねん。<br />\r<br />\r0758131111<br />\r携帯キャッシングというそうな...<br />\rAU、TU-KA-、ドコモの利用者専用の金貸し業者らしい<br />\r即日振込...言ってたが今はどこでも即日...<br />\rやはりいらん.<br />\r迷惑電話は撲滅させたいが、電話事業者の「迷惑電話撃退サービス」は有料だから使いたくない...<br />\r最近はセキュリティに金がかかる世の中なのね...</p>','<p>しまった、電話して問いつめるのを忘れてた... ちゃんと、所在地、金融業者登録番号と登記簿情報などの情報を聞いて怪しかったら調べて、問題があれば警察に届けなきゃ...</p>',1,2675,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'2008-11-21 14:28:55','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_73',3,0,'2005-10-29 12:12:52','小規模企業共済に加入した',null,'小規模企業共済に加入した\n\n月額1万円、年間12万円...\n次年度から年払い奨励金分が安くなるみたいだけど、いくら安くなるかわかりません...\nいくら安くなるか書いてたかな？\nしかし、これで万が一の時の蓄えが出来て一安心といいたいところですが、万が一の時はこんなもんで足りません...\nしかし、これで年間1万2千円程度税金が安くなる...\n\nついでに確定拠出年金への加入を勧められましたが、年金基金とどっちがお得なんでしょうかね？\n1年に1度掛け金が変更できる制度が、年金基金にもほしいです。','',1,2600,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('nhk_1',3,0,'2005-10-29 12:29:48','NHK って合法？',null,'NHKってそもそも合法？ごうほうなんでしょうな～。\n\n<em>民法には「契約の自由」という権利が示されているようだ。\nしかし、放送法には「契約の自由」はなく、「契約の義務」のみが示されている。</em>\n\n放送法の主旨は、国民全員に3ch以上の放送を提供すると言うものじゃないかと思うのだが、民法でも衛星放送なら3ch受信できる世の中じゃないの？\n大都会で電波障害が...という話ならそのあたりにはケーブルテレビも有るだろうし、そもそも電波障害を起こしているところが責任を持って各戸にケーブルを引いて有るべき姿に戻せば、3ch など余裕。\nやはり、<strong>NHK など無くても十分である</strong>。\n\nNHK いらん.民放で十分.\nこれだけ不正＆不払いが多くてもやっていけてると言うことは、きちんと国民全員から受信料を取得できたらどれだけの金余り？\n受信料の設定は不払いを見越した金額に設定されてない？\n\nさらに突っ込むと、公共放送に必要な透明性と公平性が全くない NHK など全然いらない...\n<em>NHK 新生プランでも「視聴者のために」を全面に押し出しているが、視聴率だけ取れればそれで良いという考えなら、放送内容は前のようにでっち上げの嘘八百になるだろうし、公平性を貫いていない NHK は尊皇派だし...</em>\n天皇について報道するときに、<strong>陛下</strong>はいらん...なぜ象徴を敬う必要がある？\n\n議員の間でも、NHK の存続に疑問を持つ人間がいるようだ...\n彼らはNHK の民営化を考えているようだ！','',1,2308,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo051031',3,0,'2005-10-31 22:28:27','「ときめきメモリアルONLINE」β２テスター当選おめでとうございます',null,'<p>本日、「ときめきメモリアルONLINE」&beta;２テスター当選おめでとうございます というメールが届いた...</p>\r<p>おっ、先日登録した&beta;テスターの応募が当選したようだ。<br />\rUCGO 以来三つ目の&beta;テスターになる「ときめきメモリアルONLINE」、とってもネカマがおおそう...<br />\r人のことは言えませんが...</p>\r<p>ゼネピックも&beta;テスターになって不具合報告を送ったし、ときメモもバグ見つけますか...って 自分のプログラムの不具合見つけなさいって！ツッコミが飛んできそうです！</p>','',1,4101,0,0,'2005-11-30 22:28:27',0,'',0,1,1,0,0,'2009-11-19 00:09:15','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_74',3,0,'2005-10-31 22:33:10','おもろい...',null,'今日、昼休み何を調べたくてググってたのか...それは忘れたんだけど、\n何を調べてたか忘れるぐらいつぼにはまったぺージが...\n\n<a href=\"http://www.e-pub.info/lineup/01k1102.htm\">『たこ焼き子のネットでタコタコ儲けまひょ～♪』</a>\n\nいやー、この人「ダンナのおとっつぁん」が倒産、当然「ダンナ」もプウ...\nそんな不幸をいとも簡単に笑い飛ばすかのような表現がつぼにはまった...\n\nこの人、Webデザイナーなのだがその過程で身につけたノウハウをPDFにして販売しているみたい。\n\n自分のサイトのアクセス数を上げてみたい人は買ってみては？\n20%儲けるアフィリエイトサイトへのリンクもあり、儲ける人のためのサイトのようです。','',1,2754,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_75',3,0,'2005-11-04 07:55:33','迷惑メール',null,'以下のような迷惑メールが、良く届きます。\nこれって、本当に怪しい...\n本当に本文どおりの内容なら有ってみたいと思うが、100%無いんでしょうな～。\n\n以下迷惑メールの内容 ----\n件名：Re:最終確認お願いします。\n本文：\n最終指名が入りました。詳細になります。\n☆名前：井上里美（27）☆\n☆あなた様への援助額１０万円☆\n☆タイトル：今週は会えない？\n☆メッセージ：☆\n今週の有給は貴方と過ごしたいのに・・・\n簡単にエッチしたいとか言う女は嫌いですか？\n\nhttp://www.luv2006.tv/?hv0511\n☆完全無料登録です。サイト内(登録、メールのやり取りすべての利用,\n検索～出会いまで自由解放しております。)\n※直電話機能をご用意致しましたのでご利用下さい。\nこれは貴方様限定のお知らせですので他者には絶対に教えないで下さい！\n不法な請求は一切ございません。\n\n代表　山口　由美子\n\n\n拒否はこちらに\nhappymail2005simei@yahoo.co.jp\n\n--- ここまで ---\n\n','ところで、誰にも教えていない、プロバイダしか知らないメールアドレスに届く迷惑メールも有るのですが...\nどこからアドレスを仕入れるのでしょうか？とりあえず、アドレス変更しましたが...\n\n以下、迷惑メールの内容 ----\n件名：最近、欲求不満なの、これからオ○ニーします\n本文：\nこの広告は「※未承諾広告」です\n\n\n※　18歳未満の方のご利用はご遠慮下さい\nhttp://0hi.co.uk/25JvN5iIPnSlG/\n\n最近、欲求不満です。\nHなことを夢にまで見るようになりました。\n仕事中は真面目なOLしてますが、頭の中はHなことで一杯です。\n毎日のようにオ○ニーしてます。\nHなことを考えるだけで、お○んこはヌルヌルに濡れています。\nSEXしたいです。太いち○ぽが欲しい・・。\n私のスケベなお○んこを太いち○ぽで突いて欲しい。\nもう我慢出来ません。これからオ○ニーします。\n\n\n提供は【ひとり】です\n\n配信拒否の方はこちら\nkyohi9kie82z@yahoo.co.jp\n--- ここまで ---\nもう、送らないで...',1,2513,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_76',3,0,'2005-11-05 18:23:26','くろねこのつぶやき み～つけた！',null,'別の人が書いてるブログで、「<a href=\"http://kuroneko.s28.xrea.com/blog/\">くろねこのつぶやき</a>」をみつけました...\n\nなんか全然向こうの方がいい...挿絵が入ってる...\n何か挿絵も文章も、ふんわりした感じで優しい感じがいいです。\n\n何か今回は携帯電話がつつぶれたようです。\nくろねこの携帯も昔同じようにつぶれたことがあります。AU の TOSHIBA A5501Tだったと思うんですが...\n一回電源を切ると直ったんです。AUショップに行ってROMに修正パッチを当ててもらってなおした様に思います。\n携帯メーカーはいっぱい修正プログラム持ってますんで、買い換える前にショップに聞いてみた方が良いかもしれませんね。','',1,3094,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('blog_pet',3,0,'2005-11-05 18:34:53','Blog Pet を導入してみました～',null,'おととい、とあるブログで見つけたBlog Petが本で紹介されていたので、早速うちのブログにも付けてみようかと思って本屋さんから帰るなり設定してしまいました。<br />\n<br />\nすごく簡単な手順で導入できました。<br />\nステップは、仮登録と本登録と大きく二つに分かれます。<br />\n以下仮登録方法です。<br />\n<ol>\n<li>Blog Pet 公式サイト <a href=\"http://cousagi.yomiusa.net/\">http://cousagi.yomiusa.net/</a> に行く</li>\n<li>上の方にある 「Blog Petを飼う」というボタンをクリック</li>\n<li>利用規約を読んで、納得したら「同意する」を選んで、「次に進む」をクリック</li>\n<li>次にペットを選んで、「次に進む」をクリック</li>\n<li>ユーザ名、パスワードなどを記入後、「次に進む」をクリック</li>\n<li>仮登録完了のはず...</li>\n</ol>\n本登録は、仮登録完了のメールアドレスが届くので、そのURLをクリックしてサイトに関する情報を入力すれば登録完了です。<br />\nブログ一つに一つのペットになるようですね。複数のブログを持ってる人が一つのペットを飼うことは出来ないみたいですので注意。<br />\nその本には、Blog Pet 以外にもいろいろブログの使い方を広げてくれるサイドバーツールが紹介されていました。<br />\n書店で見つけたら覗いて見てみると良いかもです。','クリックするたびに、何か違うことをしゃべってくれる...\nサイトから言葉を覚えるらしいが、このペットもいずれは毒吐きに...やばい',1,3068,10,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051105_free_virus_check',3,0,'2005-11-05 19:08:11','ウイルスチェック無料でしない？',null,'<p>ウイルスチェックについて、ウルティマオンラインで知り合った友人から何が良いかと相談を受けた。</p>\r<p>以前に、マイクロソフトで Windows XP SP2 が公開されたときに対応ソフトを調べた。その際に見つけたぺージリンクを保存しておいたので、それを見ながら「無料でいいんじゃない？」と思わず...</p>\r<p>くろねこは現在シマンテックのノートン・インターネットセキュリティを使っているが、2006になってからさらに重たくなった様子...</p>\r<p>旧型や、ノートタイプだと重くて使えない。デスクトップじゃないと...</p>\r<p>デスクトップでも起動が重いのはウイルスチェックのせい？仕事場でお帰りしている PC Celeron 544MHz？ で非力で非力で...</p>\r<p>起動に5分以上かかってしまう。自宅のだと起動はそれほど気にならないが、嫁は遅いという。</p>\r<p>嫁曰く「何で電源入れてもすぐ使えない？」、パソコンは家電じゃないからな...</p>\r<p>割り切ってしまえるのも、PC を使い始めて10年以上なので、すでにこの業界に洗脳されているのか...</p>\r<p>ところで話は戻って、無料でウイルスチェックしてみたい人、いろんな会社のウィルスチェックを試してみてから買いたい人は、以下のぺージでお試し版を使うといいだろう。</p>\r<p>Microsoft Windows セキュリティ センターのウイルス対策パートナーのぺージ：<a href=\"http://www.microsoft.com/athome/security/viruses/wsc/ja/default.mspx\">http://www.microsoft.com/athome/security/viruses/wsc/ja/default.mspx</a></p>','',1,3443,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.microsoft.com/athome/security/viruses/wsc/ja/default.mspx\">http://www.microsoft.co...</a>',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('nhk_2',3,0,'2005-11-06 02:43:09','NHK 職員が連続放火？',null,'くろねこは、<a href=\"http://www.jnishida.com/blog/archives/2005/10/nhk_1.htm\">NHK って合法？</a>において以下のように書いた。<br />\n<blockquote>NHK 新生プランでも「視聴者のために」を全面に押し出しているが、視聴率だけ取れればそれで良いという考えなら、放送内容は前のようにでっち上げの嘘八百になるだろうし、公平性を貫いていない</blockquote>\n昨日(11/5)、そんな NHK で不祥事が起きた。 <br />\n<blockquote>NHK 放送局記者が放火未遂容疑で滋賀県警・大阪府警に逮捕されたうえ、連続放火を認める供述を始めた</blockquote>\nというものだ。<br />\nこんな不祥事を重ねているようでは、新生プランなど水泡に帰すし、そもそも本当にプランを考えたのだろうかという疑問すら出てくる。<br />\nどうせトップが対面だけを考えて作ったプランなのだろうが、NHK も社風としてそのような風土が出来てしまっていると言うことか。企業風土として根付いているのなら、同様の問題は今後も三菱自動車の時のようにまだ出てくるであろう。<br />\nNHK の場合、三菱自動車よりひどいのは、<em>三菱自動車の時には消費者側に契約の自由があった(不買の選択)</em>、しかし <em>NHK の場合には、消費者側に契約の自由がない</em>。<br />\n消費者として、NHK に対して消費者が課すことが出来る最も重い裁きを下すことが出来ない。<br />\n<br />\n消費者側は、NHK に抗議をすることが出来るが、抗議したところでNHK は痛くもかゆくもないはずだ。<br />\nなぜなら NHK は天下の放送法という悪法に守られていて、消費者は受像器を持っている限り受信料を支払う義務が発生する。仮に不払いをしても、NHK が民事訴訟を起こせば勝てるかどうかは非常に不透明である。<br />\nしたがって、議員を通じて国会に放送法の廃案を求めることが最大の武器になるが、この方法にはかなりの時間がかかるし、NHK に既得権益を持っている議員もいるだろうから、反対も有るのだろうか？<br />\nどちらにせよ、NHK の不祥事は当分続きそうだ...','',1,3532,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('blanket',3,0,'2005-11-06 20:43:09','毛布は掛け布団の上？下？',null,'くろねこは寒がりなので、すでに夜寝る際には毛布を利用している。\n\nくろねこは、毛布を敷き布団の上と、掛け布団の下に一枚づつ敷いて毛布の間に寝るようにしている。\n今のようにまだそれ程寒くない場合には、どちらかの毛布が無くなり一枚になっている。\n\nしかし、家の嫁に言わせると、毛布は掛け布団の上に載せるものだそうだ。\nそちらの方が暖かいらしい。本当か？やってみているが、特に暖かい雰囲気は無いのだが...\n皆さんはどっちですか？','',1,3928,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_78',3,0,'2005-11-08 22:09:19','卒業生の進路先情報などを在校生に見せてはならない というのは間違いでしょうか？',null,'インプレスにて<em>「間違いだらけの個人情報保護」</em>と言うブログが始まっています。\nいくつか疑問点もあるのですが、気になった一点を例にくろねこの考えを書いておきます。\nまず、当然ですが上記ブログの記載者は弁護士ですが、<strong>一弁護士の個人的判断ですので、実際の裁判などでの法律の解釈が異なる可能性も有る</strong>と考えています\nしかし、おおむねくろねこよりも正しいことが多いでしょう。\n\n<a href=\"http://internet.impress.co.jp/kojinjohoblog/archives/2005/10/post_40.html\">卒業生の進路先情報などを在校生に見せてはならない</a>についてです。\nくろねこは、特定の個人がどこの就職してどのような地位についているか、いたずらに公開すべきではないと考えます。\n\n個人情報保護法以前に<strong>人には知られてくないこともあり、この件はそれに該当すると考えられます</strong>。\nたとえば、卒業生の情報を在校生に見せることで卒業と同時に終わるはずのいじめが継続したり、そこから漏れた個人情報が卒業生同士でのゆすりたかりに使用される可能性もはらんでいます。\nまた例えクラスメイトであっても中に仲の悪いものも良いものもおり、一概にコミュニティと同様に考えるのは早計です。\n例に出てきていますが<strong>コミュニティというものは、判断能力のある大人が自分の意志で参加し、またそのコミュニティに提供する情報は自分で取捨選択したもののみ</strong>です。\n学校ではまだそのような価値観の無い世代(中高生、とくに中学生)である場合もあります。\n\nそもそも、学校は商業施設で無いという考えにも同意しかねます。そもそも私立の学校は営利団体ですし、学校の教師は子供を顧客としてとらえることがないためか、品質の悪いサービスしか提供できない。そもそも、上からものを言うだけでは教育ではない。\nそういう教育者が蔓延している現在の教育機関では、<strong>個人情報も適切な扱いを受ける可能性が低い</strong>と考えられることから、<em>卒業生の進路情報については統計的情報にとどめ、必要に応じて本人に許可を得るべきでしょう</em>。','学生の頃に思ったことなんですが...\nたしか\n中学入学してすぐの頃、国語の先生がとある生徒の名前が読めなくて間違ったんです。\nそしたら、その生徒は当然訂正をしようと、先生に対して意見しようとしたら、その先生が、こういったんですよ。\n「名前を呼ばれたらすぐに立つ、それから発言しろ！」と。さらに、名前を間違ったことにはふれず、「順番で自分が呼ばれていることはわかるだろう！」と言ってました。\nそのとき、なんで事前に調べてこないのだろうかと思った訳なんですよ。\n入学時の資料にちゃんと振り仮名を振ってあるわけですから、なんと予習してくる気があったらちゃんと読めたはずなんです。\nまあ、その先生たしか大学院にも籍を置いてるとか置いてないとか言ってましたが、自分は予習しないが宿題はたくさん出しましたね。しかも、やってこないとめちゃ怒ってました。\nそのくせ、自分は教え子と結婚しているとか、そんな変な先生でした。\n\n学校が法人？としての利益だけを追求するようになっても困るんですが、生徒の権利を守るとか学校の良さを競う(進学率にとどまりません)様になってもらわないと、質は低下する一方だと思うんですよね。\n\nまた、学校でも金銭関係や法律関係を含めた社会のことについて、もっと幅広く教育を行っていくべきではないかと考えています。',1,3158,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('kappa',3,0,'2005-11-13 21:48:01','かっぱ寿司にて',null,'久しぶりに<a href=\"www.kappa-create.co.jp/\">かっぱ寿司</a>にすしを食べに...\nあまりすしが好きでないというか、生ものがあまり好きでないのだが...\n\nすしを食べてそろそろおなかもいっぱいになってきた頃、キャッシャーの方がうるさくなる。\nスウェット姿の男がキャッシャー担当に怒鳴っているらしい...\n\n話の内容を聞いていると、だいたいの内容が伝わってきた...\n大まかにまとめると以下のようになる。\n\n客(スウェット姿の男とその婦人を含む程度の家族)が食べたとする、商品の伝票に通常でない皿(通常は105円)が18皿あった。\n食べた記憶のないその客がキャッシャーに対して、明らかにおかしい伝票の内容をそのまま処理しようとした、店員は客をだます詐欺行為ではないかと訴えている。\nもし気づかず帰ったらどうするんだと。ただ「はい」としか答えない店員にとても激怒していた。\n\n客の怒りは当然である。\n客は通常でない皿が147円であると怒鳴っていたが、そのような皿はメニューにないので、たぶん値段は異なるがケーキなどのデザート類か、もしくは茶碗蒸しの皿なのだろう。\n仮に三人構成の家族が食べたとしたら一人あたり6皿、二人だったとしたら9皿食べていることになる。\n食べられないとは言わないが、それだけ食べるとすしを食べにきたようには思えない。\n明らかにそのまま会計をするには躊躇する内容である。\n\n実に興味深いのは、このような明らかにおかしい内容の伝票を会計しようとした際に、何のチェック機構を持たない会社の体制＆レジシステムである。吉野屋だと客の人数などの情報を入力するレジシステムになっているようだが、そのようなシステムではチェックも可能であろう。独りどんぶり九杯も食べる客は早々いないであろうから、何らかの警告がでても良さそうだ。\n回転寿司屋に話を戻すと、レジ位置と伝票を書く場所が異なるので確認が難しい。\nしかも回転すしやになると、混んでくると席の確保が忙しくすぐに食器を片づけてしまうかもしれない。\nそうなると客側が食べた覚えはないといっても、証明することは難しくなる。\nこのような場合に店舗側はどの様に対応していくのか、その答えを持っていないことがわかってしまった。\n\n同様のシステムというか、すぐに食器すらも片づけてしまう居酒屋の場合、もっと間違いは発生する可能性は高く、詐欺だと言われる危険性はかなり高いのだろう。まあ、飲んだ方が記憶が曖昧になるので、そこに突っ込まない(突っ込めない)可能性も大きいのだが、\n\nところで、寿司屋でもめたスウェット姿のおやじ警察を呼んで処理していたが、結果はどうなったのだろう非常に気になるところであるが、明らかに故意として認められるような事象でも無いので、詐欺の立件は難しいと思うのであるが、是非がんばっていただきたい。','',1,2703,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_Compile',3,0,'2005-11-14 23:02:20','[Excel VBA] コンパイルする',null,'<p>マクロ記録などを応用して作った Excel VBA マクロ。<br />\rきちんと文法どおりできているか、実行するまでわからないと思っている人も多いのでは？</p>\r<p>Excel VBA はデバッグメニューの一番上に[VBA Project のコンパイル]があります。</p>','',1,8270,1,0,'2005-12-14 23:02:20',0,'',0,1,1,0,0,'2009-11-15 22:53:52','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_FindCell',3,0,'2005-11-15 10:10:14','[Excel VBA] 特定条件を満たすセルを見つける','','<p>Excel で以下の様な番号と名前のデータがあったときに、番号をキーにして名前を取得するようなことは多いだろう。<br />\rこのようなケースを処理するためには、Find メソッドを使用するとうまくできる。<br />\r<em>特定条件を満たすセルを見つけた後、削除するような処理では以下の方法が使用できない。<br />\rこの様な場合には、[story:ProgFAQ-Xls_FindCell2]を参照いただきたい。</em></p>','<p>下記のようなケースを想定する。</p>\r<table>\r    <tbody>\r        <tr>\r            <th>　</th>\r            <th>番号</th>\r            <th>名前</th>\r        </tr>\r        <tr>\r            <th>　</th>\r            <th>1</th>\r            <th>2</th>\r        </tr>\r        <tr>\r            <th>A</th>\r            <td>0001</td>\r            <td>佐藤</td>\r        </tr>\r        <tr>\r            <th>B</th>\r            <td>0002</td>\r            <td>鈴木</td>\r        </tr>\r        <tr>\r            <th>C</th>\r            <td>0003</td>\r            <td>田中</td>\r        </tr>\r        <tr>\r            <th>D</th>\r            <td>0004</td>\r            <td>小林</td>\r        </tr>\r    </tbody>\r</table>\r<p><strong>※1 番号は書式指定で &quot;0000&quot; とし、 1 を 0001 としている</strong><br />\r<br />\rたとえば、番号 &quot;0003&quot; の田中さんを取得したい場合には以下のように処理をする。</p>\r<pre class=\"brush: vb;\">\rSub 番号3番の田中さんを見つける()\r    Const NameCol = 2\r    Dim SearchArea As Range             \' 検索範囲\r    Dim c As Range                      \' 検索結果\r    Dim firstAddress As String          \' 最初に見つかったセルのアドレス\r    \r    \' 検索範囲\r    With ThisWorkbook.Sheets(&quot;Sheet1&quot;).Range(&quot;A1&quot;).CurrentRegion\r        Set c = .Columns(1).Find(3)     \' 検索範囲の最初のカラムから番号を検索\r        If Not c Is Nothing Then        \' 発見すれば結果にセルが、見つからなければ Nothing が返る\r            firstAddress = c.Address    \' 最初のアドレスを覚えておく ※2\r            Do\r                MsgBox .Cells(c.Row, NameCol), vbOKOnly, &quot;発見&quot;\r                Set c = .FindNext\r            Loop While Not c Is Nothing And (c.Address &lt;&gt; firstAddress)\r        End If\r    End With\rEnd Sub\r</pre>\r<p><strong>※2 同じ番号が複数回出現するなどでループにて処理を行う場合、最後のセルの次を検索すると最初のセルが見つかる。<br />\rこのため、最初に見つかったセルのアドレスを覚えておく必要がある。</strong><br />\rこの方法で、検索を行うと if 文を利用して検索するよりも断然早く処理を完了させることができる。<br />\r応用として、見つけたセルを削除する処理を考えてみたが、このループの中ではできない。<br />\r削除処理自体は、</p>\r<pre class=\"brush: vb;\">\rRows(c.Row).Delete Shift:= xlUp</pre>\r<p>で可能だが、この処理を行うと Loop 判定行で c が見つからずに例外が発生する。</p>',1,8666,0,0,'2005-12-15 10:10:14',0,'',0,1,1,0,0,'2011-02-28 15:36:21','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0061',3,0,'2005-11-22 17:23:42','[Delphi] 条件に一致するファイルをサブフォルダも探す','','<p>条件に合致するファイルを探し出し、見つかったファイルに対して何か作業ができるようにイベントを発生させています。<br />\r指定フォルダ以下のサブフォルダに対しても検索をかけています。サブフォルダの階層を制限する場合や、サブフォルダの検索が不要な際には、イベント中で DigDir 引数に対し False を返すとそれ以上のサブフォルダを処理しません。<br />\r見つかったときの処理を直コーディングせずにイベントにしたことでクラス化が行え、再利用性が高まっています。別にライブラリでもよかったのですが、コンポーネントのほうが視覚的に見えてダブルクリックでコーディングしていけるので皆さんに使ってもらいやすいかな？というぐらいのものです。</p>','<h4>利用方法：</h4>\r<ol>\r    <li>FileMask<br />\r    見つけるべき対象のファイルとそうでないファイルとを分けるフィルタ文字列を設定します。<br />\r    フィルタ文字列の設定方法は Mask ユニットの TMask の記述を参照してください。</li>\r    <li>Root<br />\r    検索対象フォルダの最上位のフォルダを指定します。<br />\r    実行の際最初に一度だけ参照されます。</li>\r    <li>OnFound<br />\r    ファイルが見つかった場合、サブフォルダが見つかった場合に起こるイベントです。<br />\r    詳細はコメントを参考にしてください。</li>\r</ol>\r<pre class=\"brush: delphi\">\runit DigDir;\r\rinterface\r\ruses\r  SysUtils, Classes, Masks;\r\rconst\r  DefaultMaskStr = \'*.*\';\r\rtype\r  /// <summary></summary>ファイル/フォルダ発見時のコールバック関数\r  /// <param name=\"Path\" />見つけたパス\r  /// <param name=\"IsFile\" />ファイルかどうか(ファイル=True)\r  /// <param name=\"Level\" />掘り進んだレベル(Root=0)\r  /// <param name=\"DigDir\" />フォルダの場合掘るかどうか\r  /// <param name=\"Cancel\" />処理中断\r  TFoundEvent = procedure(const Path: string;\r                          const IsFile: Boolean;\r                          const Level: integer;\r                          var DigDir: Boolean;\r                          var Cancel: Boolean)\r                          of object;\r\r  TDigDirectory = class(TComponent)\r  private\r    FFileMaskStr: string;\r    FFileMask: TMask;\r    FRoot: string;\r    FOnFound: TFoundEvent;\r    /// <summary></summary>ファイル検索マスク設定\r    /// <param name=\"Value\" />マスクパターン文字列\r    procedure SetFileMask(const Value: string);\r    /// <summary></summary>フォルダ検索\r    procedure DigDirectory(const DirPath: string; const Level: integer);\r  public\r    constructor Create(AOwner: TComponent); override;\r    destructor Destroy; override;\r    /// <summary></summary>フォルダ検索\r    procedure Execute();\r  published\r    /// <value></value>ファイル検索マスク文字列\r    property FileMask: string read FFileMaskStr write SetFileMask;\r    /// <value></value>検索ルートフォルダ\r    property Root: string read FRoot write FRoot;\r    /// <summary></summary>条件に一致するファイルが見つかった場合のイベント\r    property OnFound: TFoundEvent read FOnFound write FOnFound;\r  end;\r\rprocedure Register;\r\rimplementation\r\r{ TDigDirectory }\r\rconstructor TDigDirectory.Create(AOwner: TComponent);\rbegin\r  inherited;\r  SetFileMask(DefaultMaskStr);\rend;\r\rdestructor TDigDirectory.Destroy;\rbegin\r  inherited;\r  FreeAndNil(FFileMask);\rend;\r\rprocedure TDigDirectory.Execute();\rbegin\r  DigDirectory(FRoot, 0);\rend;\r\rprocedure TDigDirectory.DigDirectory(const DirPath: string; const Level: integer);\rvar\r  Rec: TSearchRec;\r  Path: string;\r  DigDir, Cancel: Boolean;\rbegin\r  Cancel := false;\r\r  Path := IncludeTrailingPathDelimiter(DirPath);                //  付け\r  if FindFirst(Path  + \'*.*\', faAnyFile, Rec) = 0 then      // 初回検索\r  begin\r    // 見つかった\r    try\r      repeat\r        // フォルダ発見\r        if (Rec.Attr and faDirectory &gt; 0) and (Rec.Name &lt;&gt; \'.\') and (Rec.Name &lt;&gt; \'..\') then\r        begin\r          // 通知\r          DigDir := true;\r          if Assigned(FOnFound) then\r            FOnFound(Path + Rec.Name, false, Level, DigDir, Cancel);\r          // キャンセルの場合\r          if Cancel then break;\r          // さらに掘る場合\r          if DigDir then DigDirectory(Path + Rec.Name, Level + 1);\r        end\r        // ファイル発見\r        else\r        if (Rec.Name &lt;&gt; \'.\') and (Rec.Name &lt;&gt; \'..\') and (FFileMask.Matches(Rec.Name)) then\r        begin\r          // 通知\r          if Assigned(FOnFound) then\r            FOnFound(Path + Rec.Name, true, Level, DigDir, Cancel);\r          if Cancel then break;                             // キャンセルの場合\r        end;\r      until (FindNext(Rec) &lt;&gt; 0);\r    finally\r      FindClose(Rec);                                       // 解放\r    end;\r  end;\rend;\r\rprocedure TDigDirectory.SetFileMask(const Value: string);\rvar\r  NewMaskStr: String;\r  OldMask: TMask;\rbegin\r  if (Value = \'\') then\r    NewMaskStr := DefaultMaskStr\r  else\r    NewMaskStr := Value;\r  if (FFileMaskStr = NewMaskStr) then exit;\r\r  OldMask := FFileMask;\r  try\r    FFileMask := TMask.Create(NewMaskStr);\r    FFileMaskStr := NewMaskStr;\r  except\r    FFileMask := OldMask;\r  end;\rend;\r\rprocedure Register;\rbegin\r  RegisterComponents(\'Black Cat\', [TDigDirectory]);\rend;\r\rend.\r</pre>',1,8028,0,0,'1970-01-01 09:00:00',0,'',0,1,0,0,0,'2011-08-18 17:52:15','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('the_microsoft_c',3,0,'2005-11-24 19:46:18','the Microsoft Confarence 2005 大阪会場に行ってきました。',null,'今日は会社をお休みにして、<a href=\"http://www.event-registration.jp/events/msc05/\">the Microsoft Confarence 2005</a> 大阪会場に行ってきました。<br />\n<br />\n本日の新製品は、以下の三製品。<br />\n<ol><li>Visual Studio 2005</li><li>SQL Server 2005</li><li>BizTalk Server 2005</li></ol><br />\nくろねこ的目玉は Visual Studio 2005だったのですが、SQL Server 2005のセッションにも参加した所、結構良くなってるように思いました。\nOffice System との連携が強化されているとのことで、SQL Server のデータを Excel に持っていく際に、SQL Server にプログラムを書くか、それとも従来どおり Visual Studio などの開発製品で書くか考える局面が増えそうでした。というのも、<strong>SQLServer に SQLCLR という環境が用意され、C# などの .Net Flamework 上の言語でストアドプロシージャが開発できる</strong>とのことで、言語のシームレスな使用が出来そうでした。(もう、T-SQL 何か使わないぞ!!＜このあたりは＠ITにパフォーマンスなどの情報が載っていましたので参考にしてください。)<br />\nで、Visual Studio の方はどうだったかというと、<em>開発環境としての進化以外に、プロジェクト管理、テスト支援、ソース管理などいろいろな方面に力が注がれ Microsoft の言うとおり新しいステージに移った</em>と言えるのでは無いかなと思っています。<br />\n開発環境だけで見ても、書くべきコードが本当に必要なコードのみに近づき、量がかなり減ったこともありバグは減る方向に行きそうです。<br />\nまた、テスト支援の環境がそろったことで、単体テストの自動化や未テストのコードの視覚化など。<br />\nこれだけなら前から Rational Rose などからでていたと思うのですが、単体テストなどのスケルトンを自動で作ってくれるなど、<strong>テストのプログラムの作成の方も省力化が進んでいる</strong>と感じられました。<br />\n<em>ただ、ほしい！</em><br />\nそう思いましたが、テストまで含んでいるエディションになると最上位になるのでかなり高いんだろうな？というのが本音でたぶん手が出ません。<br />\n次は、マジで Delphi やめて Visual Studio に乗り換えようかな？と思い本まで買ってきてしまいました。<br />\n今後への期待としては、<br />\n<ol><li>もっとテストが自動化されること</li>\n<li>個人利用向けのテストツールの提供</li>\n<li>スマートクライアント(Windows Form)と WEB(ASP.Net)アプリの 2Way プログラムの作成<br />\n現在、違う方向に行ってるらしいです。全然別物だとか...</li>\n<li>WEB アプリ作成時のサイト管理機能(現在、SiteMap や StyleSheet 管理機能はありません)</li>\n</ol>といったところでしょうか？<br />\n早く出てくると良いですね。<br />\nちなみに、MCP の資格制度も変わるとかで、MCPについての説明もされていました。<br />\n行くともらえる<em>資料群の中に、バウチャーチケットも入っている</em>ので、かなりお得なセミナーであったと思います。<br />\nまだの人は是非登録して行ってみてください。＞バウチャーいらない人は下さいな!!','',1,3441,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('nhk_3',3,0,'2005-11-27 15:47:52','NHK が受信料徴収に来た！',null,'本日、やっと NHK が受信料を徴収しに来ました。\n\nなんか、文句を言っても「糠に釘」みたいな雰囲気の営業マンでしたが、文句を「ハイ、ハイ」、「スイマセン」と言いながら聞いていました。聞いてみるとアルバイト営業マンらしく、11月からアルバイトで問題の大津営業所で働いていると言うことでした。\n問題の現場にいなかったものに文句を重ねてもあまり意味があるとは思えないので、とりあえず今月分は払うけど、<strong>徴収しに来なかった期間の分までさかのぼって払うことについては、疑問が残る</strong>と行ったところ、その期間については保留ということで、お客様が納得されてからお支払い下さいとのこと...←なんか一生納得しない雰囲気があるのですが...\n本日は、10月＋11月分を受け取って帰っていただきましたが、受信料支払いとともにいろいろ頂きました。シールとかパンフとか...そのほか受け取って良いのか悩んだものまで...\n\n寒いなかコートも着ず訪問営業するのはちょっと無謀な気がしましたが、ほとんどの家はインターホン越しに「結構です。」と返されるだけで有ってもらえないという。\nそれ程、NHK の問題は日本国民にとって許せない問題だったのか、それとも払わなくて済むなら払いたくないというだけなのか...\nくろねこも、納得して今月分を支払った訳では無いのです。早急な NHK の健全化並びに 料金領収方法(基準)の改正をお願いしたいです。','',1,3157,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051127_amazoncojp',3,0,'2005-11-27 21:59:46','AMAZON.CO.JP',null,'インターネット通信販売のアマゾンはかなり不評を買っている様です。<br />\r\n<br />\r\n前回の買い物の際に、アマゾンのシステムが自己都合の固まりであることを思い知ったわけですが...<br />\r\nちょっと暇があったので、アマゾンに他のトラブルが起きていないか検索してみました。<br />\r\n<br />\r\n11/25 に AMAZON.COM でアマゾンが使えない件のトラブルが起きていましたが、それ以外に<strong>アマゾンでほしいものは注文するな！</strong>というようなサイトを複数発見することが出来ました。<br />\r\n<br />\r\nアマゾンでは、<em>本当にほしいものは注文してはならない</em>、注文しても良いのはどこでも買える商品のみである。ということらしいです。<br />\r\n具体的には、<br />\r\n<ol><li>予約は予定数入らない可能性がある</li>\r\n<li>アマゾンの予約は先着順ではない</li>\r\n<li>アマゾンで初回特典付きなどの商品を予約しても初回特典無しが送られてくる可能性がある。<br />値段が異なるときでも同じ対応らしい。</li>\r\n<li>商品は分納されるときが有ると記載されているが、一番遅い商品の発送に統一される。</li>\r\n<li>商品の確保が出来ず配送料無料価格(\\1,500-)を下回ると配送料を請求される。</li>\r\n<li>アマゾンのクレーム担当者は返答のたびに変わる(身をもって確認済み)</li>\r\n<li>アマゾンの返答はコピペで誠意が全くない(身をもって体験済み)</li></ol>\r\nというわけで、本当にほしいものはアマゾンで注文しないようにお願いします。<br />\r\n<br />\r\n当サイトにもアマゾンへのリンクが多数有りますが、<br />\r\n<ol><li>アマゾンで買えなくても、最悪近くの量販店に行けばいつでも同じものが手に入る。</li>\r\n<li>どこでも手にはいるが、単に買いに行くのが手間である。もしくはアマゾンの方が若干安め！</li></ol>\r\nというときぐらいに使うことをお勧めします。','くろねこ自身アマゾンで商品を買うことが結構あるのですが、何かトラブルに遭遇したらまた報告させていただきたいと思います。',1,3115,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_79',3,0,'2005-11-29 22:49:06','背中を流してもらう',null,'今日、息子とお風呂に入った.\n\nいつも何かと人のすることを見て、何でもやりたがる息子(3)なのであるが...\n今日は自分で自分の体を洗うと言い出した。\n\n息子に洗わせると時間がかかりそうだったので、息子の体はくろねこが洗ってくろねこの背中を流してもらうことにした。\n何とも力の入らない洗い方では有ったが、息子に背中を流してもらうのはうれしいことだ。','',1,2390,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo051202',3,0,'2005-12-02 23:08:34','らむさら さんに会う。',null,'<p>今日、ゼネピック非公式ファンサイト最大手と思われる、<a href=\"http://www.hangame-fan.com/\">Hangame FAN!　～ハンゲームを遊び尽くせ！～　総合情報、攻略、交流など</a>を運営さておられる<b>らむさら</b>さんにお会いしました。</p>\r<p>&nbsp;くろねこは毎日この<b>らむさら</b>さんの<a href=\"http://www.hangame-fan.com/xenepic/index.htm\">Xenepic Online ～ ゼネピック オンライン ～</a>のぺージを見ています。</p>','<p>そこで、せっかくお会いできたので、らむさらさんにブリンヒルド側のクエストが抜けていることについて、お伝えしておきましたがエスネ側には載っているので更新はすぐでしょうね。</p>\r<p>&nbsp;がんばってくださいね。毎日見てますよ。＞らむさらさん。</p>\r<p>&nbsp;らむさらさんのページはリファレンスとしてはすごいいいです。</p>\r<p>&nbsp;欲を言えば各情報間にリンクが張られていないものもあるので、追加してもらえればと思いますが情報量が多いだけにしんどいでしょうな～</p>\r<p>&nbsp;攻略情報などはあんまり無いですが、レベルアップ後の武器・防具はどれを買えばいいか、クエストはどれがお得か考えるのに重宝しています。</p>\r<p class=\"add\">6/6 追記<br />\rリンク先が変わっていたようなので、修正をしました。</p>',1,3304,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.hangame-fan.com/\">Hangame FAN!　～ハ',0,1,1,0,0,'1999-11-30 00:00:51','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('post_81',3,0,'2005-12-04 22:14:43','炭火焼肉 でん',null,'本日、炭火焼肉 でん に行った。\n今日から ガンバ大阪Ｖセールとして 男性\\1,600-、女性\\900-、小学生\\500- で食べ放題＆Ｖが決まっていたのでファーストドリンク(ドリンクバーもOK)\\1 だったのでした。\nでも並ぶのに1時間以上、並ぶ前に妹に1時間前に名前を記入してもらっていたので、待ち時間は約2時間半でした。\n席に案内されてさあ食うぞ！と思ったらこないんですよ...\n一皿目が注文後10分ぐらいしてから来たのですが、その後次の皿がくるまで灼く30分...\nどうやらお肉が無かったようなのです...家のかーちゃんが何でもいいから持ってきて...と頼んでからも結構かかって...\nふつうのお肉の部位じゃない タンやミノ、ソーセージなどが運ばれてきましたね...\nみんな結構ブーイングコールで、家の家族も精算して他の店に食べに行こうかと真剣に考えていたときもありました。\nたぶん発注担当（＝店長？）の予測ミスだと思うのですが、無いなら早く店を閉めた方が良かったのではないかと思いました。\n途中で店を閉めたようですが、かなり判断が遅かったですね...\n途中でお肉を他の店舗に借りに行っていた様ですが、その判断もかなり遅かったのでは無いでしょうか？\n会計時の料金はかなり安くしてもらった様ですが、優勝セールは宣伝広告なのに逆に悪評を振りまいていたような...','',1,2380,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_82',3,0,'2005-12-05 23:21:15','学校は個人情報保護法対象外？',null,'<p>以前<a href=\"http://www.jnishida.com/blog/archives/2005/11/post_78.htm\">卒業生の進路先情報などを在校生に見せてはならない というのは間違いでしょうか？</a>で書いた内容について、執筆者の牧野二郎氏から回答を頂いていたので、くろねこの意見をまとめておきたいと思います。<br />\n全然まとまらないのですが...</p>\n<p>牧野二郎氏のご回答を拝見すると、相違点は以下の点であると考えます。</p>\n<ol><li>コミュニティの考え方</li>\n<li>そして個人情報保護法で守るべきなのか、プライバシーを守る権利(憲法第13条)で守るべき問題なのか</li>\n<li>学校は事業者であるか否か</li></ol>\n<p>コミュニティについて調べてみました。<br />\n大辞林 第二版 （三省堂）によるとコミュニティの意味は、以下のように示されていました。</p>\n<blockquote>コミュニティー [community]<br />\n<br />\n(1)人々が共同体意識を持って共同生活を営む一定の地域、およびその人々の集団。地域社会。共同体。<br />\n<br />\n(2)アメリカの社会学者マッキーバー（R. M. MacIver）が定式化した社会類型の一。血縁・地縁など自然的結合により共同生活を営む社会集団。<br />\n<br />\n→アソシエーション </blockquote>\n<br />\n<p>\n今回は(1)に該当すると考えられますが、共同体意識、共同生活とは何かが問題になると思います。<br />\n私の意見としては、学校全体として共同体意識が存在するのかが疑問です。<br />\n「社会の一単位としてそこに集合しているわけで、互いに刺激し、働きかけあい、影響しあう以上はそれを社会、コミュニティというほかないのでは、と思うのです。」<br />\nとお答えいただいていますが、共同体意識としては、クラスかせいぜい学年が精一杯ではないでしょうか？<br />\n学校全体の共同体意識ができていると言うには難しいと思います。学校全体での行事などは存在しますがそのとき限りですし、普段発生する学年を越えてのコミュニケーションとしては、小学生であれば集団登下校位ではないのでしょうか？学校内でのコミュニケーションとして適切なのはクラス内の仲間、クラス、学年でしょう。<br />\n特に義務教育課程においては居住地域に束縛されている面がおおく、特定の学校に強制収容されているという現実があります。<br />\nそのような理由から、学校の方針に反対だからといってその学校を変えると行った選択肢が非常に難しいのが現状です。<br />\nまた、ある特定の場所に集まった人間をの集団をコミュニティと称するのであれば、たとえば人材紹介会社やハローワークに登録した人間は皆コミュニティの一員です。<br />\nハローワークに登録したら、個人情報がハローワーク内に掲示されていれば問題ではなりませんか？<br />\n<strong>私は同じ価値・目的を共有する人間の集団をコミュニティと呼びたいと思います。</strong></p>\n<p>\n個人情報保護法で守るべきか憲法で守るべきかという問題についてですが、<strong>個人情報というのはプライバシーの一つであり今回の個人情報保護法は、企業に提供されたそのプライバシーの一部の管理について制度化したものであると考えたい</strong>のですが違うのでしょうか？もし違うのであればプライバシーを守る法律を早急に検討すべきであると思いますが、その件についてはここで議論すべき問題ではないので触れません。</p>\n<p>\n学校も非営利ではありますが事業を行っている法人であると考えています。たとえば私学には○○学校法人というのがあります。不特定多数かつ多数のものの利益の増進に寄与することを目的とする活動も行っています。<br />\nさらに学校ですと政令507号　第2条 に示される5年間で個人の数5000人を越えることもあります。5000人には、学生・保護者・教員も？などが含まれると考えられますので、単純に年間500人の学生を受け入れると越える計算になります。<br />\n500×2（学生+保護者）*5（年間）= 5000<br />\nそれでも学校は個人情報保護法の対象外事業者なのでしょうか？<br />\n学校は管理する側(事業者)と管理される側(消費者)が明確に分かれている事業であり、コミュニティの様な選出されたメンバがコミュニティ内のルールに基づいて管理しているのではありません。たとえるなら国と国民の関係に近いのかもしれません。</p>\n<p><em>このような理由から、学校は個人情報を守らなければならず、むやみに個人情報を学内掲示できないと考えるべきでしょう。</em></p>','<p>\n追記：<a href=\"http://internet.impress.co.jp/kojinjohoblog/archives/2005/10/post_29.html\">学校にあっても利用目的を具体的に明示して、情報の収集をしなければならない</a><br />\n<br />\nと言う、エントリが投稿されています。学校側の利用目的として「教育のため」でいいというのは賛成です。<br />\nいちいち、クラス名簿作成のためとかそのたびに利用目的を限定して収集されると、情報提供する方にも負担となるでしょう。<br />\n<br />\n小学生の頃、「昨日何食べた？」という（家庭科の授業だったかな？）と言うのがありましたが、これを個人情報として利用目的を示さないといけないとすると、授業の最初に「栄養学の理解のため」と言わないといけなくなるのでしょうか？<br />\nなれればふつうなのかもしれませんが、現状からすると違和感たっぷりですね。<br />\nまあこの程度ならいいのですが、進級する毎に「クラス名簿を作る」と言う利用目的で、住所・氏名・年齢・連絡先電話番号などを記入するように求められたら、子だくさんの親御さんは困ってしまうでしょう。<br />\n<br />\nしかし、教育のためでも利用目的を明記しなければならないケースもあると考えています。<br />\n一例として生徒の家庭の世帯収入を調べるとか、生徒以外の家族の個人的情報を収集する場合などです。このような場合には利用目的が明らかにされるべきだと考えています。\n</p>',1,3639,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_83',3,0,'2005-12-12 20:23:41','オンラインゲームに関するトラブルが急増 と国民生活センターが警告!',null,'<a href=\"http://www.kokusen.go.jp/news/data/n-20051207_2.html\">NCAC:オンラインゲームに関するトラブルが急増</a> と国民生活センターが警告を 12/7 に発信していました。<br />\n<br />\n主な問題点を以下のようにまとめられています。<br />\n<blockquote><ol><li>利用規約に違反している利用者に対する運営業者の管理が不十分</li>\n<li>接続障害が発生しても補償が十分に行われない</li>\n<li>強制的に利用停止されても詳しい説明がない</li>\n<li>苦情処理体制が整備されていない</li></ol></blockquote>\nこういう内容をふまえ、アドバイスとして、<br />\n<blockquote>オンラインゲームの運営には問題点も多いため、利用者は現状をよく確認し認識した上で、利用規約やマナーを守って利用すること。 </blockquote>\nとまとめられているのですが、だからといってなかなか難しい問題です。<br />\nまともな業者って少ないですからね...<br />\n<br />\nオンラインゲームをしていて、何日間\\1,575-みたいな商品がありますが、これって初日不算入で計算されています？ちゃんと見てるわけでは無いのですが、どうもそうはなっていないような気がします...<br />\nそもそも、ウルティマオンラインの場合には、期間計算自体が正常に出来ていないという話も聞きますが、くろねこがゲームをしている限りこのような体験はしていません。期間も初日不算入で計算されています。(ゲームタイム30「30日間有効」を購入すると、アカウント管理サイト上では31日間有効になっています。)<br />\nそういえば、ハンゲームのゼネピックも時間の経ち方が変な気がします...<br />\nオン時間で計算しているのか、オフ時間も含めてリアル時間で計算なのかその辺が曖昧なのでどうしようもないのですが...','<strong>初日不算入</strong>：一日の途中で契約を開始した場合、その日が満了した後から日数を計算すること。<br />\n一日の満了は24:00ですので、0:01に契約するとほぼ一日得する感じになります。<br />\n顕著な例として、金融機関でお金を借りても初日不参入ですので、借りた日のうちに借りたお金を返した場合、1日が経過していないので利息は発生しません。<br />\n<div class=\"add\">2005/02/13 追記</div>\n01/18 頃に確認したのですが、ゼネピックの有料アイテムを使用していると装備品以外は画面右上にアイコンとして状態が表示されています。<br />\nそのアイコンを右クリックすることで、該当アイテムの期間計算方法が書かれていることが判明しました。<br />\nしかし、年末に送った有料アイテムの期間計算方法についての質問に対する解答は、未だ返ってきておりません。',1,3750,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('051213_internavi',3,0,'2005-12-13 14:50:46','ホンダインターナビ WIN ユーザはどうすればいいの？',null,'<p>くろねこは 携帯電話会社に KDDI グループの AU を選択している。AU のラインアップには「CDMA 1x」の A シリーズと、高速なパケット通信に対応した「CDMA 1X WIN」があり。くろねこが使用しているのは後者の方だ。</p>','<p>車はホンダのフィットに乗っているのだが、03年08月に車を購入する際にカーナビゲーションとしてそのときの先進の機能を求め、携帯電話で情報が取得できる(テレマティックス機能搭載)ホンダ純正のインターナビをメーカーオプションで選択した。<br />\rその際に接続できる電話としてAUがリストアップされていることは確認したが、詳細な対応機種までは確認しなかった。<br />\rAU 携帯につなげるケーブルが別売であったため、AU 用のケーブルを車と同時に発注した、ただそれだけだ。<br />\r(カタログにもAU接続ケーブルとしか記載がなかったので、全機種つながるのだと思いこんでいたし、また幸いなことに？そのときは Aシリーズを使用していた。)<br />\rそれから、車に乗り始めインターナビの特徴が理解できてきたころ(かなり不満が募るものではあったが)、携帯電話が故障し買い換えることになった。また、その前に WIN は一部の機種しか対応していないことがわかっていたので、買い換えた携帯電話は W11H である。<br />\r携帯電話としての機能よりも、車とつながることのメリットを選んだ。渋滞情報を取得することはあまりないのであるが、法改正もありハンズフリー機能が使用できると言うことが最大のメリットとなっている。<br />\r(渋滞情報を活用しない理由として、パケ代がもったいないとの理由で、遠くに行くときや渋滞しているときに限って情報を取得している。)</p>\r<p>こんな状況であるが、FOMA 接続アダプタが発売されさらには今年(05年)夏には WIN 接続アダプタが秋発売予定と発表された。<br />\r(FOMAアダプタもでかすぎでどこに置くんだ？＆何でこんなに高いの？と言う不満はある)<br />\rすぐにでもほしかった為、詳細な時期が知りたいと ホンダインターナビプレミアムクラブ サポートに問い合わせしたところ、9月初旬としかわからなかった。その後、9月初旬に問い合わせすると、メーカーの開発の遅れで...と言うことで時期や 仕様が決まった段階で電話にて連絡いただけることになった。</p>\r<p>しかし、12/13 現在全く連絡がなかったため、しびれを切らしてこちらから電話にて問合せをしてみた。<br />\rそこで得た内容はメーカー側の開発の遅れで未定となっているとのこと...連絡を待っていた旨を伝えるが平謝りされるだけ...<br />\rそこで、Bluetooth アダプタの開発計画はない？と聞いてみたら、技術的問題で開発ができないと回答が...<br />\rえっ！なんで？Bluetooth アダプタを作って今まで通りケーブルで接続すればいいのではと思い突っ込んで聞いてみるが、やはりわからないとのこと。<br />\rじゃあ、WIN ユーザは何を使えばいいの？と質問を変えてみると、納期未定の WIN 接続アダプタを待てと...</p>\r<p>ところで本当に Bluetooth は技術上だめなの？ホンダは開発時に何で携帯業界の動向を把握しておかなかったの？IT業界は車業界と異なりすごい勢いで成長しているのだから、接続部分はモジュール化すべきじゃない？</p>\r<p>車と同じスタイルで設計してるんだろうな...</p>\r<p>だめ元で 12/8 発表のフィットのインターナビと交換できない？ともう一度聞いて見ようか？できてもいったいいくらかかるんだろう。部品として流通してるだろうからディーラーで交換できそうなものだが、なんだかんだ言って結局やらないんだろうな。<br />\rで、インターナビプレミアムクラブではなく、ディーラーに聞いてみました。<br />\r上記のような想像していたとおりの回答だったのですが、部品としてフィットのナビを購入すると、57-8万円とのこと。<br />\r新車での価格差の約2倍もある...その上、配線がマイナーチェンジで変わってる可能性有り。<br />\rこんな感じなので事実上手が出ません...ホンダはユーザを捨ててるのでしょうか？</p>',1,5288,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:59','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_84',3,0,'2005-12-14 00:39:59','ブルートゥースに深刻な脆弱性が...',null,'どうやらブルートゥースには深刻な脆弱性があるらしい。\n\nどのような脆弱性かは以下のURLを参照していただくとして、顕著な例としては携帯電話での盗聴やデータ盗難などがあるとのこと。\n<a href=\"http://hotwired.goo.ne.jp/news/technology/story/20040816302.html\">ブルートゥースの脆弱性、携帯電話に予想以上のリスク(上)</a>\n<a href=\"http://hotwired.goo.ne.jp/news/technology/story/20040817307.html\">ブルートゥースの脆弱性、携帯電話に予想以上のリスク(下)</a>\n\n\n研究施設がヨーロッパを起点にしているためか、検証されている携帯電話の機種が海外機種に限られているが、AU の機種などでも一部のモデルには Bluetooth が搭載されている。\nそのような機種では問題は無いのだろうか？この記事はかなり古いもので、すでにいくつかのIT系の企業が Bluetooth が持つ脆弱性に対して対策を施した旨を掲示するなか、KDDI のWEB サイトではそのような記載は見あたらなかった。\n日本の他のキャリアも含めてこのあたりの対策はどうなっているのだろうか？','<div class=\"add\">12/23 追記</div>\nau お客様センターに確認したところ、au としてこの問題を認識しており脆弱性の調査を行ったとのこと。\n結果、au では au 電話機において脆弱性を確認できなかったとお聞きしました。\nBluetooth 機器を認識させたことがないので詳細は不明なのですが、事前にペアリングをすませた機器同士しか通信できないからだそうです。\nまあ担当の人は Bluetooth の通信方法も知らなかったので、本当に内容がわかってもらえてるのかはなはだ疑問ですが、その内容が au ホームページにて案内されていないので、au ホームページにて案内していただけるようにお願いしました。\n\nしかし、思うにペアリングも無線でやるんでしょ？じゃあ、それを犯人にやられたらどうするんでしょうか？ホームページでよく使われている SSL もそうなんですが、最初から通信を傍受されていれば無意味なんですよね...だって最初に暗号を決める通信を行ってるんですもの...\nSSLで用いられている公開鍵暗号の特徴として、\n<strong>秘密鍵で暗号化されたデータは対応する公開鍵でしか復号できず、公開鍵で暗号化されたデータは対応する秘密鍵でしか復号できない。</strong>\n最初に公開鍵を渡すのを別ルートで渡しておかないと、どちらか一方からの通信は内容が理解できてしまうし、なりすましも出来るってことですよね\n',1,4476,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('visual_studio_2',3,0,'2005-12-15 19:49:54','Visual Studio 2005 に挑戦！',null,'今週から VS 2005 による C# でのプログラムの勉強を開始した。＜やっとか！<br />\r<br />\r仕事で C# か Java を使うことになっているため、とりあえず Java はちょっと遠慮させていただきたいので、C# を始めている。(仕事での担当者の意向にもよる。その上司は Java 派の様なのだが...)<br />\r<br />\rこれまでにも、VS2002?3? を購入したり、先日の MSC2005 で本を買ったりしてはいたのだが、やはり気持ちがのらない。でも今回は仕事なのでがんばるつもりで...<br />\r<br />\rで、本格的な開発に入る前の調査として C# ＆ .Net Framework 2.0 での開発に問題がないのか？と言うところが年内の仕事になっている。<br />\r調査内容をブレイクダウンしてみると...<br />\r<ol><li>Database が Postgres V8.1 に決定したので、それに接続が可能か？(できればネイティブで)</li>\r<li>O/R マッピングが使用したいとの要望から、Nhibernate が VS2005 で動作するか？</li></ol>\r<br />\r上記に沿って二日ほど調べたのだが、Postgres に付属している PostgresSQL 用の .Net Data Provider は .Net Framework 1.1 用しか提供されていないようだ。<br />\rこれでは最初の要件が達成できないので、Google で調べてみる。<br />\rスポンサーに <a href=\"http://www.crlab.com/\">CoreLab</a> へのリンクがあった。早速、ここの製品である <strong>PostgreSQLDirect .NET</strong>を 試してみる。(6フィールドまでに限定された試用版がある。)<br />\rサンプルも付属していたので、それを元に試してみる。試してみると結構簡単につながった。つながったけど、<strong>日本語が文字化け</strong>している。たぶん Encoding の指定が正しくないと直感的に考え Encoding 指定を探すが見つからず、CoreLab のサイトのフォーラムから Unicode を使用したいと書いている投稿を見つけた。その投稿によると Unicode を使用する場合には Charset プロパティを使用するとのこと。このプロパティを <strong>\"SJIS\"</strong> に変更してみると問題は解決した。(ちなみに Postgre に付属の Npgsql を使用する場合には、接続文字列に Encoding=SJIS と指定するか、 接続後 SET CLIENT_ENCODING TO SJIS と SQL を発行するようです。ちなみに後者の方法は CoreLab のドライバでも有効でした。)<br />\r<br />\rNHibaernate の方もダウンロードしてきて試してみる。こっちは ＠IT や CodeZine に記事があったのでそれを読んだ。<br />\r今回は特に CodeZine の「<a href=\"http://codezine.jp/a/article.aspx?aid=156NHibernate\">を利用してSQLを書かずにデータベースにアクセスする方法</a>」を参考にさせていただいた。CodeZine では記事はふつうに非会員でも読めるが、サンプルは会員のみとなっているので、登録させていただいた。<br />\rこちらも、このサンプルのおかげで NHibernate が VS2005 上で動作することは確認できた。<br />\rしかし、必要な要件の (1)と(2)の組み合わせがうまくいかない。<br />\rNHibernate の接続文字列の設定が Npgsql のものしか提供されていない。だめ元で Npgsql 用に改造してみるが、つながらない。とここで、Npgsql への参照設定が抜けていたことに気づき、これを加えてみるがやはりうまくいかない。<br />\rCoreLab のフォーラムで投稿を検索してみる。他のドライバへの投稿を含め 3 投稿発見できたが、接続文字列の例はなく暗礁に乗り上げた格好だ。<br />\rこの開発の着手が来年3月以降に予定しているので、それまでに Npgsql が .Net Framework 2.0 に対応してくれることを期待しつつ他を探している。','<p class=\"add\">12/16 追記<br />\rSQL Server Express Edition も 無料なのに Postgre の選定理由はなに？<br />\rと思い聞いてみたら、SQL Server の無料版が商用 OK なのを知らなかったとか...<br />\rSQL Server も選択肢に入れてもらえることになったが、上司の部長が Java はではなく、単に アンチMS だったと言うことが判明...<br />\rSQL Sever も遠いのか...</p>\r',1,5034,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.crlab.com/\">CoreLab</a>\n<a href=\"http://codezine.jp/a/article.aspx?aid=156NHibernate\">を利用してSQLを',0,1,1,0,0,'1999-11-30 00:00:58','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('microsoft_wirel',3,0,'2005-12-17 10:43:50','Microsoft Wireless Laser Desktop 6000',null,'<p><a href=\"http://www.microsoft.com/japan/hardware/laser/wi_laser_desk6000.mspx\">Microsoft Wireless Laser Desktop 6000</a> を買った。</p>\n<p>それまで使用していた Natural Keybord Pro が壊れたので買い換えになったのだが、いくつかの点で困惑している。<br />\n気になるのは以下の点だ。</p>\n<ol><li>無線方式なので、電波の関係からか環境に環境に左右されやすい。</li>\n<li>各キーのロック状況がキーボードではなく、レシーバーに移動している。</li>\n<li>キーボードの配置が変更されている</li>\n<li>マウスのボタンの配置がおかしい</li>\n</ol>\n<p>(1)くろねこは、キーボードを置く部分が別で使用するときにだけスライドさせて引き出してくるタイプのパソコンデスクを使用しているのだが、ここにレシーバー、キーボードとマウスを固めて配置していた。この状態では電波の受信感度が悪いのかキーボーはキーを押しても反応しないときが有ったり、またはキーを押したままにもかかわらずキーリピートが途中で終わってしまうと言うことがあった。マウスはたまに受信感度の警告が出てくるが使用感に問題はなかった。マイクロソフトに問い合わせて確認したところ、置く場所を変えたりしてみてくださいとのことだったのでレシーバーを一段高いモニタの横あたりに置いてみたところ正常に動作するようになった。<br />\n初期不良かなと思った方は近づけるだけでなく、一回離して配置してみるのも良いかもしれない。<br />\nマクロソフトでは、レシーバーを裏返してみたり、雑誌などを積み上げてその上にレシーバーを置いてみたところ受信感度が良くなったという例も報告されていると聞けた。</p>\n<p>(2)これも無線方式になったためだと思うのだが、CapsLock、NumLock と FunctionLock がレシーバー上に移動している。このためこの情報が必要な人はレシーバーを見えるところに配置する必要がある。 無線でこの情報をやりとりしてキーボード上に表示するよりも問題が少ないとの考えからであろう。</p>\n<p>(3)特に違うのがファンクションキーと矢印キーの位置、そしてキーボードの前のパッドの部分。\n	今までファンクションキーは2ブロックで配置されていたのだが、今回は4ブロックになっていた。ゲームなどをする人にとってはファンクションキーの位置変更は結構つらいかもしれない。また右 Shift キーと矢印キーがかなり近くなっている。このため Shift + → などの操作をする IME の文節操作などでは苦労するかもしれない。まあ反対側の Shift キーを使うべきなのであろうが、今まで片手でやってきたので少々つらい。</p>\n<p>(4マウスのボタンについてだが、このマウス通常のボタン以外に左側にサイドボタンが2つ配置されている。この二つ前後に配置されているので奥の小さい方のサイドボタンをクリックする際には手前の大きい方のサイドボタンがじゃまになる。ワイヤレスでないLaser Mouse 6000 は左右の配置だったのでこれは前の方が良いと思う。</p>\n<p> 最後に個人的な問題かもしれないがキーボード手前のパームレストが Natural Keybord Pro の時よりも小さくそして滑りやすくなっている。キーボードの手前にスペースが確保できないと下側のキーが押しにくいと感じた。まあ、これは慣れの問題かもしれないが、上記以外の点についてはおおむね満足している。マウスもレーザでキビキビ動くし、無線なので足下の気になる配線が一つ減った。とても快適になったと思う。</p>','',1,4009,1,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_85',3,0,'2005-12-20 23:27:09','問題解決ってそれでいいの？',null,'問題解決、特に急いでいるときの問題解決までとは、「問題の原因調査行動を取りつつ問題解決の方法を探し、その中から最も効率的な解決策を実施」すればいいと考えている。<br />\n解決策は一つである必要はないし、できれば複数用意できればそれに越したことはないと思う。さらに押し進めると、原状の回復が早急に望まれている場合には、とりあえず対応もあるだろうし、複数の解決策を並行で用意すれば結果的に実施されない解決策もあると思う。<br />\nしかし、問題解決の複数の解決策を複数同時に適用するのは、原因がわからなくなったり、そもそも複数の解決策の互いの影響があるかもしれないので避けるべきだと思う。<br />\n<br />\n複数の解決策を平行で準備するのは問題がないはずだ、そのはずなのに、この手順では担当者から不満が出る。<br />\n担当者曰く、「一つの解決策の実装中に横で他の解決策の話が行われると、この解決策は必要ないのか？」と。<br />\n','今日、今まで動いていたプログラムが動かなくなった。<br />\n<br />\n<br />\nお昼にリーダーから一言、「データベース応答無かったら一定期間で切断する方法はない？」と相談があった。<br />\nデータベース接続は BDE で行っており、接続先データベースは Oracle、BDE は Oracle ドライバだとタイムアウトの設定がないので、他の手段を使うしかない。<br />\nマルチスレッドで監視 か TCP/IP のタイムアウト、SQL*net でもタイムアウトの設定が設定できるとか...<br />\n<br />\n相談の結果今回はとりあえず、スレッドで接続してメインスレッドで一定時間で接続が確立されていなかったら、切ることになった。他の担当者はマルチスレッドは難しいと言っていたので、とりあえずサンプルを作ってテストすることになった。<br />\n<br />\nサンプルが完成したところで改めてなぜ応答が返ってこないのか確認したところ、DBリンクしているSQLでDBリンク先がオフラインだと応答が返ってこないとか....<br />\nそれって、Oracle 側の問題じゃないの？Oracle 側で設定してよ...<br />\n<br />\nしかも、それの状況すら間違ってるし...<br />\n本当はプログラム内の SQL の Prepair で落ちてた。いろいろ調査した結果を整理すると、<br />\n<ol><li>Prepair で無反応になる</li>\n<li>昨日までは正常に動作していた</li>\n<li>プログラムは変更されていない</li>\n<li>変更点としては、OSのパッチが適用された</li>\n<li>平SQLでは正常に動作する＞パラメータクエリだけがダメ(SQL Plus、Database Expolorerで確認)</li>\n<li>他のSQLも問題なく実行出来る(他のパラメータSQLも)</li>\n<li>テスト機では今でも同じプログラムが正常に動作する。</li>\n<li>本番機とテスト機の差は、Oracle のバージョンが微妙に違う</li>\n</ol>\n<br />\n以上の状況と、お客さんが「とりあえず動くようにして、問題調査は明日以降でもいいよと」言っていたので、3人で相談して<br />\nとりあえず他の担当者にパラメータクエリのパラメータを埋め込みにしてもらって平SQLで動くように変更してもらった。<br />\nそれが、そのとき考えられる中で一番労力がかからず、しかもうまくいく可能性が一番高いように思えた。<br />\n(Database Explorer は Delphi で作られているとのこと、ちなみに、Database Desktop は Delphi ではない。)<br />\n<br />\nその横の席で、リーダーと根本の原因を探り始めた。<br />\nLinux カーネルと Oracle の相性か？そんなことがあり得るのか？と言う推測がリーダーから、くろねこの頭にあったのは、 Oracle の構文解析がなぜ失敗しているのか相性が原因でパーサーが構文解析のパーサーが動かない？と言うのも思ったが、それは状況別に別モジュールになっていない限り、たぶんないと思うとすぐに自己否定された。<br />\n<br />\n上記のの対策が終わらぬ間にその横で、リーダーに「SQLパーサーの動きがが変わったんなら、View に対して絞り込みする方法もやってみるとうまくいくかもしれませんね...」とか話してみた。<br />\nリーダーは調査しながらも、とりあえず View を作ってくれた。<br />\n<br />\nそんな中、「Linux のカーネルパッチを適用したのなら、Oracle を落としてない？」と聞いてみたところ、Oracle の再起動を行っているとのこと。<br />\n「じゃあ、メモリにあった構文解析のための情報ってなくなってるよね、馬鹿になったんじゃない？」と話をしてみた。<br />\nその話を聞いていたお客さんが、「それなら、ヒントを与えればうまくいくじゃないの？」と、で SQL にルールベースの指定をしてみると、正常に動作する。(ちなみに元の SQL に戻して正常に動いた。しかしこれは一度ヒントを与えた SQL で学習したからだと結論づけた)<br />\n<br />\n結局、ルールベースの SQL で本番は行くことにした。そんな中、お客さんから一言「今回の問題の回避策って無いよね」、いや無い訳じゃないけど...「テストする際に一回データベースを再起動しておけば発見できたかもしれませんね。」と返しておいた。リーダーからは「現実的じゃないな」と、確かにハード面の費用とか結構かかるけどね...<br />\n<br />\n問題の解決が終わろうとしてたころ、他の担当者から「横で他の解決策の話をされると、この解決策は必要ないのか？と思う」と、「いろいろ試す前にホワイトボードに方法を全部書かないと...」とつっこみが...<br />\n後者はまだわかるんだけど、前者はちょっとねわかるけどその方法がだめなときの次の手を準備するのは仕方ないんじゃ無いの？と言うのが正直な気持ちだった。',1,4187,1,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo051222',3,0,'2005-12-22 22:33:00','ゼネピック ひどいバグにはまった',null,'<p>サンタ・エックスダンジョン地下2階で突如発生した。<br />\r<em>スキル使用は拒否されました。</em><br />\r<em>スキル使用は拒否されました。</em><br />\r「あれ、ここ安全地帯だっけ???」<br />\rと思ったのもつかの間、何度やっても、場所を変えても、同じメッセージ...<br />\r&ldquo;いつも安全地帯にいることになっている&rdquo;バグだと気づいた。</p>','<p>クライアント再起動しようが、PC再起動しようがスキルの登録し直そうが全く変わらない。<br />\rPTの仲間がそんな「★くろねこ★」をサポートしてくれて、Lv40迄上げてくれた。<br />\rLv40でいくつかの新しいスキルを覚えるのだが、やはり攻撃魔法は使えない。意外にも補助魔法は使用可能ということがわかった。</p>\r<p>これではダメだと、バザーをしてみる。そんななかセイクリッドハンカーが売れる。<br />\r補充しようかとセイクリッドハンカーを作るクエストをやってみる。するとここにもバグが...<br />\rそのクエの最終段階で鉱石精錬職人に話しかけると、中身のないウィンドウが...orz<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo051222_1_original.gif\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo051222_1.gif\" alt=\"\"></a><br />\rこうなるとどうしようもないのでクライアントの再起動をしました。<br />\rこれも何度やっても同じでした。</p>\r<p class=\"add\">12/23 追記<br />\rPTメンバに聞いてみたところ、すでに同じ現象を確認していたとのことでした。<br />\rどこかにバグ一覧がほしい。</p>\r<p class=\"add\">12/23 追記<br />\r最初の問題はバグではなく、ただ武器を持っていない状態だったのが原因と判明しました。<br />\rただ、何が原因で武器がはずれたのか、それが新たな疑問として残りました。</p>',1,2754,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo051222_1_original.gif\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:06','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('051227_symantec',3,0,'2005-12-27 19:37:04','Symantec 社製のウィルス対策ソフトなどに脆弱性が...',null,'<p>Symantec 社製のウィルス対策ソフトなどに脆弱性があるとのこと。</p>\r<p>26日に「ZDNet Japan編集部」より、<br />\r「シマンテックのウイルス対策ソフトに脆弱性--危険度は「高」【ZDNet Japan IT Business版 2005/12/26】」<br />\rとのメールが配信されておりわかった。<br />\rこの脆弱性の対策を求めて、昨日・今日と対応策を探したが決定的な対策は見つからなかった。<br />\rまた、Symantec の公式対応を WEB サイトから探したが、この件に関しての情報は米国サイトからしかみつけることは出来なかった。<br />\rこの件に関しては、Live Update をしていれば大丈夫なのだろうか？非常に疑問が残るが、とりあえず RAR の書庫を解凍してまで ウィルスチェックすることを防ごうとした。<br />\rしかし、その設定がどこにあるのか簡単には見つけることは出来なかった。</p>\r<p>幸い、NTT西の光プレミアム回線のユーザであったので、このサービスについているウィルス対策ソフトが回線契約中はずっと無料で使用できると言うことなのでこちらに変更した。</p>\r<p>ウィルス対策ソフトを使っていてウィルスに感染したら本末転倒だ。</p>','',1,4492,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:07','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo051230',3,0,'2005-12-30 23:57:39','なかなかボスの顔を見ることが出来ません',null,'<p>最近はまってる<strong>ゼネピックオンライン</strong>ですが、ただいま Lv43 です。<br />\rLv35 で受けることが出来る<br />\rトラミスの試練 ～ 解呪の法を求めて ～ 失われた書 ～ 白き石<br />\rというクエストがあるのですが、ただいま<strong>失われた書</strong>で止まっています。</p>','<p>失われた書では、知恵の書を取ってくる必要があるのですが、<strong>ベルテラニンの森</strong>の森の<strong>ガディプラント</strong>が出すようです。<br />\rしかし、一回倒すことが出来たもののそのあとはさっぱり見ることが出来ません。</p>\r<p>皆さんここがボトルネックの様で、結構重たいマップになっています。<br />\rところが、そんななかとある方々のお話に耳を傾けますと、<br />\r「今日ガディ11回倒して4回出た」、とか「血を3個持ってる」、もっとすごいのは、「○&times;△は魔神の血(黄)47個ももってるてよ」とか言ってるではありませんか...<br />\rさすがクレリックは強いですね...</p>\r<p>1個分けていただきたい＜切実な願い</p>\r<p>まあ、明日もお休みですし、この期間中にがんばって取れると良いんですが...</p>',1,2681,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:45','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('online_game',3,0,'2005-12-31 00:09:27','オンラインゲームの有効期間について確認してみました。',null,'いまはまってるゼネピックオンラインですが、前にも書いたとおりアイテムの有効期間の計算が初日不算入の扱いになっていません。<br />\n<br/>\n初日不算入ですと、日の途中で契約した場合はその日を契約期間に含めないと書かれています。<br/>\n(民法140条。特別な法律で上書きされない限りこの内容は有効です。ただ年齢の計算は別です。)<br/>\nこのため、本日以下のような質問をしてみました。どのような回答をいただけるのか楽しみです。<br/>\nまあ、このような内容を送っても無視する会社は無視しますけどね...(アマゾンとか)<br/>\n<br/>\n<blockquote>アイテムの有効期間についてですが、一部課金アイテムに有効期間が設定されているものがあると思います。<br/>\nその有効期間はどのように決められているのでしょうか？<br/>\n利用規約には以下のように記載されています。<br/>\n--- ここから ---<br/>\n第４章　利用料金<br/> \n  <br/>\n 第１３条（本サービスの利用料） <br/>\n  <br/>\n 本サービスの利用料、発生基準、算定方法等は、運営会社が別途定める通りとします。  <br/>\n--- ここまで ---<br/>\n利用方法については別途HPに記載のとおりだと思うのですが、発生基準、算定方法が不明です。<br/>\n(有効期間は各アイテムに記載さていますが、これが算定方法でしょうか？)\nどこかに別途記載があるようなのですが、どこに記載されているのでしょうか？ご案内いただけますと幸いです。<br/>\n<br/>\n以上、よろしくお願い致します。</blockquote>','ゼネピックのホームページの利用規約以外の部分は、コピペできないようにするためか範囲選択できないようです。(貼り付けは可能です。)<br />\nなので、送った内容をメモするためにはHPに書いてからコピペではなく、エディタなどで書いてからコピペする方が便利ですね。\n<div class=\"add\">01/25 追記</div>\nメンテ後、～記録の画像が日記の画像から、炎の画像に切り替わっていました。(SHOPのはそのまま)<br />\n何か変わったかな？と思い右クリックしてみると、効果の発生基準、算定方法らしきものが...<br />\nしかし、ショップでの説明は全く変わらないままでした。説明するなら購入前でしょう。<br />\n未だに、質問への回答は得られてませんが...<br />\nだめだめです。\n<div class=\"add\">06/02/24</div>\n不算入を不参入と書き間違えていたので訂正しました。',1,2622,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_89',3,0,'2005-12-31 22:35:36','極楽湯の謎',null,'自宅から車で10分程度の所に極楽湯がある。\n\n今日もそこに入りに行ったのだが、そのお風呂には謎がある。\nといってもたいしたことではないのだが、極楽湯には日替わりの薬湯がある。\n何の薬湯かはその日によって違うので、<strong>薬湯の内容を示す看板は掛け替えが出来る</strong>ようになっている。しかし、その効能は掛け替えが出来ない固定の看板になっている。\n薬湯の内容が変わるのになぜ効能は同じなのだろうか？\n同じ効能だけどその効能の効き目が違う？\nちょっとした謎だ...\n\n次に、お風呂の入り口には<strong>飲食禁止</strong>と書かれている。\nしかし、お風呂の中には給水器が置いてあってさらにコップが二個置かれている...\n禁止じゃなかったのか？さらに言うとそのコップ一回ずつ洗わなくても切れないなのか？\n衛生上の問題はないのだろうか...あっ、だから飲食禁止なのか...','',1,2595,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('post_90',3,0,'2005-12-31 23:13:36','今年の一大ニュースって何？',null,'今年もいろいろなことがありました。\n\n大地震が頻発して東海大地震が近い？とも言われています。\nしかしくろねこ的には JRの大事故が最も印象に残っています。\n地震はくろねこの周りで起こっていなかったため、いささか印象が薄いようです。\n今年は JR の大事故が2件有りました。うち1件はまだ最中です。\n1件目のJR西の事故は、人災といえるものでした。事故と言わず大虐殺と呼んでも差し障りないかと思います。あれで JRの悪いところがどんどん見えてきましたが、やはり氷山の一角の様な気がしてなりません。\n来年以降も注意が必要だともいます。\n\nまた今年は、いろいろな法律も制定されました。個人情報保護法や偽装キャッシュカードでの盗難なども来年から保証されるようになりました。いささか遅い様ですが一歩前進と評価されても良いと思います。\n\n他にもいろいろ有りましたが、皆さんはどのニュースが一番印象に残っていますか？','',1,2451,15,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060104_not_need_to_be_warm_up',3,0,'2006-01-04 14:24:17','暖機運転って必要ない？',null,'<p>近頃、京都議定書関連で CO2 排出量 6% カットのためか車の暖機運転をやめさせようとする動きが目立ってきてるように感じていた。<br />\r「最近の車は暖機運転が必要ないですよ」という甘い誘いに乗って車の寿命を縮めたら大変だと、その甘言に乗らぬようなるべく水温計ランプが消えるまで暖気をしていた。</p>\r<p>実際にメーカー的には、暖気の必要性があるのかディーラーに聞いてみたところ、不要と回答をいただけた。<br />\r最近の車で暖機運転が必要なのは、以下の理由かららしい。<br />\r<ol><li>エンジンが冷えていると回転数が高くなるため、ブレーキを強く踏む必要が出てくる</li>\r<li>この季節、暖房をしても暖機していないとすぐには暖房が効かない</li></ol><br />\r暖機運転がいらないなら、早く出れて地球にも優しい...良いことですな...</p>\r<p>昔は夏でも暖機した方がいいとか言ってる人もいたのに...</p>\r','',1,3575,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:12','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060104_1934',3,0,'2006-01-04 19:34:32','裏ブリンにいけるようになりました',null,'<p>最近はまってるゼネピックオンラインですが、今日やっと「知恵の書」を手に入れることが出来き、レベル35のクエストを終了することが出来ました。<br />\rキャラクターのレベルも45になっていたため、鍵のクエストもすぐに終了しました。<br />\rめでたく、「裏ブリン」への道を開くことが出来ました。</p>','<p>ところで、クエストに必要な「知恵の書」はベルテラニンの森(通称お化けマップ)で「ガディプラント」が落とすのですが、「知恵の書」が取れたわけではなく、「無文のカスツルレドの書」が取れたので交換♪</p>\r<p>「無文のカスツルレドの書」の取り方が結構間抜けで、F4キーに戦士の攻撃スキルである「シャープウェポン」を登録しているのですが、モンスターを倒してアイテムをひろうキーがALTなんですね。<br />\rでF4キーでとどめを刺したとたんにアイテムをひろわないと他の人にひろわれてしまうので、F4キーを押すとほぼ同時ぐらいにALTキーを連打してしまいました（＞＜；）。</p>\r<p>すると、ゼネピックが終了してしまうんですね。まあ、Windowsのアプリの終了がALT+F4なので仕方がないのですが、CloseQueryイベントを実装していればいきなり終了せず終了ダイアログがでると思うのですが...<br />\rまあ、間抜けにもそんな感じでボスを倒すか倒さないか確認するまもなく終了してしまったので、もう取れていないと諦めてたんですが...再度ログオンした際に誰も取ってないという話をされていたので、ALTキーを押した覚えがあったので念のために所持品を買う人してみると驚くことに入っていたっていうような感じです。＜もう、だめだめ<br />\r今回で同じ落ち方をしたのは2度目なんですが、登録が悪いとその前には覚えていても、興奮すると忘れてしまうものですね...</p>\r<p class=\"add\">01/20 追記<br />\rファイターの転職にはトラミスリングが必要だそうで、転職するにはレベル35のこのクエストを終了させる必要があるようです。</p>',1,2608,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:45','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060112_come_in_assist_bike',3,0,'2006-01-12 21:38:24','電動自転車が当たった',null,'<p>本日、電動自転車が当たりました。</p>\r<p>ホンダの新春初売りセールのイベントで、名前を書いておいたのが今日抽選だった様です。<br />\rお昼におやつを買いに工場内の売店に行ったのですが、その間に電話があったようです。<br />\r帰ったら、「電話が鳴ってたよ」と言われたので、確認してみると留守電にその旨が残されていました。</p>\r<p>買いに行く際に、「電話忘れた、なったらやだなー」と思っていたのですが、こういう電話だったら全然問題ないですね...</p>','',1,3916,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:56','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060113_round',3,0,'2006-01-13 17:56:22','数値の丸め方っていろいろあるんだ','','<p>数値を扱う際に数値を丸めることは日常的に行われています。<br /> その方法は、切り捨て/切り上げ/四捨五入 と考えるのが最も一般的であるかと思います。<br /> このように列挙すると他に何があるの？と言う話になりますが...<br /> 四捨五入には実はいろいろな方法があるようです。数年前、Delphi の四捨五入の方法が、一般的によく使用されている下記のような半ば常識とした四捨五入の方法と異なっていることから、Delphi の四捨五入の実装方法である Banker\'s Rounding (=IEEE754 で規定されている) の内容を調べたことがあります。<br /> その四捨五入の方法とは下記のような仕様でした。</p>\r\n<blockquote>基本的には最も近い整数値に丸めつつも，上下の整数が等しく近い場合には偶数となる方を優先する。<br /> 具体的には、丸めたい一つ下の桁を参照して、その数字が4以下であれば切り捨て6以上であれば切り上げする。5の場合は特殊で、1桁上(丸めたい桁)が奇数なら切り上げそうでなければ切り捨てする。</blockquote>\r\n<p>この調べものの際に、Microsoft の<a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;196652\">丸めを行うカスタム プロシージャを実装する方法</a>を参照したことがあります。<br /> このページにはいろいろな丸めの方法が記載されており、そのコーディング方法も記載されていて非常に参考になりました。<br /> 最近また見る機会があったので、知らない人もかなり多かったこともあり、自分のメモがてら載っけておきます。</p>','<p>以下のような、丸めが記載されています。</p>\r\n<ul>\r\n<li>切り捨て</li>\r\n<li>切り上げ</li>\r\n<li>算術型丸め</li>\r\n<li>銀行型丸め</li>\r\n<li>ランダム丸め</li>\r\n</ul>\r\n<p>また、それぞれに</p>\r\n<ul>\r\n<li>対称</li>\r\n<li>非対称</li>\r\n</ul>\r\n<p>が定義されています。</p>\r\n<p>&nbsp;それぞれ利点があるんでしょうが、あまりデータの中身を検討せずに四捨五入を選択した際には、算術型丸めか銀行型丸めを使用しています。ランダムは使用したことがありません。<br /> この二つの選択基準として、特に指定が無くデータが統計的もしくは科学的用途であった場合には銀行型を、販売管理系などアプリの作成において顧客から特に指定があるときには算術型が指定されているのでそれを選択しています。科学的要素が多い場合は四捨五入による1方向への偏りが問題になるのでしょう。しかし、B2Bの際の四捨五入なんて双方の取り決めだけの話ですし、1円単位の積算誤差なんて取引額に比べればたかが入れている場合が多いので、仕様が簡単で一般的に知られている＆確認しやすい算術型なのでしょうね。でも、銀行では偏りが無視できなかったために偏りの無い丸めを採用したんですね。貸す件数よりも預かる件数のほうが圧倒的に多そうですね。圧倒的に件数の違いが発生すると無視出来なさそうです。</p>\r\n<p>何か明確な意識を持って、丸めを選択している。または、丸めでこんなトラブルがあったなど経験談なんかありましたら、コメントでも残してもらえるとうれしいです。</p>\r\n<p class=\"add\">2008-12-02 追記<br /> 最近気づいたのですが、Cは算術/対象型なのですね。ISO/IEC C99 で定義されているようです。</p>',2,8841,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://support.microsoft.com/default.aspx?scid=kb;ja;196652\">丸めを行うカスタム プロシージャを実装する方法</a>',0,1,1,0,0,'2019-07-01 16:38:12','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060116_error_1328_ccon',3,0,'2006-01-16 13:12:33','Error 1328. ファイル C:Config.Msixxxx.tmp へのパッチ適用エラー',null,'<p>今更ですが、既存のDelphi3で動作しているシステムをDelphi2006以降にアップグレードできるのか評価する目的で、Delphi2005を作業場の環境にインストールしたので、Update3まで適用することにしました。<br />\rいきなり、Update3を当てに行くと...</p>','<blockquote>Error 1328.ファイル C:Config.MsiPTxxx.tmp へのパッチ適用エラー。ファイルはすでに他の方法で更新されていて，このパッチが適用できない可能性があります。詳しくはパッチの発行者にお問い合わせください。</blockquote>\r<p>(._. )( ･_･)(･_･ )( ･_･)アレ？<br />\rっていきなりUpdate3は導入できないんですよね..(-。－；)<br />\r気を取り直して、Update2を導入しても...(._. )( ･_･)(･_･ )( ･_･)アレ？<br />\rで、Googleでぐぐってみると...<a href=\"http://www.borland.co.jp/delphi/devsupport/d7update1.html\">Borland - Delphi 7 アップデート 1</a>に「無視」をクリックして進みなさいと...<br />\r過去のバージョン向けの情報だが既知の問題か～と、ひたすら「無視」をクリックしながら突き進む...<br />\rいやーな予感が...ファイル名を見直すとUpdate3がd2005_ja_pro_upd3.exeなのにUpdate2はD2005_PRO_upd2.exe？...jaが無い...英語版導入してました...<br />\r上から日本語版入れ直そうと思ったけど、チェックがかかって、Update対象が無いよ..って...</p>\r<p>チェックできるのなら、はじめから間違った言語のUpdateを導入できないようにチェックしておいてほしいと思うのは私だけでしょうか...＜自分のミスをなすりつける...</p>\r<p>仕方がないので、Delphiを最初から再導入しました。<br />\rきちんと導入すると、何の問題もなく導入できました。 <br />\rしかし、この現場も将来的にDelphiを捨てる結論になりそうです。将来はWEBと.Net...<br />\rDelphiのシェアってどんどん減ってるように思いますが、Delphiユーザのみなさん大丈夫ですか？</p>',1,4703,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.borland.co.jp/delphi/devsupport/d7update1.html\">Borland - Delphi 7 ア',0,1,1,0,0,'1999-11-30 00:00:22','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060117_xoops',3,0,'2006-01-17 21:07:34','XOOPS で',null,'<p>XOOPS で新しいサイトを作ったのですが、どうも一部の機能が正常に動かなくて困っていました。<br />\rそこで XOOPS Cube の質問箱フォーラムで、ご質問させて頂いたら数時間で解決に...さすが本家のフォーラム！</p>','<p>原因は、とても馬鹿な様なのですがディレクトリのアクセス権を <strong>777</strong> に設定しないといけないのですが、レンタルサーバが <strong>777</strong> を禁止しています。そこで<strong>707</strong> にしようと思っていたのを、php ファイルと同様に <strong>705</strong>に設定してしまっていました。さらに日をおいたためにそれで合ってると思いこんでいたのが間違いでした。</p>',1,4032,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:08','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060117_blog_designed_with_dreamweaver',3,0,'2006-01-17 23:12:33','Blog のテンプレート編集方法の変更',null,'<p>Blog のテンプレート編集方法を直接入力から、DreamWeaver によるファイル編集に切り替えました。\rこれでふつうのページ、Blog(MovableType)、ダウンロードサイト(XOOPS)のシームレスな変更を行うことができるようになりました。</p>\r<p>後は掲示板の XOOPS への移行だけだな～。過去データも移動させたいんだけど時間が...</p>','',1,4103,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:12','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060118_google_personalized_page',3,0,'2006-01-18 00:08:47','Google ってすごい',null,'<p>Google の「パーソナライズド ホーム」ってすごいですね！<br />\r今までにも自分の好みに合うように、カスタマイズできるポータルはあったのですが、この「パーソナライズド ホーム」は選択したコンテンツを好きな位置に、ドラッグアンドドロップで！移動できるところにあります。</p>\r<p>数ヶ月ほど前からこのすごい機能が備わっていたのですが、他の検索サイトにはこの機能は追加されていませんね...<br />\r特許がらみなのでしょうか？<br />\r便利な機能なので他のサイトにも広まるといいですね。</p>','',1,2727,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060118_clickonce',3,0,'2006-01-18 01:10:02','ClickOnce',null,'<p>ClickOnceはすごく便利な機能です。特に企業で(向けの)アプリケーションを作成している方には、非常に有益な機能だと思います。詳細は<a href=\"http://www.microsoft.com/japan/msdn/net/winforms/clickonce.asp\">マイクロソフトのページ</a>に書かれていますし、<a href=\"http://www.atmarkit.co.jp/fdotnet/clickonce/clickonce01/clickonce01_01.html\">＠ITでも連載が始まった</a>のでそちらを参考にしてください。</p>\r\r<p>簡単に言うと、ClickOnceはユーザが使用するアプリケーションを、<strong>最新の状態に維持してくれる</strong>機能です。\rもちろん、不具合が発生したときにはロールバックも可能ですし、インストールしなくてもWEBアプリの様にインストールせずに使用することも可能だと言うことです。</p>\r\r<p>ClickOnceで思い違いをしていたことがありまして、MSCのデモで起動時にClickOnceでバージョンアップ、ロールバックをしていたので、てっきり「起動時にチェックする機能なのだ」と思いこんでいました。<br />\r工場のようにずーっと起動中のシステムですと、バージョンアップの機会が無いので、入力画面などですと「登録」ボタンなどで、バージョンチェックして強制終了かけて再起動かけてもらうかするか、と思っていました。<br />\rできれば、APIでアプリケーション実行中にClickOnceの機能が呼び出しできて自身を更新できればいいなとも思っていました。</p>\r\r<p>実はできたんですね。先ほどのマイクロソフトの「ClickOnce によるクライアント アプリケーションの配置の紹介」ページにて以下のように記載されていました。</p>\r<blockquote><strong>アプリケーションの更新</strong><br />\r更新には配置オプションと同様の柔軟性があります。(アプリケーションの開始時など)特定の時点に更新できます。また、アプリケーション開発者が適切な更新APIを呼び出すことを選択したときはいつでも更新できます。特定の更新が必須であることを指定し、ユーザーが利用可能な更新を無視できないようにすることも可能です。稼動中の更新を管理し、ユーザーベース全体を新しいバージョンに適宜、確実に移行するためには、この必須更新機能が重要になります。</blockquote>\r<p>この記載から、企業向けシステムに必要な機能が二つ読みとれました。\r<ul><li>アプリケーション開発者が、いつでも更新できる。(稼働中でも)</li><li>ユーザーが利用可能な更新を無視できないようにすることも可能</li></ul></p>\r<p>これで、複数のバージョンが混在することによって、入力がおかしくなると言うことは無くなりますね。</p>','<p class=\"add\">01/18 追記<br />\r<a href=\"http://www.microsoft.com/japan/msdn/thisweek/10lines/vs2005/ClickOnce/cs.aspx\">10 行でズバリ !! ClickOnce (C#)</a><br />\rにズバリそのもののコードがありました。<br />\r必要な方は、掲載記事を見て実行してみてはどうでしょうか？</p>',1,7370,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.microsoft.com/japan/msdn/net/winforms/clickonce.asp\">マイクロソフトのページ</a>\n<a href=\"http://www.atmarkit.co.jp/fdotnet/clickonce/clickonce01/clickonce01_01.html\">＠ITでも連載が始まった</a>\n<a href=\"http://www.microsoft.com/japan/msdn/thisweek/10lines/vs2005/ClickOnce/cs.aspx\">10 行でズバリ !! ClickOnce (C#)</a>',0,1,1,0,0,'1999-11-30 00:00:49','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060119_conversation_in_elevator',3,0,'2006-01-19 13:00:05','あるエレベータないでの会話',null,'<p>今日のお昼休み、とあるエレベータでの会話。</p>\r<p>男A：「いくら水道水でもトイレの水は飲みたくないでしょ？」<br />\r男B：「まぁ」<br />\r男A：「じゃあ、純水でも飲みますか？、工場のXXXから汲んできますよ。」<br />\r男B：「でも、純水飲んだらおなか壊すって言わない？」<br />\r男A：「聞きますね」<br />\r...おなか壊すだけですむと思ってるんでしょうか？やばいですね...<br />\rくろねこ：「胃が破れますよ！」<br />\r男A&amp;B：「破れるんだ...」</p>','<p>胃が破れる理由ですが、人間の体は細胞でできています。胃や食道も同様です。<br />\r細胞は、細胞膜で覆われていて中身は細胞液で満たされています。（この中にいろいろ重要な機能があります。）<br />\rまた、細胞膜は水を通すことができます。<br />\rで、純水を飲むと細胞膜を挟んで<br />\r&nbsp; 細胞液(高濃度)｜細胞膜｜純水(低濃度)<br />\rと言う形になります。<br />\r浸透圧の原理で、細胞膜の両側で濃度を等しくしようとする力が働きます。<br />\r結果純水は細胞の中に入り込んできて、細胞はパンクしてしまいます。</p>\r<p>だから、純水を飲まずに水道水などの適度に汚れた水を飲まないといけないのです。<br />\r純水なんか飲んだら最悪死んじゃうかも...</p>',1,3000,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:42','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060122_integration_HONDA',3,0,'2006-01-22 21:11:35','ホンダ自動車販売の三社が統合されるらしいです',null,'<p>ホンダ自動車販売の三社が統合されるらしいです。</p>\r<p>ホンダの自動車を売っている、プリモ・クリオ・ベルノが統合されて一つになるようです。<br />\r今のそれぞれの販売会社ですべての車種が販売できるようになるようですが、もうすでに顧客の層が出来てる中でメリットはどの程度あるのでしょうか？<br />\r個人的に思うに、一番得するのはベルノなんでしょうか？ベルノはスポーツ向けの車種ばかりで、かなりマニアックなので売れてる台数は少なめだったのではないでしょうか？<br />\r利益率は高そうですけど...</p>','',1,4234,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:24','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060122_get_assist_bike',3,0,'2006-01-22 23:29:11','01/22 電動自転車を頂きました','','<p>先日当選した電動自転車を頂きました。電動自転車は HONDA STEP COMPOでした。</p>\r<p>永らく展示されていた展示品らしく、箱も説明書もないとのこと。<br />まあ、それでも動けば問題ないのですが、バッテリーは古くなっていたので新品を用意して充電してくれていました。(バッテリーで1万数千円するそうです)<br />マニュアルがないので、メーカサイトで調べたら生産終了品で、サイトの<a href=\"http://www.honda.co.jp/motor-lineup/stepcompo/\">コンテンツ</a>提供も終了していました。<br />今日は、雪が降っていて乗れなかったので、また乗った感想を書きたいと思います。</p>','',1,3363,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.honda.co.jp/motor-lineup/stepcompo/\">コンテンツ</a>',0,1,1,0,0,'2012-07-02 06:58:17','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060123_irresponsible_people',3,0,'2006-01-23 23:50:09','無責任な人たち',null,'<p>米国産牛肉輸入再禁止に伴って、いろいろな個人・法人の意見がWEB上に上げられているが、客観的に見て明らかに無責任じゃない？と思う記事が合ったのでご紹介。</p>','<dl><dt>まず、<a href=\"http://www.yomiuri.co.jp/editorial/news/20060120ig91.htm\">１月２１日付・読売社説（２） : 社説・コラム : YOMIURI ONLINE（読売新聞）</a>から </dt><dd>輸入禁止のニュースを最初に見たのがこのページ、こう書かれていた。<br />\r国際的には、月齢３０か月以上の牛を検査対象とすることが大勢だ。日本もこの基準を採用することが妥当だろう。危険部位が確実に除去されていれば、何の問題もない。 何を根拠に国際的に採用されている基準が、安全上問題ないといえるのだろうか？多少の安全上の問題を無視して利益を追求する企業・国は多々ある。国際的に一般的であっても鵜呑みにせず、自国で安全性と利益を天秤に掛け自身で自国のルールを決めていくことが、独立国なのだと思う。でなければ、国際基準を国連で決めてそれに従えば良いと言うことになってしまう。<br />\rまた、「危険部位が確実に除去されていれば」と言う前提だが、少なくとも米国ではその基準は守られていなかったし、今後守られるという保証もない。また他国がこの基準を守り続けるという保証もない。<br />\rやはり、再輸入禁止は当然であろう。時期尚早であったのだ。 </dd><dt>次に、<a href=\"http://chubu.yomiuri.co.jp/news_top/060121_1.htm\">牛肉不信　やっぱり　米国産輸入再禁止　「厳しい措置　当然」　牛丼派はガッカリ : ニュース : 中部発 : YOMIURI ONLINE（読売新聞）</a>から </dt><dd>横川会長は「輸入再開まで２年も耐えてきた人たちには大変な打撃だ。危険部位が混入していたからといって、すぐに危険というわけではない。政府は、大人の判断で問題に対処してほしい」と話した。 大人の判断って何なんでしょうね。外食業界の利益を生むように安全性の低い食品を消費者に提供できるようにと言うことでしょうか？別に牛肉は米国産以外でも確保できるし、いつか米国産が輸入できると待っているから他のルートの確保ができないのではないでしょうか？全ての食品が安全性で100%満足できるものだとは思いませんが、BSEのようにかかった時の対処方法が確立されていない病気への安全性はできる限り高い方が良いと思います。<br />\r米国産牛肉の危険部位を食べてかかる病気が風邪程度であるなら、再輸入禁止は行き過ぎだと思いますけどね。<br />\r事前設定になかったと言われる、再輸入禁止という強力な対処を選択した小泉君は、少なくとも横川よりは世論を理解していると思います。<br />\rもしどうしても横川が牛肉を輸入販売したいと言うのなら、BSE発症時の責任を<strong>疑わしき</strong>場合も含めて、<strong>厚く保証</strong>すると言うのであれば考える価値はありますが。<br />\rまあ、彼にはそれほどの力量も信望も無いでしょう。<br />\rまあ、牛丼は早く食べたいですけどね。</dd></dl>',1,3090,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.yomiuri.co.jp/editorial/news/20060120ig91.htm\">１月２１日付・',0,1,1,0,0,'1999-11-30 00:00:16','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060126_clickonce',3,0,'2006-01-26 19:41:00','ClickOnce がようやく動いた',null,'<p>先日から、VS2005の気になる機能であるClickOnceのサンプルを試しているのだが、何度作成し直してもいつも実行時エラーになる。<br />\rサンプルは、MSDNの<a href=\"http://www.microsoft.com/japan/msdn/thisweek/10lines/vs2005/ClickOnce/cs.aspx\">「10 行でズバリ !! ClickOnce (C#)」</a>なのであるが、実行すると下記の部分でエラーが発生する。</p>\r<blockquote>ApplicationDeployment deply = ...</blockquote>\r<p>エラー内容は、下記のとおり。</p>\r<blockquote>InvalidDeploymentException はハンドルされませんでした。</blockquote>\r<p>トラブルシューティングのヒントとして、下記のとおりマニフェスト周りとされているが、このアプリケーションマニフェストの作成手順が全くわからなかった。メニューにも作成方法はないし、そもそもVS2002でしかさわる必要が無いのでは？と思っていたファイルなのだ。</p>\r<blockquote>このアプリケーションのマニフェストが有効であることを確認します。 </blockquote>\r<p>仕方が無いので、Visual Studio Users Groupの初心者何でもフォーラムで聞いてみる...<br />\rその投稿は、<a href=\"http://vsug.jp/tabid/63/forumid/72/postid/2245/view/topic/Default.aspx\">アプリケーションマニフェストの作成手順</a>なのであるが、小野＠どっとねっとふぁん様の指摘により、元のソースコードが間違っていることが判明、よく見ると確かに ClickOnce を使っているか判定する if 文が二箇所にあるのだが、二箇所が全く正反対の意味で使われていた。<br />\r全く、元のソースに間違いがあるなんて思ってもいなかったので、全然気づかなかった。</p>','<p>忘れないように、修正したコードをメモを残すことにする。&phi;(≧。≦)最近物忘れが激しくてのぉ。。。。</p>\r<pre>using System.Deployment.Application;\r\r<span class=\"preblue\">private void</span> button1_Click(<span class=\"preblue\">object</span> sender, <span class=\"prebluegreen\">EventArgs</span> e)\r{\r    <span class=\"pregreen\">// ClickOncenでインストールされたか確認</span>\r    <span class=\"preblue\">if</span> (!<span class=\"prebluegreen\">ApplicationDeployment</span>.IsNetworkDeployed)\r    {\r        <span class=\"prebluegreen\">MessageBox</span>.Show(<span class=\"prebrown\">&quot;ClickOnce を使用していません。&quot;</span>);\r       <span class=\"preblue\">return</span>;\r    }\r    <span class=\"pregreen\">// 強制的にアップグレード</span>\r    <span class=\"prebluegreen\">ApplicationDeployment</span> deploy;\r    deploy = <span class=\"prebluegreen\">ApplicationDeployment</span>.CurrentDeployment;\r    deploy.Update();<span class=\"pregreen\">//アップグレードの実行</span>\r    <span class=\"prebluegreen\">MessageBox</span>.Show(<span class=\"prebrown\">&quot;更新終了。再起動します。&quot;</span>);\r    <span class=\"prebluegreen\">Application</span>.Restart();\r}\r<span class=\"preblue\">private void</span> Form1_Load(<span class=\"preblue\">object</span> sender, <span class=\"prebluegreen\">EventArgs</span> e)\r{\r    <span class=\"pregreen\">// ClickOnce でインストールされていた場合、バージョン表示</span>\r    <span class=\"preblue\">if</span> (<span class=\"prebluegreen\">ApplicationDeployment</span>.IsNetworkDeployed)\r    {\r        <span class=\"pregreen\">// 現在のバージョンをタイトルバーに表示する</span>\r        <span class=\"prebluegreen\">ApplicationDeployment</span> deploy = <span class=\"prebluegreen\">ApplicationDeployment</span>.CurrentDeployment;\r        <span class=\"prebluegreen\">this</span>.Text = deploy.CurrentVersion.ToString();\r    }\r}\r</pre>\r<p>修正したら、他は問題なく動作しました。</p>\r<p>以前も書いたのだが、登録フォームなどの登録ボタンにこの機能を割り当てようと思っている。<br />\rずっと登録画面で放置されている場所では、ここしか登録する場所がない。（￣□￣；）！！<br />\rいつもメニューに戻ってくれるなら、メニューのボタンに登録する方が楽なのだが...<br />\r登録ボタンに割り当てると、せっかく入力した内容が消えることになるので、次は入力した内容を XML ファイルに保存しておいて、再起動後に読み込めればいいかな(その項目があった場合。入力チェックが変わってたら面倒だな...)と考えている。</p>',1,9160,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.microsoft.com/japan/msdn/thisweek/10lines/vs2005/ClickOnce/cs.aspx\">「10 行でズバリ !...</a>\n<a href=\"http://vsug.jp/tabid/63/forumid/72/postid/2245/view/topic/Default.aspx\">アプリケーションマニフェストの作成手順</a>',0,1,1,0,0,'1999-11-30 00:00:54','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060201',3,0,'2006-02-01 22:22:46','ときめきメモリアルオンライン の先行きが...',null,'<p>本日14:00～ ときめきメモリアルオンラインの&beta;２テストが開始される予定でした。</p>\r<p>帰ってきたら、嫁さんがおいらのパソコンを占有中...まあ、いいけど...</p>\r<p>先日、&beta;2テスター用の URL を書いたメールが届いていたので、ダウンロードは済ませておきました。<br />\rですが、インストールとレジストレーションコードの取得がまだでしたので、インストールをしながらレジストレーションコードの取得をおこなう。<br />\rレジストレーションコードの取得をしようとときめものサイトに行ってみると、ページ右側に「学校」（たぶん独立したゲーム空間。ウルティマだとシャードかな？）の状況が表示されているのが目に入った。<br />\r&Sigma;(￣ﾛ￣|||)なんだ!?<br />\r両校ともメンテナンス中なのです。まじかよ...今日始まったばかりでしょ...<br />\rしかも、&beta;２テストが遅れた原因が、「先に行われた&beta;テストの内容を反映して、よりよい内容にするため」だったと記憶しているのですが...</p>','<p>まあ、そのうちに稼働するだろうと、レジストレーションコードの取得手続きを行う。<br />\rレジストレーションコードの取得には、「KONAMI ID」と「パーソナルキー」の二つが必要。<br />\r両方とも忘れていたので、両方とも再取得を行う。忘れたときの再取得は至って簡単。<br />\r「KONAMI ID」はメールアドレスだけ、「パーソナルキー」は、KONAMI ID とメールアドレスそして秘密の質問の答えが必要だ。<br />\rメールアドレスで悩むやつはそんなにいないだろうからいいんだけど、答えがわからん。(￣- ￣ ) ンーっと。<br />\r本当は答えは知っていたんだけど、ひとつの答え入力するのにも、全角半角・ひらがなカタカナ・大文字小文字など様々な問題が解答をじゃまするのです...<br />\rまあ、無事にレジストレーションコードの取得が完了。</p>\r<p>でも、サーバはメンテ中だったのとお知らせに復旧の時刻が未定との連絡が掲載されていたので、ゼネピックでもしながら待つ...<br />\r真夜中1時頃まで待ちましたが、結局復旧はしませんでした。</p>\r<p>戦闘もの以外のオンラインゲームは初めてなので、どの様な感じになるのか楽しみです。</p>\r<p class=\"add\">02/02 追記<br />\r朝になってもつながりませんでした。ORZ</p>\r<div class=\"add\">\r<p>02/02 追記<br />\r以下の内容とお詫びが掲載されていました。遅らせたのは品質向上のためではなく、それ以前の問題であった可能性もあります。 </p>\r<blockquote>お詫び （2006.02.02 17:25更新） 2月1日14時より開始しておりました&beta;2テストですが、サーバートラブルにより一旦休止する運びとなりました。現在のところ、&beta;2テスト再開は2月7日以降を予定しております。度重なる障害が発生し、ご迷惑をお掛けしたことを深くお詫び申し上げます。 <br />\rときめきメモリアルONLINE制作チーム一同 </blockquote></div>',1,3484,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:28','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060203_honda_step_comp',3,0,'2006-02-03 18:43:56','HONDA STEP COMPO',null,'<p>息子を遊ばせるために、車で公園に出かけた。</p>\r<p>もちろんこの前もらった HONDA STEP COMPO を車に積んで...</p>\r<p>息子が公園のアスレチックで遊んでる間、HONDA STEP COMPO でその辺を走ってみた。<br />\r貧乏性なので、電動を ON に出来ず、 ECO で走ってしまった。<br />\rECO だと常時アシストでないためか少し動いた後で、アシストがかかる。<br />\rちょっと違和感があるが、坂道がすごく楽だ。<br />\r普段登れないような坂道も登れる。<br />\r調子に乗って走ってたら、雨上がりだったので泥だらけになってしまった。<br />\r乗る前に気になっていた小さめのサドルは、この前買ったマウンテンバイクよりも柔らかいのか全然気にならなかった。</p>\r<p>最後に思ったこと、下り道ではモーター逆回転で充電してくれるとうれしいのにな...</p>','',1,4687,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:29','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060203_unconstitutional',3,0,'2006-02-03 21:45:56','社民党が自衛隊を違憲とする',null,'<p>社民党が自衛隊を違憲と決めたようです。</p>\r<p>なにやら2007年の参議院選挙対策との声も聞こえてきていますが、実際の所はどうなのでしょうか？<br />\r自衛隊が合憲か違憲かくろねこ的には、違憲ではあると思いますが、その必要性を問われるとむずかしいと思っています。</p>','<p>また同時に社民党は日米安保条約の内容にも踏み込んでいます。<br />\rくろねこ的には、自衛隊の違憲判断よりも、こっちの方が有意義だと思っています。</p>\r<p>まあ、自衛隊などなくても暮らせる世の中が一番良いのですが...</p>\r<p>戦闘機とかはかっこいいので好きではありますが。</p>',1,4115,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:22','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060203_Imperial_House_Law',3,0,'2006-02-03 21:51:21','皇室典範改正で麻生、谷垣氏ら慎重論',null,'<p>皇室典範改正で麻生、谷垣氏らから慎重論が出ているようです。</p>\r<p>しかし、皇室って必要なのでしょうか？<br />\r皇室がなければ、公共の土地にどれだけ多くの公園と住宅が建設できるのでしょうか？<br />\r皇室がなくても政府があれば、外交上の問題はないと思います。</p>\r<p>国民の象徴は天皇でなくても良いのです。また、象徴は天皇であって皇室ではないのです。</p>\r<p>まず、皇室が必要かどうかから議論していただきたいと思います。</p>','',1,3832,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:37','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060203_Conversation',3,0,'2006-02-03 23:16:28','嫁との会話：おしくらまんじゅう',null,'<p>クレヨンしんちゃんで、熱繰 椎造（あつくる しいぞう）先生がおしくらまんじゅうしてるのを見て...</p>\r<p>くろねこ：最近だと押されて怒るなかな...<br />\r嫁：押されてさすなじゃ...</p>\r<p>恐ろしい世の中になったものです...</p>','',1,3274,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:27','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060203',3,0,'2006-02-03 23:56:47','ゼネピックの節分イベント(Lv.53)',null,'<p>本日(2/3)、ゼネピックオンラインで節分イベントがありました。<br />\r<br />\r鬼はゴブリンでした。 図書館クラスのモンスターばかりでしたので、結構きつかったです。</p>\r<p>ストーリーは以下の様です。</p>\r<blockquote>エスネのミュセイオン図書館からモンスターが飛び出してしまいました。魔術師ギルドが特製の豆で応戦したもののそれを持ち去り街の外へ・・・<br />\rここは屈強な冒険者の腕の見せ所です。　クロエバンペスに陣取ったモンスターを撃退してください。<br />\r現れるモンスターはとても強力なので、くれぐれもお気をつけください。</blockquote>\r<p>イベントのアナウンスで開催時間を1時間間違って、20:00～21:00と言ってみたり、「モンスターたちが退却を始めました。あと一息です、がんばってください。」って一度目は良いけど、二度目はその後難易もなかったですぞ。<br />\rまあ、モンスターが現れないなーと思ったら一気に固まって現れたり、さらに人がすごく多いのでシステムが重く叩きに行ったらいきなり死んでた何って状態でした。</p>','<table>\r    <caption>節分イベントでドロップしたアイテム</caption>\r    <tbody>\r        <tr>\r            <th>名称</th>\r            <th>効果</th>\r        </tr>\r        <tr>\r            <td>豆</td>\r            <td>HP回復:30(普通の豆)</td>\r        </tr>\r        <tr>\r            <td>小豆</td>\r            <td>HP回復:1000(ジュースと同じ)</td>\r        </tr>\r        <tr>\r            <td>大豆</td>\r            <td>HP回復:10000(ジュースの10倍)</td>\r        </tr>\r        <tr>\r            <td>悪祓豆</td>\r            <td>攻撃+5，魔法攻撃+5</td>\r        </tr>\r    </tbody>\r</table>\r<p>イベントで良かったのはドロップ品の豆四種類のうち、普通の豆はさておき、 この悪祓豆、たいしたことないな～と思っていたら、三つ装備するとかなりすごい。<br />\rファイターのリングとトミラスリング、さらにライフガードもはずして、今はこれを三つ装備中です。<br />\rでは、SSで当時の状況をって、全然状況がわからないSSばかりしか取れませんでした。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_1.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_2_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_2.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_3_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_3.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_4_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_4.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_5_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_5.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060203_6_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060203_6.jpg\" alt=\"\"></a></p>',1,3429,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo060203_1_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060203_2_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060203_3_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060203_4_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060203_5_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060203_6_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:17','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060205',3,0,'2006-02-05 08:20:53','ボスを倒してレベルアップ！(Lv.54)',null,'<p>次のレベルアップのSSはどこで取るか？と考えたとき、今ボス待ちしてるのでボスを倒してレベルアップできたらいいな...と漠然と思った。<br />\rそのときくろねこは、ゼロマインB2FとB3Fのミスリルホウディグとミスリルディグ倒すために、時間に合わせて行ったり来たり...</p>','<p>経験値が99.89%まで確認して、もうすぐボス時間だな～と思ってたらいきなり目の前に！！<br />\r<img width=\"400\" height=\"500\" src=\"http://www.blackcat.xyz/images/articles/xo060205_1.jpg\" alt=\"\"></p>\r<p>そのとき、気づいたのがミスリルディグって現れたときに、「来るだわさ！」って言ってるんですね。<br />\r朝の2：30頃にもミスリルホウディグを倒したSSがあったので確認してみると、同様に「来るだわさ！」って言ってました。<br />\rしかし、魔神の血のドロップはないですね...<br />\r一回取ってみたいんですが。</p>',1,2752,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:53','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_del0062',3,0,'2006-02-06 23:37:07','[Delphi] DUnit を使ってみる','','<p>テストの効率化をねらって、DUnit を試してみたので、DUnit テストプロジェクト作成の手順をまとめてみた。</p>','<ol>\r    <li>DUnit をダウンロードする。<br />\r    <a href=\"http://dunit.sourceforge.net/\">http://dunit.sourceforge.net/</a></li>\r    <li>テストプロジェクトを作成する。<br />\r    ファイル｜新規作成｜アプリケーション</li>\r    <li>フォームを削除する。</li>\r    <li>ユニットを追加する。：ファイル｜新規作成｜ユニット</li>\r    <li>下記のようにプロジェクトソースを編集する<br />\r    <ol>\r        <li><strong>uses</strong> 節に以下の 2 ユニットを追加する。<br />\r        <pre class=\"brush: delphi;\" title=\"DUnit導入\">\rTestFramework, GUITestRunner\r</pre>\r        </li>\r        <li>以下の 3 行を削除する<br />\r        <pre class=\"brush: delphi;\" title=\"DUnit導入に伴う削除部分\">\rApplication.Initialize;\rApplication.CreateForm(TForm2,&nbsp;Form2);\rApplication.Run;\r</pre>\r        </li>\r        <li>以下の行を追加する<br />\r        <pre class=\"brush: delphi;\" title=\"DUnit導入に伴う追加部分\">\rGUITestRunner.runRegisteredTests;\r</pre>\r        </li>\r        <li>編集後、下記のようになる。<br />\r        <pre class=\"brush: delphi;\" title=\"DUnit導入したプロジェクトソース\">\rprogram UnitTest;\r\ruses\r  Forms,\r  TestFramework,\r  GUITestRunner,\r  UUnitTest1 in \'UUnitTest1.pas\';\r\r{&#36;R *.res}\r\rbegin\r	GUITestRunner.runRegisteredTests\r//	Application.Initialize;\r//	Application.CreateForm(TForm1, Form1);\r//	Application.Run;\rend.\r</pre>\r        </li>\r    </ol>\r    </li>\r    <li>下記のようにテストユニットを作成する<br />\r    <pre class=\"brush: delphi;\" title=\"DUnit:テストユニット\">\runit UUnitTest1;\r\rinterface\r\ruses\r	TestFramework, GUITestRunner;\r\rtype\r	TTestUnit1= class(TTestcase)\r	protected\r		procedure SetUp; override;\r		procedure TearDown; override;\r	published\r		procedure Case_TestOK1; virtual;\r		procedure Case_TestOK2;\r		procedure Case_TestNG1; virtual;\r	end;\r\rimplementation\r\rprocedure TTestUnit1.SetUp;\rbegin\rend;\r\rprocedure TTestUnit1.TearDown;\rbegin\rend;\r\rprocedure TTestUnit1.Case_TestNG1;\rbegin\r	check(false, \'TTestUnit1error\');\rend;\r\rprocedure TTestUnit1.Case_TestOK1;\rbegin\r	check(true, \'\');\rend;\r\rprocedure TTestUnit1.Case_TestOK2;\rbegin\r	check(true, \'\');\rend;\r\rinitialization\r	TestFramework.RegisterTest(\'\', TTestUnit1.Suite);\r\rend.\r</pre>\r    </li>\r</ol>\r<p>上記は最も基本的な例なので、実際にはテストする内容に合わせて、テストクラス＆メソッドを作成する。<br />\rテストメソッドは、published スコープにすること。</p>\r<p>テストクラスのデフォルトメソッド：</p>\r<table>\r    <tbody>\r        <tr>\r            <th>メソッド名</th>\r            <th>メソッド説明</th>\r        </tr>\r        <tr>\r            <td>SetUp</td>\r            <td>テストの準備作業を行う</td>\r        </tr>\r        <tr>\r            <td>TearDown</td>\r            <td>テストの後始末を行う</td>\r        </tr>\r    </tbody>\r</table>\r<p>Checkメソッドの説明：</p>\r<table>\r    <tbody>\r        <tr>\r            <th>順序</th>\r            <th>メソッド説明</th>\r        </tr>\r        <tr>\r            <td>1</td>\r            <td>テスト結果：true = テストOK、false = テストNG</td>\r        </tr>\r        <tr>\r            <td>2</td>\r            <td>エラー時のメッセージ</td>\r        </tr>\r    </tbody>\r</table>',1,9251,1,0,'1970-01-01 09:00:00',0,'<a href=\"http://dunit.sourceforge.net/\">http://dunit.sourceforg...</a>',0,1,0,0,0,'2011-02-14 10:53:56','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060207',3,0,'2006-02-07 18:40:02','終わってるよ...ときめも',null,'2/7 に延期になっていた「ときめきメモリアルオンライン」ですが、どうやら再度延期のようです。<br />\nこれで3度目の延期？<br />\nたしか、最初は年末の予定だったの記憶しているのですが...<br />\n今度は無期限延期で再開の見込みはないようです...<br />\n<br />\nもう、あんまり当てにはしないので、心ゆくまでメンテしてください...<br />\n\n以下、公式ぺージのアナウンス内容です。\n<blockquote>βテスト再開日時についてのお知らせ （2006.02.07 11:20更新） \n7日（火曜日）以降に開始予定とのご案内を行っておりましたが、調査の結果、ログインサーバの修復に更なる時間を要することが確定いたしました。現在、全力で修復に努めております。\n現時点でのβ2テスト開始予定日時は未定ですが、確定し次第、KONAMI IDにご登録いただいておりますメールアドレス宛にご連絡いたします。\nテスト再開を心待ちにされている皆様には大変恐縮ではありますが、何卒ご理解ご協力をいただけます様お願い申し上げます。 </blockquote>','あ、公式ぺージでキャラ作成のお試し版がありました。<br />\n<br />\nちょっとやってみるとおもしろいかもしれません。<br />\n<a href=\"http://tokimemo-online.konami.jp/\">キャラメイクを体験する</a><br />\nえーっと、名前は「黒野 猫雄」で、ってキャラの雰囲気が変わるのは頭と制服ぐらいしか...<br />\nあとは、何かすごく違和感が...<br />\nあと、何か同じようでどこが変わったのかわからないものもあります。<br />\nまだ、開発中なのでしょうね。',1,3082,1,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060207_anpanman',3,0,'2006-02-07 19:52:42','アンパンマンのマーチ',null,'<p>今日、アニメソングのテレビ番組「＜カスペ！＞アニメソングカウントダウン2006」を見ました。</p>\r<p>その中で、初めてアンパンマンのマーチを歌ってる人（ドリーミング）を見ました。<br />\r格好のせいか、思ったより若く見えました。</p>\r<p>そんな、アンパンマンのマーチ ですが、前半部分はとても元気が出てくる良い歌だと思います。<br />\rしかし、後半部分に日頃気になっている部分があります。<br />\rまず、下記のサイトを訪れてアンパンマンのマーチを聴いていただきたい。<br />\r<a href=\"http://www.anpanmanshop.co.jp/flash-test/pyramid.html\">http://www.anpanmanshop.co.jp/flash-test/pyramid.html</a></p>','<p>この歌によると、アンパンマンは、愛と勇気だけが友達だそうです。<br />\rカレーパンマンは？食パンマンは？友達じゃなかったらしいです。</p>\r<p>たしか、「それいけ！アンパンマン キラキラ星の涙」で、氷の女王が食パンマンを氷付けにしたときに、アンパンマンはこう叫んだはずです。「よくも僕の友達を...ゆるさないぞ！」と。</p>\r<p>実は、これは氷の女王をやっつけるための口実でしかなかったのです...<br />\rゆるすまじ、アンパンマン。</p>\r<p>さらにアンパンマンの日頃の行動とつきあわせて考えると、おかしな部分がでてきます。<br />\rそれは、「やさしい 君は」と、アンパンマンが優しいと表現されている部分です。<br />\rこれには疑問を感じずには居れません。<br />\rどうしてかと言いますと、確かにアンパンマンはアンパンマンのばいきんマン以外の周囲にいる者、アンパンマンを頼りにしてくる者にとって寛大で優しいように描かれています。<br />\rしかし、そのものたちに優しくあろうとするが故に全員に対して、優しくすることはできないわけです。<br />\r以前にも書いたが、「キラキラ星の涙」では、アンパンマンはナンダ・ナンダ姫の為に宝石を探し、姫に渡そうと努力します。<br />\rこの困った者を助けるという精神は、非常に優しいといえるでしょう。しかし、探し求める宝石はただ落ちているわけではなく、すでに占有者がいるわけです。それをアンパンマンは有無を言わさず殺害・強奪します。しかも、その求めていた物はほとんどの場合、単なる勘違いだったわけです。この物語の一例では、氷の女王は勘違いで殺害されたわけです。かなり無念だったでしょう。</p>\r<p>アンパンマン、君の優しさは米国の正義と似ているように思う...<br />\r自分の身内、賛同者に対しては優しいが、自分の前に立ちはだかるものは容赦なく叩きつぶす。<br />\r自分が正義であり、自分以外は悪である。<br />\rそれは、米国が世界の警察を気取ってはいるが、内には自国の利益の保護が見え隠れするのと似ている。</p>\r<p>と言うわけで、そう簡単にみんなの夢を守るためという理由で、あちこちに行ってもらっては世界の不利益になる訳なのでやめていただきたい。</p>\r<p>＃アンパンマン、別の歌で顔が変われば元気百倍と言っています。<br />\r＃と言うことはアンパンマン、顔が変わる前はいつも元気は 1/100 だったのです...</p>',1,4247,1,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.anpanmanshop.co.jp/flash-test/pyramid.html\">http://www.anpanmanshop...</a>',0,1,1,0,0,'1999-11-30 00:00:17','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060209_w41t_hdd',3,0,'2006-02-09 12:55:48','W41T で携帯電話に HDD が採用された背景を考える',null,'<p>くろねこが携帯電話になぜ HDD が搭載なのか、考えるきっかけとなった記事がある。<br />\rそれは PC Watch の■元麻布春男の週刊PCホットライン■ と言う連載の 2月3日分の記事になるのだが、、<a href=\"http://pc.watch.impress.co.jp/docs/2006/0203/hot407.htm\">2.5インチ以下が優劣を決めるHDD業界</a>というタイトルが付いている。</p>\r<p>その記事の中では、Seagate と富士通の例をあげ PC 分野では 2.5インチが成長分野であり、そしてこれからはデスクトップは 2.5インチ、ノート PC は 1.8インチが主流になると書かれている。<br />\rまた、気になることに、1インチHDDで Mactor が失敗し損失を計上していると書かれている。この理由として、下記のように書かれている。</p>\r<blockquote>AppleがiPod miniを止め、NAND型フラッシュメモリを採用したiPod nanoに切り替えたので、市場の見通しがつかない</blockquote>さらに、この内容は日立の決算にも見て取れるという。\r<p>&nbsp;</p>\r<p>では、東芝はどうなのか？と言うことを考えてみる。1インチHDDの市場の見通しがつかないと言うことは、別に一社に限ったことではないであろう。(東芝が一社で市場を独占しているというなら別だが...)<br />\rということは、東芝もかなりの影響を受けているはずである。<br />\r東芝の同クラスの製品在庫は山積み、ラインは遊んでいるかもしれない。では、このような状況になったらどういう解決策を見いだすか？それは、新しい市場を作り出すことである。幸い東芝は携帯電話を制作していた。携帯電話のメモリは年々増加の一途をたどり、データフォルダもさることながら、外部記憶メモリのミニSDカードは 256MB に対応、512MB も非公式ながら使えたりする。着うたフルも好調なようなので、HDD の大容量を生かすにはもってこいの市場である。音楽携帯として売り出すのであれば、さながら東芝のiPod miniである。HDD が余ってなければ フラッシュメモリで大容量もよかったが、フラッシュメモリは好評で社外に売れるし HDD は不調で余ってるし、さらには HDD の方が高速で大容量が可能となれば、多少の厚みなど無視して押し切るであろう。</p>\r<p>これが、くろねこの考える W41T HDD 搭載携帯の誕生の裏話である。(実際の所は全く知りません。)</p>\r<p>しかし、昨日 W41T を予約して帰ってきたのだが、W41T って au IDカードも、PCサイトビューアも対応してないんですね...<br />\rこの二つは WIN の高機能タイプ機種なら必須機能だと思うのは、くろねこだけでしょうか？</p>','お昼前に電話がありました。その電話によると、W41T は黒だけ発売日が11日ではなく、未定となったそうです。\r<p class=\"add\"><a href=\"http://www.shimoken-works.com/mt/archives/2006/01/au_w41t.html\">ShimoKen Works:煮え切らないau W41Tの仕様</a>の記事によると、HDDを搭載した理由は単にマーケティング目的と考えられているようです。「最初は期待していたが、仕様を見てがっかりしたのは言うまでもない。」と書かれていますが、やはりみんな仕様を見て多かれ少なかれがっかりされているのがわかりました。くろねこは買ってみてさらにがっくりしましたが...</p>',1,4599,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://pc.watch.impress.co.jp/docs/2006/0203/hot407.htm\">2.5インチ以下が優劣を決めるHDD業界</a>\n<a href=\"http://www.shimoken-works.com/mt/archives/2006/01/au_w41t.html\">ShimoKen Works:煮え',0,1,1,0,0,'1999-11-30 00:00:54','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060209_boland_delphi',3,0,'2006-02-09 18:31:07','BorlandによるDelphi の売却',null,'<p>BorlandによるDelphi売却は本当なのでしょうか？\r<p>DelphiMLへronさんによって投稿された「売却」から始まるスレッド。</p>\r<p>そして、いろいろなニュースサイトでの記事を見ていると、どうやら本当のようです。</p>\r<blockquote><a href=\"http://www.itmedia.co.jp/news/articles/0602/09/news010.html \">ITmediaニュース：Borlandが開発ツールを売却、Segue Software買収</a></blockquote>\r<p>\rBorlandがDelphiを売却することで、Borlandがどうなるかと言うことよりも、Delphiがどうなるのかと言うことが気になります。<br />\rただ、最近のBorlandは開発ツールにやる気が見えず品質も低迷していたことから、よい買い手がつけばまたよいツールに化けるかもしれません。ただ、時代の流れが変わってきたなと、少々寂しい気分になりました。</p>','',1,3752,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.itmedia.co.jp/news/articles/0602/09/news010.html \">ITmediaニュース：B...</a>',0,1,1,0,0,'1999-11-30 00:00:02','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_FindCell2',3,0,'2006-02-13 18:45:36','[Excel VBA] 特定条件を満たすセルを見つける2','','<p><em>前回、[story:ProgFAQ-Xls_FindCell]にて特定のセルを見つける方法を記載したが、問題が見つかった。<br /> そこで、その問題に対策を施したバージョンをご紹介する。<br /> </em>Excel で以下の様な番号と名前のデータがあったときに、番号をキーにして名前を取得するようなことは多いだろう。<br /> このようなケースを処理するためには、Find メソッドを使用するとうまくできる。</p>','<p>前回の方法では Loop 条件式で Not c Is Nothing と判断している。<br /> これは、Do ～ Loop 内で検索対象セルが1件も存在しない状況になったときに有効だが、現在の VBA の仕様では完全論理比較を行うので、正常に処理ができない。<br /> また、1件も存在しない場合には、ループに入る前に If 文で判定するのでこの条件式は不要だった。<br /> 今回はこの問題に対応している。</p>\r\n<table>\r\n<tbody>\r\n<tr><th>　</th><th>番号</th><th>名前</th></tr>\r\n<tr><th>　</th><th>1</th><th>2</th></tr>\r\n<tr><th>A</th>\r\n<td>0001</td>\r\n<td>佐藤</td>\r\n</tr>\r\n<tr><th>B</th>\r\n<td>0002</td>\r\n<td>鈴木</td>\r\n</tr>\r\n<tr><th>C</th>\r\n<td>0003</td>\r\n<td>田中</td>\r\n</tr>\r\n<tr><th>D</th>\r\n<td>0004</td>\r\n<td>小林</td>\r\n</tr>\r\n</tbody>\r\n</table>\r\n<p><strong>※1 番号は書式指定で \"0000\" とし、 1 を 0001 としている</strong><br /> <br /> たとえば、番号 \"0003\" の田中さんを取得したい場合には以下のように処理をする。</p>\r\n<pre class=\"brush: vb;\">Function CellAddress(c As Range) As String\r\n    CellAddress = \"\"\r\n    If Not c Is Nothing Then CellAddress = c.Address\r\nEnd Function\r\n\r\nSub 番号3番の田中さんを見つける()\r\n    Const NameCol = 1\r\n    Dim SearchArea As Range             \' 検索範囲\r\n    Dim c As Range                      \' 検索結果\r\n    Dim firstAddress As String          \' 最初に見つかったセルのアドレス\r\n    \r\n    \' 検索範囲\r\n    With ThisWorkbook.Sheets(\"Sheet1\").Range(\"A1\").CurrentRegion\r\n        Set c = .Columns(1).Find(3)     \' 検索範囲の最初のカラムから番号を検索\r\n        firstAddress = c.Address    \' 最初のアドレスを覚えておく ※2\r\n        Do\r\n            MsgBox .Cells(c.Row, NameCol), vbOKOnly, \"発見\"\r\n            Set c = .FindNext\r\n        Loop While (CellAddress(c) &lt;&gt; firstAddress)\r\n    End With\r\nEnd Sub</pre>\r\n<p><strong>※2 同じ番号が複数回出現するなどでループにて処理を行う場合、最後のセルの次を検索すると最初のセルが見つかる。<br /> このため、最初に見つかったセルのアドレスを覚えておく必要がある。</strong> この方法で、検索を行うと if 文を利用して検索するよりも断然早く処理を完了させることができる。<br /> また、見つかったデータを削除するようなケースでは、以下のように処理を行う。</p>\r\n<pre class=\"brush: vb;\">Sub 見つけた番号3番の田中さんを全て削除する()\r\n    Const NameCol = 1\r\n    Dim SearchArea As Range             \' 検索範囲\r\n    Dim c As Range                      \' 検索結果\r\n    Dim firstAddress As String          \' 最初に見つかったセルのアドレス\r\n    \r\n    \' 検索範囲\r\n    With ThisWorkbook.Sheets(\"Sheet1\").Range(\"A1\").CurrentRegion\r\n        Set c = .Columns(1).Find(3)     \' 検索範囲の最初のカラムから番号を検索\r\n        Do\r\n            Rows(foundRow).Delete \r\n            Set c = .FindNext\r\n        Loop While Not c Is Not Nothing\r\n    End With\r\nEnd Sub</pre>\r\n<p>削除処理の場合は、見つかったデータ全てを削除していくので、最初に見つかったセルのアドレスを覚える必要がない。</p>',2,10548,0,0,'2006-03-15 18:45:36',0,'<a href=\"http://www.blackcat.xyz/article.php/ProgFAQ-Xls_FindCell\">[Excel VBA] 特定条',0,1,1,0,0,'2015-06-22 12:59:03','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('FAQWin_WinMgr_DeployIE11',3,0,'2015-02-25 15:36:49','[Win Svr]ActiveDirectoryでInternet Explorerを一括配布','','<p>ActiveDirectory(以下AD)を用いてInternet Explorer(以下IE)の一括配布を行う。</p>\r\n<p>ADによるソフトウェアの配布には、ソフトウェアによる配布などがあるが、今回はシャットダウンスクリプトによる一括設定を行う。<br />シャットダウンスクリプトを用いるのは、MSI形式でないファイルが取り扱えることとコマンドによる細かな制御が行えるためである。&nbsp;</p>','<p>1.<span style=\"font-size: 0.9em; line-height: 1em;\">ADにIE配布用のGPOを作成する。</span></p>\r\n<ol>\r\n<li><span style=\"font-size: 0.9em; line-height: 1em;\">「管理ツール内」の「グループポリシーの管理」を起動する。</span></li>\r\n<li><span style=\"font-size: 0.9em; line-height: 1em;\">グループポリシーの管理</span><span style=\"font-size: 0.9em; line-height: 1em;\">の画面左側にあるツリー画面で、作成・リンクの対象となるドメインやOUを選択する。</span></li>\r\n<li><span style=\"font-size: 0.9em; line-height: 1em;\">[操作]メニュー、あるいは右クリックメニューで[このドメインにGPOを作成し、このコンテナーにリンクする]を選択する。</span></li>\r\n<li><span style=\"font-size: 0.9em; line-height: 1em;\">続いて表示するダイアログで、GPOの名前を入力して[OK]をクリックする。</span></li>\r\n</ol>\r\n<p>2.ポリシーを編集しIEの配布設定を行う。</p>\r\n<ol>\r\n<li><span>画面左側にあるツリー画面で、</span>コンピュータの構成/Windowsの設定/スクリプト(スタートアップ/シャットダウン)を選択する。</li>\r\n<li>画面右側のシャットダウンをダブルクリックして、「シャットダウン」の「プロパティ」ダイアログを表示する。</li>\r\n<li>ダイアログ下部の「ファイルの表示」ボタンをクリックし、<span style=\"font-size: 0.9em; line-height: 1em;\">ポリシーオブジェクトに関連付けられたフォルダを表示しする。<br />このフォルダに[file:39]を展開する。また、</span><span style=\"font-size: 0.9em; line-height: 1em;\">アドレスバーからフォルダのパスをコピーする。</span></li>\r\n<li>ダイアログに戻り、「追加」ボタンをクリックする。<br />スクリプト名に&rdquo;Install_IE11.bat&rdquo;、スクリプトのパラメーターに先ほどのファイルのパスをコピーする。</li>\r\n</ol>',2,4502,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://www.blackcat.xyz/filemgmt/index.php/39\">IE11一括配布バッチファイル(サンプル)</a>',0,1,0,0,0,'2015-06-26 11:39:48','html',0,1,'','',0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('ProgFAQ-Xls_ProcessToCellAfterAutoFill',3,0,'2006-02-13 20:45:36','[Excel VBA] オートフィルタ適用後に表示されている行のみを対象に処理を行う','','<p>データを処理する際に、オートフィルタで見えてる行だけを対象に処理を行いたい場合があるんです。<br /> このようなデータはデータベースで処理を行う方が効率がいいのですが...<br /> それはさておき、ユーザーがフィルタした後にと言うこともありますからね。</p>','<p>Excel で 表示されているセルだけを対象にしたい場合、SpecialCells(xlCellTypeVisible) を使用します。<br /> オートフィルタで絞り込まれた範囲を対象に表示されているセルを取得するコードは以下のようになります。</p>\r\n<pre class=\"brush: vb;\">.AutoFilter.Range.SpecialCells(xlCellTypeVisible)</pre>\r\n<p>ただ、これをそのまま使用すると行単位で処理を行いたい場合には、1行につき対象列数と同じ回数だけ引っかかりますので、この挙動への対応を検討する必要があります。<br /> 列数分引っかかるのは列が複数あるからですので、1列であれば1回で問題はないはずです。<br /> なので、対象の列を1列目に限定します。限定すると以下のようになります。</p>\r\n<pre class=\"brush: vb;\">.AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible)</pre>\r\n<p>上記の状態では対象は各セルですので、列全体を処理したいときには行番号を取得したほうが、セル範囲指定などの場面で有利です。その行番号の取得には Row メンバを使用します。</p>\r\n<p>処理全体では、以下のようになります。</p>\r\n<pre class=\"brush: vb;\">Sub 見えている行だけを対象に()\r\n    With ActiveSheet\r\n        \' Filter\r\n        .AutoFilter\r\n        .AutoFilter フィルター式...\r\n        \r\n        \' Search\r\n        For Each c In .AutoFilter.Range.Columns(1).SpecialCells(xlCellTypeVisible)\r\n            MsgBox \"表示されているデータの行番号は\" &amp; c.Row \"です。\"\r\n        Next c\r\n    End With\r\nEnd Sub\r\n</pre>',2,303753,0,0,'2006-03-15 20:45:36',0,'',0,1,1,0,0,'2015-06-22 13:00:13','html',0,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060214',3,0,'2006-02-14 08:24:37','ときめきメモリアルオンライン 萌え萌え...',null,'ときめきメモリアルオンラインβ２テスト(ときメモオンライン)、週末をかけてやりました。<br />\nくろねこがやっているのは、男のキャラのみなのでそのほかのことは、よくわからなかったりします。<br />\n<br />\n週末までで装備アイテムが6個、合成アイテムが約200個位、奥義が1個とれました。<br />\nドラマも一応最初から選択できる分は全部こなしました。<br />\nまだ、修練度が満タンの物はないので、2段階目のドラマを選択するに至ってません。<br />\n<br />\nドラマなんですが、役柄に応じてとれるキーワードが異なるようなので、ほしいキーワードがあったら先にほしいキーワードがとれる役柄を周りに聴いた方がよいでしょう。<br />\nまた、一つのドラマでもらえるキーワードは一つとなっているようです。<br />\nほとんどのドラマで★5つを取ればキーワードはもらえるのですが、なぜかクリスマスだけもらえていません。<br />\n<br />\nくろねこが完了したドラマ(順不同)\n<table summary=\"くろねこが完了したドラマ\">\n<tr><th>ドラマ</th><th>場所</th><th>ドラマ</th><th>キーワード</th></tr>\n<tr><td>二人のクリスマス</td><td>自分の教室</td><td>もらえず</td></tr>\n<tr><td>よろしくタイムマシーン</td><td>自分の教室</td><td>自分の教室</td></tr>\n<tr><td>ガンバレ補欠！</td><td>体育館</td><td>男1：リベロへの道</td></tr>\n<tr><td>ショウほど素敵な部活はない</td><td>体育館</td><td>大型新人登場</td></tr>\n<tr><td>ライバル募集中</td><td>プール</td><td>好敵手と書いて『とも』と呼ぶ</td></tr>\n<tr><td>家庭科室で昼食を</td><td>家庭科室</td><td>忘れ得ぬ料理</td></tr>\n<tr><td>机上連載中</td><td>家庭科室</td><td>ベストエンドは二人の秘密</td></tr>\n<tr><td>１＋１＝３</td><td>グラウンド</td><td>グラウンド</td></tr>\n<tr><td>キャッチャー・いーん・じゃ・ないっ！</td><td>グラウンド</td><td>心眼キャッチ</td></tr>\n</table>\n<br />\n部活動は最初は負けが多いので一気にやりすぎると、ストレスがたまります。<br />\nあまりストレスをためすぎると、キャラクターの下のゲージが緑から黄色に変わり、ノイローゼとなります。<br />\nノイローゼになったら、保健室で座って居ましょう。<br />他にも大樹の下や教会、マップ左下の泉などがよいそうです。<br />\nノイローゼに変わるのは、ゲージの7割から8割程度迄たまったときという感じでしょうか？<br />\n噂ですが、ストレスがたまるとターンの順番が遅くなるとか...<br />\nこれも噂ですが、ターンの順番を決める要素は「運動」で、HP は「スタミナ」の様です。\n<br />\n部活動ついでに、レベルを早くあげる方法は...<br />\n高レベルの人を見つけて、自主トレをすることです。負けてもあがりますが、勝ったときの方がよくあがります。<br />\n基本は防御重視の自主トレで「アイテム」とキーワードの「習熟度」をあげながら、相手の了承を得た上でですが2、3発当てて勝たせてもらうとよいでしょう。<br />\n奥義は部員との部活動でもらえるようです。<br />\n基本的にランダムの様です。合成アイテムもそうですが、使用するキーワードともらえるアイテム(合成アイテム、奥義の書)に関連があるようです。<br />\nメモを取りながら進めてると、偏りがあることに気づきました。実はないのかもしれないですが...<br />\n<br />\nアイテムと言えば、授業でもらえる装備できるアイテムも、授業とアイテムに何らかの関係があるのかもしれないと、統計を取っていますが、今のところ数が少なすぎてよくわからないのが現状です。<br />\nもしかすると、得点も絡んできてるのかもしれません。<br />\n<br />\nいずれにせよ、かなりランダム要素が多いゲームですね。<br />\nドラマも同じせりふを選んで行っても、たまに違うシーンに出くわしたりします。<br />\n<br />\n最後に、くろねこは\"E組の黒野 猫雄\"です。何か良い情報があったら教えてください。','',1,3824,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060215',3,0,'2006-02-15 07:51:50','国語の授業で100点満点',null,'<p>先ほど、ときめきメモリアルオンラインの国語の授業で正答率100％が取れました。</p>\r<p>ときめきメモリアルオンライン初めての100点満点は国語でした。<br />\rくろねこは、理系人間なので意外な感じなのですが、このゲームの数学計算していると時間がなく間で答えないといけない場合も多々あるので、直感と知識だけの国語が答えやすいのかもしれません。</p>\r<p>ちなみに、次の数学は70％しか取れませんでした。</p>','',1,3596,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:05','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060215_depositor_protection',3,0,'2006-02-15 23:29:06','預金者保護法施行後...',null,'預金者保護法が施行され5日目になります。<br />\r前回懸念事項であった郵政公社の郵貯で、「キャッシュカード」と同様に「通帳」でも保護されるのか聞いてみました。<br />\r<br />\r質問は、「郵便貯金滋賀センター」に問い合わせました。<br />\r結論から言うと、「通帳」も「カード」と同様に対応してくれるという解答でした。<br />\rしかし、話の内容的には期待した内容とちょっとずれている感じも受けました。','郵貯に関する犯罪として、\r<ol>\r    <li>盗難・偽造カード(通帳)によるATMからの引き出し </li>\r    <li>盗難・偽造通帳とはんこによる窓口での引き出し </li>\r    <li>不正なデビットカードとしての使用 </li>\r    <li>不正なID・パスワード使用によるオンラインでの引き出し </li>\r</ol>\rがあります。 <dl><dt>盗難・偽造カード(通帳)によるATMからの引き出し </dt><dd>「通帳」も「カード」と同様に対応してくれると言うことですが、事件が発生してから調査してそれから対応すると言うことでした。対応内容は「現金でお渡し」ではなく「残高を元に戻す」と言う内容でした。対応内容は全然問題ないのですが、妙に「調査してから内容により」と言うところが気になりました。また、「こちらに立証責任は無いですよね」と確認しているにもかかわらず、「これまでと同様に」、「調査してから内容により」と同様の内容を繰り返すだけにとどまり、「ＡＴＭで引き落としをした人物が本人でないと確認された場合」とか言われると本人でないことをこちらが立証する義務があるのかと言うようにもとれる内容で、何とも歯切れの悪い物となりました。<br />\r<br />\rまだ、法律施行後事件の発生を聴いたことがないので、実際に事件が起こるまで詳細な対応はわからないかもしれません。マニュアル化できていないかもしれないです。が、郵便局の窓口で問い合わせするよりもずっとまともな会話になりました。 </dd></dl><dl><dt>盗難・偽造通帳とはんこによる窓口での引き出し </dt><dd>従来型のこの手の犯行については、従来のままのようです。</dd></dl><dl><dt>不正なデビットカードとしての使用 </dt><dd>保護されないようです。この手の犯行からの保護については次のケースと同様に「郵貯クラブ」を勧められました。ただ、デビット機能は申し込み制で、解約もできるようです。</dd></dl><dl><dt>不正なID・パスワード使用によるオンラインでの引き出し </dt><dd>ホーム(オンラインバンキング)については、対象外と言うことでフィッシング・パスワードの管理などには注意してくださいとのこと。通信中にスヌープ(盗み見)された場合に被害についても聴いたのですが、これも保証対象外と言うことです。<br />\r(SSLの脆弱性を衝かれたら終わってしまいます。)<br />\rこういう場合も保護したいのであればと言うことで、年額350円の「郵貯クラブ」を紹介されました。</dd></dl>\r<p>もし被害にあった場合には、郵便局かもしくは「監査局」と言うところに届け出ると言うことでした。<br />\r<br />\rついでに、過去の郵便局では複数の通帳を持つと二冊目は「ボランティア付き(寄付率20％)」の通帳となりました。<br />\r最近は制度が変わったようで、普通口座と貯蓄口座の二つの口座がもてるようです。<br />\rしかし、普通口座を複数開設すると「ボランティア付き」となるようです。（寄付の比率は変更が可能なようです）<br />\r上記の「ボランティア付き」口座と普通の口座（ボランティア付きでない）を持っている際に、普通の口座を解約すると「ボランティア付き」を解除することができるようです。また、口座の番号は変わらないようですので、今後金利も上がることが予想されますので該当される方は、寄付を解除する事を検討されてはいかがでしょうか？</p>\r<p class=\"add\">後で考えてみれば、ほかにも犯罪方法があった。<br />\r郵貯も銀行も端末とホストの間を何らかの回線(専用線？)で接続しているので、そこを流れる情報を不正に操作すれば、自分の他人の預貯金を自らの口座に付け替えることも可能だろう。<br />\rまた、ホストに進入することも可能だと思われる。回線の場所は明らかだし、端末はWindowsNTなのでその手の人ならハックすることは以外に簡単かもしれない。</p>',1,3908,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:32','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060215_traffic_control_in_jr',3,0,'2006-02-15 23:47:46','JR西の運行管理はどうなっている？',null,'ダイヤが乱れているとき、あなたはどこからその情報を得るだろうか？<br />\rまた、どの情報から自身が乗る列車を決めるだろうか？<br />\r<br />\rくろねこは、通常駅構内の電光掲示板を見ます。そしてその後係員に状況を確認します。<br />\rなぜこのような二度手間とも思える作業をしなければならないのか。その理由は電光掲示板の情報の不正確さにあります。<br />\rとある駅員によると、電光掲示板の内容は5～10分おきに更新されていると言います。<br />\r5～10分ですと、東海道本線では通常列車が一本は通過している時間です。と言うことは目的地に着く一番速い列車に乗れない可能性があると言うことです。<br />\rまた、電光掲示板の3行ある情報の内、下の方になるほど不正確になると思われます。<br />\r実際、電光掲示板上で遅れが表示されていない列車でも係員に聞くと数十分遅れていることはよくあることです。<br />\r遅れが表示されている列車が普通列車で、その後にくる新快速列車が遅れているにもかかわらず遅れが表示されていなかったら、目的地の距離と列車間の時間では次の新快速を待っているかもしれません。<br />\r<br />\r情報が不正確だと言うことは、判断を誤ると言うことです。<br />\rでは、情報がどこからくるのか聞いてみました。全ての情報は「指令」や「CTC」と呼ばれるところからくるようです。少なくとも駅員が情報を入手する情報はここのようです。と言うのも、電光掲示板と機械放送による情報の入手先は駅員も正確に把握していないようです。（同様のことはJR西の電話担当にもいえます。）','ちょっとお偉い目の駅員によると、それぞれが示す情報の違いの原因を聞いてみました。\r<ol>\r    <li>お客様の乗り降りの時間によって遅れが異なってくる </li>\r    <li>列車の遅れを手入力しているケースがある </li>\r</ol>\r<p>しかし、これは嘘です。この情報を知らなければ列車の運行管理などできないはずです。列車がどこにいるのかを正確に把握していないと列車の運行管理はできませんからこれはできているとして、次に列車のダイヤも運行前にできているのでこれもわかっているはずです。と言うことは何分遅れているか正確に割り出せない時間は列車が止まっているときだけになります。<br />\r最初に事故で止まって動かないときは事故の現場検証などがあるので、そのかかる時間によっては正確に割り出すことは難しいでしょう。でも目安は出せると思います。また、その状況も電光掲示板に表示できるはずです。<br />\rでは、乗り降りの最中の停車はどうでしょうか？特急や始発でもない限り止まっている時間はたかだか1～2分ぐらいです。と言うことは誤差は1～2分以内に収束できると考えられます。</p>\r<p>もし、運行管理がきちんとできていなくて遅れがわからないとすれば、それは殺人システムになります。<br />\rいつ事故が起こってもおかしくありません。<br />\r電話担当に、何分遅れているか把握できないと言われたので、「じゃあ、殺人システムを作っているのか」と問い合わせたところ「そうではありませんが、わかりません。」と言われました。</p>\r<p>やろうと思えば、電光掲示板も音声案内も係員もＷＥＢの情報も最新の情報を入手できるはずです。<br />\rそれをしないから、一番正確な遅れの情報を持っているのは係員と言うことになります。<br />\r(実は係員もわからないときがあって、そういうときは信号機を確認してました。とほほ...)</p>\r<p>遅れの原因には、ＪＲ要因のほか天災や他者要因もありますが、顧客のことを考えるシステム作りをしていればこの程度のことはすぐにわかるはずです。<br />\rわからないと言うことは、顧客の利便性よりも自社の利益を優先していると言うことです。<br />\rしかし、ある意味競争相手がなく利便性を下げても顧客が離れられない路線では、正しい判断なのかもしれません。<br />\r顧客が苦情を言おうとも困るのは対応する末端社員だけで、経営陣には何の痛みもありませんし、対応すればそれだけの費用がかかるので利益が減りますから...料金を値上げするだけです。もしくは何らかの理由付けで税金投入か、不採算路線の切り捨てでしょう。</p>\r<p>我々には耐える道しか無いのでしょうか？</p>',1,3868,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:48','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060216_yahoo_auction',3,0,'2006-02-16 23:49:17','ヤフオク代金、他人に払わせる新手詐欺',null,'<p><a href=\"http://kyushu.yomiuri.co.jp/news/ne_06021530.htm\">ヤフオク代金、他人に払わせる新手詐欺</a>があったようだ。</p>\r<p>どの様にして、茨城の一室に届けられたはずの株主優待券を手に入れたか不明だが(郵便がくるのを戸外で待ってた？)、頭の良いやつっているんだなと感心。</p>\r<p>ヤフーはいつも通りの対応だなと、これも感心。<br />\rヤフーの態度に腹を立てて裁判に訴えるあたりは共感した。<br />\rさらには、ヤフーと問題が起きたときには、 </p>\r<blockquote>サービスまたは本規約に関連してYahoo! JAPANとユーザーの間で生じた紛争については東京地方裁判所を第一審専属管轄裁判所とします。</blockquote>\r<p>となっていたと思うのだが、東近江簡裁に行くあたりの強気さがすてき。</p>\r<p>今後の裁判の行方が楽しみです。出来れば、ヤフーの責任範囲の拡大を裁判所でお願いしたいです。</p>','',1,4147,0,2,'0000-00-00 00:00:00',1,'<a href=\"http://kyushu.yomiuri.co.jp/news/ne_06021530.htm\">ヤフオク代金、他人に払わせる新手詐欺</a>',0,1,1,0,0,'1999-11-30 00:00:06','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060218',3,0,'2006-02-18 09:40:00','モンスター増加の原因(Lv.55)',null,'<p>最近、使いっ走りのクエしかやってない...<br />\r\nジュレアの使徒 レインモスの使いっ走りはそこそこに儲かるのだが...飽きた。</p>\r\n<p>以前からちょっと興味があった魔人の血を使うクエストに挑戦しよう！<br />\r\nバザーで赤血（魔人の血：時価135万kron）を買って、ギルド協会事務所長に会う。<br />\r\nしかし、クエストが無い！んー前提クエストがあるようだ...</p>','<p>仕方がないから、「英雄の末裔」をする。<br />\r\nすると、でてきた「モンスター増加の原因」クエスト。ふむふむ、なになに？</p>\r\n<p style=\"margin-left: 40px;\">モンスター増加の原因～魔神の血～新しい伝説の始まり</p>\r\n<p>続いて、以前デビルのマップで取ってきてあった、「封のされた報告書」のクエも続けて...<br />\r\n魔神の血の分析～魔神の血の分析結果～魔力の侵食～魔神復活の兆候</p>\r\n<p>このクエ、わざわざブリンの盗賊ギルドまで行かされたあげく、報告書を持ったやつが途中で行方不明だと！<br />\r\nそもそも、何でこのマップを通る必要があったんだ？疑問を隠せず1：1で ローグの kou に質問を...</p>\r\n<p style=\"margin-left: 40px;\">くろねこ:「ねね、ローグってばか？」<br />\r\nkou0822:「なんで？」<br />\r\nくろねこ:「ブリンからエスネに報告書運ぶのにデビル通ってるんだけど...」<br />\r\nkou0822:「(≧ｍ≦）ぷっ！」</p>\r\n<p>まあ、無事に重要書類はくろねこが届けました。</p>\r\n<p>さあ、次はガバルツに石拾いだ！</p>',1,2657,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:49','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060218b',3,0,'2006-02-18 18:42:44','ガバルツで石拾い(Lv.55)',null,'<p>本日はガバルツで石拾い。</p>\r<p><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060218b_1.jpg\" alt=\"\"><br />\rこのクエはハイドリアンさんのブログでも書かれていたので集めるものはばっちり。<br />\rクエストに必要なアイテム赤血を買って(135万kron)、事前に「魔人の血の分析」を済ませておいた。</p>','<p>手伝ってくれたのは同じ PT の ☆ｽﾀﾝﾘｨｰ☆ と、サブキャラの PT の kou0822 さん。<br />\rくろねこは達はレベル 55 前後。三人ではかなりきつい。<br />\rやはり、死んだ～。くろねこが死んで帰ってくるまでの間に kou が、今度は kou が帰ってくるまでの間に ☆ｽﾀﾝﾘｨｰ☆ がと次々に...<br />\rしかし、おかげさまで B1F とその下の B2F の石は集まりました。<br />\rあと、石集めが終わりかけて戻ろうとするときに、道に迷って アレレレ!?(・_・;?<br />\rもうすぐ、出口のはずなんだけど...<br />\rと思ってたら、横に突然わいた ボス！ニグレック これでもかと言わんばかりに 3人でボコボコに...<br />\rあわてたおかげでSSを取り損ねました...<br />\rドロップしてくれたのはクレリックの帽子とローグの兜ぐらいで、肝心の魔人の血（黄）はありませんでした。<br />\r(〒＿〒)ウウウ</p>\r<p>以下は、石拾いクエのSSです。<br />\rB2F完了報告<br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060218b_2.jpg\" alt=\"\"><br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060218b_3.jpg\" alt=\"\"><br />\rまた行けってか？<br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060218b_4.jpg\" alt=\"\"><br />\rはいはい、わかりましたよ～。用意するものはこれですね。<br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060218b_5.jpg\" alt=\"\"></p>',1,2588,2,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060220',3,0,'2006-02-20 00:43:13','果汁100％ アコライトに転職(果汁 Lv.31)',null,'<p>やっとこさ、サブキャラの「果汁100％」が転職を迎えることになりました。</p>\r\r<p>kouさん、いつもレベル上げありがとう。<br />\rレベル11の頃からほとんどkouさんのおかげで Lv.31 になりました。</p>','<p>転職のために、くろねこのPT の mary☆ さんと ☆ｽﾀﾝﾘｨｰ☆ がそれぞれサブキャラで駆けつけてくれました。<br />\rさあ、転職だ！SSの準備OK？<br />\rと用意をした後、モルディアンに話しかける...<br />\r会話が終わっても転職できない...なぜ？...<br />\rそこでみんなが、「武器はずした？」そうでした。武器をはずさないと、転職できないのでした...<br />\rでも、靴と手袋はなぜかゼニアン専用が装備されててものチェックなので、今まで付けてなかったこの二つをわざわざ買って装備してきたのでした。<br />\rで、改めて武器をはずしてモルディアンに話しかける...<br />\rで、ここで重大な過ちを...<br />\r☆ｽﾀﾝﾘｨｰ☆がカウントダウンを始めてくれていたのに、「3」の段階で最初の会話のボタンをクリック...<br />\r転職してしまいました...<br />\r(゜∇゜ ;)エッ!? 2枚目の会話のウィンドウボタンじゃないの！！</p>\r\r<p>めちゃめちゃショックでした...</p>\r\r<p>気を取り直して、転職祝いで図書館に遠征を...</p>\r\r<p>一匹目のゴブリンを倒したところで、mary☆ さんのサブキャラが一気に 3 レベルアップ!!!<br />\rさすが図書館、さすがレベル 1 です。<br />\rそのご順調にレベルアップを続け、5、6 匹で 10 レベルになりました。</p>',1,2880,3,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:29','html',0,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060221',3,0,'2006-02-21 01:55:37','ロストでぼこぼこに(Lv.55)',null,'<p>今日は果汁の PT メンバの leota さんが久々に in して初対面。</p>\r<p>leota さんは レベル47 だったのですが、まだ「知恵の書」を取ってなかったのでロストに行ったことがなかったのです。<br />\rしばらく leota さんがいない間に、kou さんにガディ攻略法をくろねこがちょこっとレクチャーしたところ、くろねこ以上にとりまくり！んー、かなりはまったようです。<br />\rくろねこ、結構ガディさんに会うことがつらく、また会ってもドロップしてくれないとかが多いんですけど...<br />\r結構、kou さん勘が鋭くポイントが結構ヒットするんですよね...</p>\r<p>で、話を leota さんに戻して、kou さんが持っていた無文を知恵の書に交換、ブリンで Lv.35 の職業クエを受けることに...</p>','<p>leota さん、結構天然なのかやらかしてくれました。<br />\r戦士長 ユパインから受けるクエストは...</p>\r<ol>\r    <li>ヒトリオンの原料となるハイドリンを30個集めてユパインに渡す &rarr; 呪われたヒトリオンができる</li>\r    <li>モルディアンに呪われたヒトリオンの呪いを解いてもらう &rarr; 呪いを得のに知恵の書が必要</li>\r    <li>呪いの解けたヒトリオンをユパインに届ける</li>\r</ol>\r<p>手はずなのに、どういう訳か呪われたヒトリオンを倉庫にしまってしまったらしい。<br />\rで、そのままクエを続けたらしく、おかしな展開に...</p>\r<p>先にくろねこはロストで待機してたのですが、なぜか死んでしまう羽目に...<br />\rくろねこ、レベルが低くて真ん中のマップでも2匹が限度なのですが、二匹を倒して疲れ果てたところでニンニンに見つかり安置に逃げ込む...</p>\r<p>ここまではよかったのですが、その途中でくろねこを追いかけてきたニンニンがアコの方に、で助けようと戻ったら一緒に死んでしまいました...<br />\r(≧◇≦)乂ダメダメッ!<br />\rその後、よくご一緒させていただいている、蒼猿さんデヴァイスさんの PT とご一緒させていただき、最終的にグリと対決に...<br />\r<br />\r無謀でした...<br />\r<img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060221_1.jpg\" alt=\"\"><br />\r結局、この日待ち時間に1回と、グリへの特効で4回計5回戦闘不能になりました。((((*￣ー￣*)&dagger;~~~</p>',1,2721,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:22','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060222_clean_room',3,0,'2006-02-22 22:12:56','クリーンルームにはホコリはない？',null,'<p>パソコンはホコリがたまりやすい。</p>\r<p>くろねこが働いている工場でも、パソコンは数多く使われている。<br />\rたくさんあるので、情報システム部でもパソコンを修理してくれる方が二名ほど常駐しておられる。</p>\r<p>今日、パソコンの修理担当の方がうがいをしていたので、<br />\r&nbsp; くろねこ:「やっぱり空気が悪いですか？」<br />\r&nbsp; 修理担当:「ほこりっぽいですね、のどにホコリが詰まるような感じが...」<br />\r&nbsp; くろねこ:「ホコリまみれのパソコンを持ってきて、掃除機でがーやってますもんね...」<br />\r&nbsp; 修理担当:「いつも積極的に部屋をホコリまみれにしてますよ！」<br />\r&nbsp; くろねこ:「ところで、クリーンルームにもパソコンはあるんですか？」<br />\r&nbsp; 修理担当:「たくさんありますよ」<br />\r&nbsp; くろねこ:「クリーンルームのパソコンは？」<br />\r&nbsp; 修理担当:「他のより少ないですけど、たまってますよ。」<br />\r&nbsp; くろねこ:「クリーンルームでも！？クリーンルームっていったい...」<br />\r&nbsp; 修理担当:「パソコンはいいですけど、設備もホコリで壊れたりしますからね。」<br />\r&nbsp; くろねこ:「パソコンは電気が流れて、ホコリがたまりやすくなってますからね...」</p>\r<p>しかし、そんなので良いのか、クリーンルーム！？<br />\rふつう、半導体工場のクリーンルームって無視できるほどホコリがないものだと思ってました。</p>','',1,3762,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:36','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060223_au_w41t',3,0,'2006-02-23 12:16:36','au の W41T ビートブラックはいつ出るんでしょうか？',null,'W41T ビートブラックがでない...<br />\r<br />\rau の W41T が 11 日に発売されてから 2 週間がすぎようとしている...<br />\r何で黒だけでないんでしょうね<br />\r様子見？もしくは他の色の一段落したところでそのラインで製造しているのかな？<br />\r<br />\r別に白でもよかったんだけど、黒を待ってみたら思ったより待たされてる。<br />\rW41T と W41H どっちでも良い気もしたけど、とりあえず今のところは W41T。<br />\r<br />\r別に W41T の方がかなりいけてると言うわけではない。どうも H が信用できないと言うか安心できない。<br />\rいま W11H 何だけどその前に使ってた A5501T の方が壊れにくかった。<br />\rH は 中身が CA だからなのかな？両社の出荷数合計しても T に追いつきそうな雰囲気が感じられない。<br />\r<br />\r今回の W41T の良いところ...<br />\r<ol>\r    <li>500MB マスストレージに対応なので、500MB USBメモリの代わりに使える </li>\r    <li>300万画素のカメラ </li>\r    <li>驚きの長時間動画撮影</li>\r</ol>\r悪いところ<br />\r<ol>\r    <li>4GB の HDD のマスストレージに対応部分とそれ以外サイズが固定で変更できない </li>\r    <li>マスストレージが暗号化されていない。&rarr; 企業で使えない </li>\r    <li>PCサイトビューア非搭載 </li>\r    <li>PCドキュメントビューア非搭載 </li>\r    <li>分厚い </li>\r    <li>おさいふ携帯非対応</li>\r</ol>\r上から順にくろねこなりの優先順位があるんだが、いまいち使えない雰囲気が醸し出されている。<br />\rかといって高機能の H のワンセグ対応が必要かと言われれば、不要。<br />\rデータフォルダの動画ファイルが再生できるならほしいかも...でも使いそうにない。<br />\r他の機種と違ってワンセグにしか対応してないところが、残念かも。<br />\rどの程度の放送がワンセグに移行してくるのかわかっていないから、アナログに対応していないと不安があります。<br />','本日、最寄りの au ショップに確認の電話を入れたら、W41H は15日に発売開始されたらしいです。 W41H と同時期とも言われていた W41T ビートブラック 予想は見事に外れて、今月でないかも...',1,4366,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:11','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060223',3,0,'2006-02-23 12:19:29','二度目のガディさんドロップをゲット(Lv.55)',null,'<p>いつもは焦って SS が取れない ボス。</p>\r<p>今度ガディさんに出会ったら、絶対一緒にSSを取るんだと思いつつすでに10回くらいになるが、会ったらその瞬間に頭から抜けてました。<br />\r本日(02/23 11:10)、ガディさんに遭遇！</p>','<p><a href=\"http://www.blackcat.xyz/images/articles/xo060223_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"355\" src=\"http://www.blackcat.xyz/images/articles/xo060223_1.jpg\" alt=\"\"></a></p>\r<p>ドロップは石版3と魔術辞典でした。アコの&isin;ユデぃ&ni;さんが居たので、石版をはずして魔術辞典をゲット。そのまま狩りを続けていたら、&isin;ユデぃ&ni;さんは死にかけたのに何も取れなかったと...<br />\r他の誰も石版を取ってないと！？<br />\rじゃあ、誰が取ったんでしょうね。</p>\r<p>ガディさんを倒してしばらくしたときのSS、くりおさんもカリスマさんも取ってないならあとは、写ってる女性ファイター？</p>\r<p><a href=\"http://www.blackcat.xyz/images/articles/xo060223_2_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"300\" src=\"http://www.blackcat.xyz/images/articles/xo060223_2.jpg\" alt=\"\"></a></p>\r<p>最近、取った瞬間ログアウトな人増えてるんで、まあ誰がとっても良いんですけどね。</p>',1,3400,1,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo060223_1_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060223_2_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:43','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060225_food_security',3,0,'2006-02-25 19:29:32','身近な食の安全について考える',null,'<p>近くの小売チェーン店にこの管理で大丈夫なのか？と思われるところがある。<br />\r要冷蔵の食品を冷機に保管していない管理となっている。</p>\r\r<p>このことについて、以前市の保健所にメールを出したがなしのつぶてである。<br />\r行政の不作為は罪であるというのに、何の対応もされないまま2年以上の月日が流れている。</p>','<p>不謹慎な話ではあるが、このチェーン店を利用している消費者で集団食中毒などが発生すれば、行政の対応も変わるのであろうか？この際にはこのチェーン店の衛生管理における責任はもちろんのことだが、市の保健所も管理責任を問われるべきである。嫁にはこのチェーン店を利用しないよう指示しているのだが、安さに負けて利用しているようだ。<br />\r<img alt=\"うどんが冷気の前に...\" src=\"http://blog.blackcatlab.com/images/gene/grl_0002.jpg\" width=\"500\" height=\"375\" /><br />\r<img alt=\"そばも...\" src=\"http://blog.blackcatlab.com/images/gene/grl_0002.jpg\" width=\"500\" height=\"375\" /></p>\r\r<p>あまり行かないので知らないが、夏になると製造日の当日の牛乳も陳列されていそうだ。<br />\r（以前アルバイトしていた別のチェーン店では、夏には衛生上の問題点があるため、製造日当日の牛乳を陳列してはいけない規則になっていた。要冷蔵の商品は冷機のエアカーテンの外側には陳列してはいけないことになっていた。）</p>\r\r<p>今後とも何事もなければよいが、このような悪質な企業が存在することで自分の健康が損なわれる可能性があるかと思うとぞっとする。</p>',1,2954,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:13','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060226_site_access',3,0,'2006-02-26 19:30:27','サイトのアクセスを最大限に！',null,'<p>サイトのアクセス数を無条件に増やせる方法ではありません。<br />\rアクセス数を増やすのは、やはりなんと言ってもコンテンツのとその表現力でしょう。<br />\rくろねこも毎日見るサイトもあれば、必要なときにだけみるサイト、一回見たらもう二度と行かないサイトなど様々です。</p>\r\r<p>毎日見るサイトはニュース系のサイトや検索サイトが多いです。検索サイトは必要なときにだけ見るという表現もできます。<br />\rこの類のサイトは見るときによって情報が変わっていく新しさを持っています。また、新しいだけでなく見る人に有益な情報を与えてくれます。ここで言う有益とはお金が儲かるとかそういう直接的なことだけでなく、好奇心を満足させてくれる物見ていて楽しい物なども含まれます。<br />\r毎日ではありませんが BIGLOBE などの無料で動画を配信してくれるサイトも定期的に見ていたりします。このようなサイトもこのカテゴリに含めても良いと思います。</p>\r\r<p>次に、必要なときにだけみるサイトには、そのサイトに必要なものがあることが多いです。<br />\rいろんなツールがある「<a href=\"www.vector.co.jp\">Vector</a>」や、オンラインショッピングの「<a href=\"www.rakuten.co.jp\">楽天市場</a>」や「<a href=\"http://www.amazon.co.jp\">amazon.co.jp</a>」など。<br />\rそれぞれほしい物があるときに、ダウンロードや買い物ができるサイトに行く感じです。</p>\r\r<p>最後に二度と行きたくないサイトは、サイトを見たらエラーが多発するサイト(IEの設定にもよりますが、大手でも多いです)、検索サイトで検索したけど引っかかる用語と全く違う内容が表示されているサイト、何が書いてるかわからないサイト、フィッシングサイトなどですかね。</p>\r\r<p>残念ながらくろねこのサイトには、毎日変わるような新しさはないですし、良い物があるわけでも、おもしろい記事があるわけでもないのですが毎日100～200人くらいの人が来てくれているようです。<br />\rくろねこは文章を書くのが苦手なので、がんばって書いてるのでブログも書き始めてから、公開まで2～3日かかっていることもしばしばあります。書いてからも日本語の間違いなどに気づいてなおしたりしているときもあります。</p>\r\r<p>でも、書くからには見てもらいたいと言う人は多いと思います。<br />\r良いことを書いていても、あまり人に見てもらえてないと言う人もいるかもしれません<br />\r人がこない＝悪い内容となるかというとそうでもないかもしれません。最近のブログですとトラックバックなどでリンクを飛んでくる人もいるかもしれませんが、やはり検索サイトで検索してページに訪れる人も多いと思います。<br />\rでは、検索ページで自分のサイトを引っかかり易くするにはどうすればいいでしょうか？</p>\r\r<p>こんなサービスがありました。google では <a href=\"https://www.google.co.jp/webmasters/sitemaps/\">google sitemap</a> と言うサービスがあって、自分のサイトのページをくまなく探してくれるように指示することができるようになります。また、検索されたくないページがあった場合にも、検索されないようにする方法が示されています。</p>\r\r<p>また、同じような内容を書いたページでも、ちょっとキーワードを考えてみると検索ページの上位にアップさせることができるかもしれません。そんなキーワードを教えてくれるのが、キーワードアドバイスツールです。<br />\rキーワードアドバイスツールもいくつかあるようで、<a href=\"http://www.muryoutouroku.com/free/free06.html\">キーワードアドバイスツールプラス</a> や <a href=\"http://inventory.jp.overture.com/d/searchinventory/suggestion/\">キーワードアドバイスツール</a> が google で上位になっていました。<br />\rどちらも同じように使用できますが、キーワードアドバイスツールプラス さんの方には使い方が丁寧に動画で示されていたので、こちらを見てみるのが良いかと思います。</p>\r\r<p>くろねこの場合で試してみると、最近くろねこはオンラインゲームの「ゼネピックオンライン」について、くろねこのイベントについて書いています。また、公式ページや攻略サイトへのリンクがリンク集にあります。<br />\rキーワードアドバイスツールでゼネピックを試してみると、「ゼネピック 攻略」や「ゼネピック ブログ」そして「ゼネピック 裏技」などが上位に表示されています。これらのキーワードを含むようにページの内容をちょっとアレンジしてあげると、もしくは攻略内容や裏技などを書いてみると、みんなはこのキーワードで検索するので検索ページで引っかかるかもしれません。もしかしたらここの「ゼネピック」がゼネピックの情報を求めて検索した人に引っかかるかもしれません。<br />\rもしおられたらカテゴリ一覧からゼネピックオンラインのカテゴリを選んで読んでください。</p>\r\r<p>みんなに読んでもらいたい記事ができたら、上に書いた二つの方法を使ってアクセス数をページの持てる能力の最大にアップしてみるのも良いかもしれません。でも、一番重要なのはあんたのかいた内容ですから～～～～ぁ！。</p>\r','<p>ゼネピック、裏技かどうかわからないのですが、経験値アップの課金アイテムがオフ時間の間に切れてしまったら、次にログオンした際に、すぐにオフして再度ログオンしてみてください。たまに戻っているときがあるみたいです。この前サブキャラでバザーしようとしてやめたときに気づきました。もう治ってると思っていました。まだたまに発生するみたいです。【何かあっても責任は持てませんのでよろしく！】</p>\r',1,4828,0,0,'0000-00-00 00:00:00',0,'<a href=\"www.vector.co.jp\">Vector</a>\n<a href=\"www.rakuten.co.jp\">楽天市場</a>\n<a href=\"http://www.amazon.co.jp\">amazon.co.jp</a>\n<a href=\"https://www.google.co.jp/webmasters/sitemaps/\">google sitemap</a>\n<a href=\"http://www.muryoutouroku.com/free/free06.html\">キーワードアドバイスツールプラス</a>\n<a href=\"http://inventory.jp.overture.com/d/searchinventory/suggestion/\">キーワードアドバイスツール</a>',0,1,1,0,0,'1999-11-30 00:00:44','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060226',3,0,'2006-02-26 21:38:55','イソッチを探せ！大かくれんぼ大会(Lv.57)',null,'<p>イソッチを探せ！大かくれんぼ大会...結局参加しませんでした。</p>\r<p>その前までは、出ようかなっと準備していたのですが、<br />\r20：10まで嫁が寝てて20:55～晩ご飯。<br />\rイベントは21:00～<br />\r一回、19:20に起こしたんですけどね...<br />\r晩ご飯のときに21:00～イベントなのに～って、言ったら逆ギレされました。<br />\r「自分の都合だけで..」と<br />\rどっちが自分の都合なのでしょうか？</p>\r<p>21:15～ゼネピックに復帰したのですが、バザーで売られているアイテムがイソッチチョコ！<br />\rしかも効果は大豆と同じHP回復+10000。いらねぇ～。装備できるやつがほしかった...</p>','',1,2612,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:05','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060303_w41t',3,0,'2006-03-03 18:20:26','やっと W41T 発売！',null,'<p>3/3 やっと待望の au W41T 黒が発売された。</p>\r<p>他のカラーは 2/10 発売であったので、約1ヶ月遅れだ。<br />\r買ったところなのでまだあまり操作がわかっていないが、前の携帯に行っていたアラームなどの設定を行っていく。<br />\rこの前に使っていた機種は W11H なのであるが、その携帯端末から電話帳が一部分しか取り出せないという不具合に遭遇し、W41Tには先頭 18 件しか電話帳が移らなかった。</p>\r<p>W41T を手にしてみたが、液晶の画素欠けもなくまたカメラの画素欠けも見つからなかった。<br />\r携帯は画素欠けが少ないのだろうか？見たことがない。携帯ショップの店員に聞いても、あまりないという。以前ドコモの機種で見たことがあるとか。でも修理してくれるとのこと。PC の液晶モニタも画素欠けあれば故障扱いすべきだと思うが。</p>\r<p>W41T 黒がきれいなのだが、細かい傷が付きやすい。首から試供品のネックストラップで掛けていたら表面に無数の小さな傷が...</p>\r<p>W41T を購入すると、東芝のユーザーズサイトから「大塚愛」の着うたフルが 3 曲ダウンロードできる。<br />\r早速ダウンロードしてみた。あまり音楽を聴くことがないので、たぶん次の機種を買うまでにこの携帯にたまる音楽はこの曲を含め両手ぐらいなんだろう。</p>\r<p>着うたフルであるが、au Music Port で管理できる。また、携帯でダウンロードしてると通信料がすぐに最大に達してしまうが、4月から PC でダウンロードして、携帯にアップできるようだ。<br />\r定額まで使用しないユーザにとってはおいしいかもしれない。</p>\r<p>使いにくい点も見つかった。マスストレージ機能があるのだが、専用スタンドにおいてUSB接続した後に携帯側で操作しないと認識されない。専用スタンドが必要と言うところと、携帯で操作しないといけないと言うところが面倒だ。</p>\r<p>今は、W41T のメリットを生かすべく、両耳にかけれるブルートゥース付きのヘッドフォンを探している。</p>','<p class=\"add\">06/03/06 追記<br />\rマスストレージ機能ですが専用スタンド(クレードル)が必要ではないようです。<br />\rau ショップを通じて au に確認したところ、USBケーブル WIN で接続すると、マスストレージ機能が使用可能だということでしたので早速注文してきました。<br />\rこのとき、メニューも変わるようで、「データ通信」か「データフォルダ」を選ぶ画面が出るかもしれないと言うことでした。一つ確認し忘れたことは、このケーブル接続前にドライバが必要とのことですが、データ通信に使用しない場合でも、ドライバのインストールが必要なのかどうかということです。<br />\rこれは、また注文したケーブルが届いたら確認してみたいと思います。<br />\r<br />\rしかし、PCサイトビューアはほしい。</p>\r<p class=\"add\">06/03/10 追記<br />\r注文していた USBケーブル WIN が届いた。このケーブルは公式にはドライバが必要なのであるが、データ通信ならいざ知らず、マスストレージ機能にそんなものが必要かと疑いが隠せなかった。<br />\rそこで実験してみました。まずそのまんまつないでみました。他の携帯ですと、つないだ際にau電話機側に専用のメニューが出るようですが W41T は出ませんでした。また、PC上は W41T が接続されたとはするのですが、ドライバがないためそれ以上先には進めませんでした。<br />\rそこで、ケーブルをつないだ状態で、後からau電話機側のハードディスクメニューでマスストレージ接続中の状態にしてみました。するとドライバなしでもマスストレージ機能を利用することが出来ました。<br />\r手順的には au電話機側のハードディスクメニューでマスストレージ接続中にした状態で、接続してみても問題なく接続できました。<br />\rデータ通信ではなく、マスストレージ機能を目的に使用する場合についても説明書に記述がほしいですね。<br />\rちなみに W41T 電話機側、ケーブル側 どちらにもこの機能についての説明はありません。</p>',1,4970,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:38','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060304_white_kerosene_sea',3,0,'2006-03-04 09:57:06','家の中が灯油の海に',null,'<p>家の中が灯油の海になりました。</p>\r<p>灯油がなくなったので、電動ポンプで入れながら部屋が汚いのに気づいて、掃除機を掛ける。<br />\r電動ポンプがちょっと気になったけど、満タンで自動で止まるだろうと思ったら、止まってませんでした。</p>\r<p>んー、使用上の注意をちゃんと読まないとダメだな～！</p>','',1,4028,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:59','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060305',3,0,'2006-03-05 22:58:00','ガバルツに探検に行きました(Lv.59)',null,'<p>行ってすぐにボスとご対面できました。</p>\r<p>ドロップ品には魔神の血（黄)はなく、クリック・スカウター・ナイトのLv75兜がそれぞれ出ました。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060305_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"307\" src=\"http://www.blackcat.xyz/images/articles/xo060305_1.jpg\" alt=\"\"></a><br />\rでも、その一時間後にはくろねこは死亡して、エスネから戻ってくることになりました。</p>','<p><img width=\"400\" height=\"450\" src=\"http://www.blackcat.xyz/images/articles/xo060305_2.jpg\" alt=\"\"><br />\r行く前のお昼過ぎにはレベルアップが出来ました。<br />\rでも、浮いちゃってレベルが下がったので、砂漠でもう一度レベルアップです。<br />\r<img width=\"400\" height=\"450\" src=\"http://www.blackcat.xyz/images/articles/xo060305_3.jpg\" alt=\"\"></p>',1,2943,0,1,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo060305_1_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:30','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060306_I_thought_because_I_walked_in_the',3,0,'2006-03-06 22:59:39','街を歩いていて思うこと',null,'<p>街を歩いていて最も気にかかることは、<em>平和堂前の違法駐輪</em>でしょうか？<br />\r現市長にも前市長にも平和堂にも対策を要求しているが、改善されるどころかますます悪くなる一方である。<br />\r駐輪場が目立たない位置にあるにもかかわらず、誘導の標識がない ＆ 平和堂の警備員があたかも駐輪場であるかのごとく舗道上にきれいに並べている現状、どこから見ても歩道＝駐輪場の図式ができてしまっていることが一番の問題でしょう。<br />\rしかもこの警備員間違ったとことをしているという認識が全くない。</p>','<p>あと、自転車は本来車道を走行すべき乗り物ですが、歩道を我が物顔で占拠しながらベルを鳴らしながら突っ込んでくる人もいる。<br />\r車道を通行していただきたいものだ。しかしながら車道も狭く自転車で車道を走っていると、自動車にいやな顔をされているような気がするのはくろねこだけでしょうか？<br />\r車道だけでなく歩道も狭いんですよね。今の行政の実体として歩道よりもまず車道を優先すると言うのがありそうです。<br />\r道幅もうちょっとましにならんかな。</p>\r<p>車で道を走っていると、滋賀では駅付近以外ではあんまり見かけないのだが、京都あたりを走っていると客待ちタクシーや荷さばき駐車などが多いです。客待ちタクシーは違法行為なので即やめていただきたいが、客待ちタクシーの中でも横断歩道上や交差店内での駐車は最悪ですね。荷さばきは店舗側が荷さばきスペースを確保すべきだと思うのはくろねこだけでしょうか？<br />\r大阪、京都あたりですとホテル付近での観光バスの縦列駐車など「おいおい」と思うことも多々。<br />\r二車線道路などでまっすぐ追い越し車線側を走っていると、走行車線側から駐車の車をよけようとしていきなり突っ込んでくる車があるんだけど、特にタクシーが最も悪質なんだが何とかならんか？<br />\r事故なんかではタクシーのような職業ドライバーはプロボクサーがケンカで拳を使ったら凶器扱いになるみたいに、過失割合を無条件に増やすのもいい手かも！毎日運転しているプロだから路上の危険予測もプロだし、そもそも二種という専用のライセンスをもらってるんだから、周りへの安全も普通の人以上に配慮すべきだと思うのだ。</p>\r<p>駐車と言えばマナーの問題なんだと思うんだけど、総合スーパー(GSM)の駐車場で駐車枠外に止めてる車いっぱいあるんだが、他は誰も気にはならんのだろうか？ただ単にうざいだけなのだが...<br />\r枠外に止めてる車よりももっとおかしいと思うのが、身体障害者用のスペースに止めて荷さばきしている業者。自分側で提供していて自分で決めたルールを守れないのなら、いっそのこと無くしてしまう方がいいのでは？あ、条例などでスペースの確保が決められてるのでしょうか？なんか最近どこかのホテルでありましたよね、偽装問題。<br />\rしかし、JRの女性専用車両と言い身体障害者用の駐車スペースと言い、法の下の平等には反しないのでしょうか？どういった解釈がされているのでしょうか？身体障害者用の駐車スペースは自分がその立場になったときに使用できるという意味では平等なのかな？別に身体障害者用の駐車スペースがあるのがいやな訳じゃないんだが、駐車場がいっぱいなのにそこだけあいていて利用できないムードだけが漂っているのが、なんかもったいない。<br />\r警備員が立っているなら、満車のときには融通を利かせてくれたら良いと思います。公共の道路にコーンをたてて右折できないように交通制御するだけの融通が利くならできると思うのですが。しかし、道路を占有しているのに警察署に占有許可を取ってないのは違法行為なんですが...</p>\r<p>どうすれば、街は歩きやすくなるのかな？考え過ぎなのか？<br />\r食料品と雑貨以外の買い物はほぼネットで済ませるような生活になってきて、なかなか街を歩く機会が減ってきているくろねこですが、気分良く街が歩けるようになるといいなとおもうのであります。</p>',1,3985,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:45','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060306_delicious',3,0,'2006-03-06 23:09:42','おいしいもの',null,'<p>何を食べてもおいしいと思えるのは幸せなんでしょうか？<br />\rもし、上記の理由がおいしい物を食べたことがないから、比較対照が無く何でもおいしいと思えるのであれば、おいしい物を食べてないことは不幸じゃないのでしょうか？</p>\r<p>くろねこもお金持ちではないので、高いお店には食べにいけません。<br />\rでも、どうせお金を出すならちょっとでもおいしい物が食べたいと思います。<br />\rたぶんこれはみんな同じことだと思います。</p>','<p>ここからが人によって違うんですが、安ければまずくてもOKと言う人と、まずくても最低条件はクリアしてないとと思う人といると思います。<br />\r安ければ...と言う人にも下限はあると思うのですが、コストパフォーマンスに対する感じ方が違うように思います。</p>\r<p>食べ物でなく雑貨でも、100均商品を買うか普通にメーカがわかるのを買うか、これと同じような気がします。</p>\r<p>くろねこは、100均商品は用途に合わせて買うようにしています。使い捨ての物は100均の比率が比較的高く、永く使える物ほど100均の比率は下がっています。使い捨てでも実は100均の方が高いケースがあるのでちゃんと見てから買うようにしています。</p>\r<p>前に、100均でボールペン3本で105円で販売していました。いくつかかったのですが、使えたのは1/3位でした。しばらく使うとインクが分離して気泡が入ったみたいな感じになって書けなくなったり、ボールからでてくるインクが多かったりで使えないと判断したボールペンが多かったせいです。</p>\r<p>スーパーの文具売り場で一本100円のボールペンを買っても値段的には同じだったので、ボールペンは100均では買わないことにしました。</p>\r<p>食べ物も、何か不満を持って回数を食べるより、たまにおいしい物を食べる方が満足感が得られるような気がします。</p>',1,2823,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:03','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060308',3,0,'2006-03-08 23:26:31','果汁が「聖典を奪ったのは？」クエスト完了！(果汁 Lv.35)',null,'<p>本日サブキャラの 果汁100％ がめでたくレベル35になりました。<br />\r<img width=\"400\" height=\"470\" src=\"http://www.blackcat.xyz/images/articles/xo060308_1.png\" alt=\"\"><br />\r一緒に移ってるのは同じPTでレベル上げを手伝ってくれている kou0822 さんです。</p>\r<p>レベル35と言うことで、武器は「セイクリッドワンド」に変えました。<br />\rちなみに、出来ないだろうなとは思いつつセイクリッドワンドの精錬を試みましたが、選択一覧にも出てこない状態で対象外となっていました。<br />\r挑戦される方は精錬後、セイクリッド化をおためし下さい。くろねこが思うにはたぶん出来ないと思います。</p>','<p>で、かねてより購入しておいた石版3を使った「聖典を奪ったのは？」クエストを実施しました！<br />\r<img width=\"350\" height=\"250\" src=\"http://www.blackcat.xyz/images/articles/xo060308_2.jpg\" alt=\"\"><br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060308_3.jpg\" alt=\"\"><br />\r途中、ローグギルドに行かなければならないのですが、果汁のリターンポイントがブリンに設定してあったのでリターンスクロールを使って一瞬で行って、帰りはギルド事務所からこれも一瞬で帰ってくることが出来ました。<br />\r<img width=\"350\" height=\"230\" src=\"http://www.blackcat.xyz/images/articles/xo060308_4.jpg\" alt=\"\"><br />\r以上で完了しましたが、所要時間は日々鍛錬(アコライト)のクエストと合わせても10分程度でした</p>\r<p>報酬のレルディエプネックレスをもらって、35レベルアップ分のスキルと併せて4上がったことになりかなり強くなったような気がしますが、杖の精錬が全く出来ていないので攻撃力はかなり下がりました。</p>\r<p>あとは、ロストの鍵クエストに挑戦できる Lv45 に早くなりたいですね！</p>',1,2999,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:57','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060309_google_desktop',3,0,'2006-03-09 19:28:49','グーグルデスクトップを入れてみました。',null,'<p>とても便利な機能だとかで興味はあったのですが、グーグルにローカル環境のインデックスを作られたらいつの間にかWEBで公開されそうで...<br />\r次の Windows Vista でも同様の機能が搭載されるようで、数ヶ月前マイクロソフトの社員の引き抜きで両社が争ってましたね。</p>\r<p>で、入れてみた感想ですが初回のみ作製されるというインデックスですが、更新内容がWEBで表示されるので精神的に非常につらい。しかもサイト検索と全く同じスタイルなので煽る煽る。</p>\r<p>しかし、インデックスを作るのも検索するのも Windows XP 標準の検索よりかなり早い。(と言うか標準の検索機能が遅すぎると言うべきでしょうか？今までもテキストの検索は遅すぎで待てずに grep で検索していました。)</p>\r<p>Vista に移行するまではこのグーグルデスクトップ検索を使用してみますか...</p>\r<p>幸い今までこの機能で個人情報流出を聞いたことが無いので、バージョンアップ関連以外はローカルの内側で閉じているのだと信じたいところです。</p>','<p class=\"add\">調べてみると過去(2004年)に脆弱性があったようです。<br />\r<a href=\"http://www.itmedia.co.jp/enterprise/articles/0412/21/news013.html\">Googleのデスクトップ検索ツールに脆弱性、アップデートリリース</a></p>\r<p class=\"add\"><strong>0702/26 追記</strong><br />\rまた、脆弱性が見つかったとのことです。<br />\r<a href=\"http://www.computerworld.jp/news/sec/59009.html\">Google Desktopでまたしても脆弱性が発覚――PCの全データが流出するおそれも</a></p>',1,4423,1,1,'0000-00-00 00:00:00',0,'<a href=\"http://www.itmedia.co.jp/enterprise/articles/0412/21/news013.html\">Googleのデスクト',0,1,1,0,0,'1999-11-30 00:00:40','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060310_xoops',3,0,'2006-03-10 21:52:03','XOOPSオンライン状況にゴーストが',null,'<p>WEBアプリケーションってログオフと言う処理をせずにブラウザを終了すると、ある一定時間でセッションを切断するのが一般的だと思っていました。</p>\r<p>しかし、XOOPSのオンライン状況はいつまで経ってもいないはずの人が表示されている...</p>','<p>本日やっと対策を求めてグーグルで検索してみました。<br />\rやはり、本家サイトですでに質問されていました。</p>\r<p>一般設定のタイムアウトとは無関係と書かれていますね...一般設定をいじっても変わらないはずですね。</p>\r<p>消える様になるためには以下の条件を全て満たす必要があるようです。</p>\r<ol>\r    <li>300秒以上経過</li>\r    <li>オンライン状況が表示されるタイミングで1/10の抽選に当たる</li>\r</ol>\r<p>2個目の条件が存在しているので、人があまりこないサイトではゴーストが表示されていたわけですね。</p>\r<p>理由がわかったのでソースコードをハッキングしてみたいと思います。<br />\r書き換えるソースコードは記事中にありました。「/modules/system/blocks/system_blocks.php」です。<br />\rfunction b_system_online_show()の中の書き条件式を削除。</p>\r<pre>\rif (mt_rand(1, 100) &lt; 11) {\r	&#36;online_handler-&gt;gc(300);\r}\r</pre>\r<p>下記のように修正することで、タイムアウトしたエントリは次回表示時に必ず消えるようになりました。</p>\r<pre>\r//if (mt_rand(1, 100) &lt; 11) {\r	&#36;online_handler-&gt;gc(300);\r//}</pre>',1,4748,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:05','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060311',3,0,'2006-03-11 22:29:00','ガバルツ探検(Lv.61)',null,'<p>夕方、いつものようにゼネピックを始めてたら、☆ｽﾀﾝﾘｨｰ☆がデヴァイスさんとガバルツに探検に行っていたので、いつもつるんでいるkouさんと一緒に合流することにしました。<br />\r(くろねこは前の石拾いクエが終わってないので、それも出来れば終わらせたかったのですが...)</p>\r<p>合流してしばらくすると、☆ｽﾀﾝﾘｨｰ☆が飯落ち...</p>\r<p>そのまま、探検を続けるとニプルボックスが倒すとローグLv75の帽子が出てきました。うまうま。</p>','<p>さらに警備兵の方でうろついてると...でたぁ！ニグレック。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060311_1_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"384\" src=\"http://www.blackcat.xyz/images/articles/xo060311_1.jpg\" alt=\"\"></a><br />\r(&uarr;3/10のSS)<br />\r<br />\rニグレックを倒したところで、何か落ちてるかもしれないのでALTキーを押して、まだ召還されたハルラバが残っていたので、その2体を倒す...残ったのは...イステクレブルドベレ。使えないや...<br />\r<br />\r他には何か出てないかと荷物を確認したら、魔神の血（黄）が！！<br />\rめちゃめちゃラッキーでした。くろねこは魔神の血（黄）を手にするのはこれが二度目。<br />\r前のは単についていったというレベルのときに出て、しかもランダムで飛んできただけなので、そのときのPTで一番レベルが高い人に譲っていました。<br />\rなので、今回初めて手にする魔神の血（黄）と言っても良いかも？<br />\r<br />\rさらにそのあと、またまたニプルボックスが！！。でも、二度目は何も落としてくれませんでした。残念。<br />\r☆ｽﾀﾝﾘｨｰ☆ はボスに出会えなくて残念だったみたいですが、そのあと B3F でボスに出会ったようです。</p>',1,2648,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo060311_1_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'1999-11-30 00:00:25','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060313_mcafee',3,0,'2006-03-13 17:58:23','マカフィーおまえもか！',null,'<p><a href=\"http://www.mcafee.com/japan/\">マカフィー株式会社</a>がパターンファイルで問題を起こした！そのパターンファイルの番号は 4715 である。</p>','<p>以前にも同様の問題があった。それは 2005/04/23 トレンドマイクロ社によるウイルス対策ソフト「ウイルスバスター」で起きた。<br />\rこのときの内容は、23日午前7時30分ごろ公開したウイルスパターンファイル「2.594.00」により、PCのCPU使用率が100％になるトラブルだった。<br />\r今回はPCが起動しなくなることはなかったが、Excel ファイルなどがウィルスと誤検出され退避されてしまう。<br />\rもしこの問題に気づかず、このフォルダの内容をクリアしてしまったら、重要なファイルが無くなっていたかもしれない。</p>\r<p>トレンドマイクロ社の際に各社チェック体制を見直してはいなかったのか、今回の問題の原因はどこにあったのかまだ公開されていない。</p>\r<p>我々はどこの製品を使えばよいのだろうか？</p>',1,4741,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.mcafee.com/japan/\">マカフィー株式会社</a>',0,1,1,0,0,'1999-11-30 00:00:25','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060314_kakutei17',3,0,'2006-03-14 17:58:23','確定申告＆青色申告完了',null,'<p>ようやく確定申告と初の青色申告が完了しました。</p>\r<p>初の青色申告は、未収金と未払い金に苦しみました。<br />\r丁寧に相談に応じてくださった、ホロンサポートさんと税務署の皆様に感謝します。<br />\rでも聞く人によって言うことが違うんですが、税務署の言うとおりの方法で未払い金と未収金を計算しました。何度も確認したので間違いがないとは思うのですが、本日昨年までの確定申告で間違いがあったので100％間違いがないといえないのが何とも情けないですが...</p>\r<p>確定申告での間違いというのが長期損害保険料控除なのに短期で計算していたので3000円しか控除が受けられていなかったというものです。たしか最初の年に確認した際に短期といわれたのですしたはずだったのですが...</p>\r<p>更正の請求を試みましたが、900円ほどしか返ってこなさそうなので、勉強代と思い請求をしないことにしました。</p>','',1,2874,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:59','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060316',3,0,'2006-03-16 00:35:24','マントがもらえなかった(Lv.61)',null,'<p>バレンタインとホワイトバレンタインの両方のクエスト終えたのに...</p>\r<p>マントがもらえなかった...</p>\r<p>くろねこがホワイトバレンタインを、果汁がバレンタインをそれぞれやったので、1キャラで二つのクエストを同時にみたいしていないのが原因です。<br />\r名前から男の子専用、女の子専用のクエストだと思いこんでいたのが敗因でした。</p>\r<p>効果は、力+3/素早さ+3/精神力+3 となんとステータスが+9も増えます。<br />\rこのアイテム運営の悪意か、課金アイテムと同じく譲渡不可属性が設定されていて、バザーも行うことが出来ません。要件を達成したキャラなら1キャラ2枚もらえるので、是非バザーで売っていただきたいところなのですが、それは叶わぬ夢ですね。</p>\r<p>このマントばぐかどうかしらないんだけど、装備した後にもう一度同じ手順を踏むともう1枚もらえるのだ。</p>','',1,2632,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:49','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('winny',3,0,'2006-03-17 07:51:54','Winny がつかえなくなる',null,'最近 Winny がかなり悪者になっていますが、一般メディアの報道は知っているのか知らないのか Winny 自身がウィルスだと報道されているものがあります。\n\n実際には Winny 自身がウィルスなのではなく、その PC に感染したウィルスが Winny を通じて個人情報などの重要なファイルを含むファイル群を交換しているに過ぎないのですが...\nこのウィルスは Winny ネットワークを介して広がっているようで、ウィルスをユーザが実行してしまうことにより感染しているようです。Winny の脆弱性を利用したという話は聞いたことがないです。\n\nそんな中、くろねこが使用しているプロバイダである「ぷららネットワークス」が、ファイル交換ソフトである Winny の通信の完全規制を開始することを決定したようです。\nWinny が完全に通信できなくなることで、Winny が使用していた広帯域が空いてくれればうれしいですが、Winny を使用しているユーザは別の P2P ソフトに乗り換えるだけなのではないでしょうか？\n\nそして、その P2P ソフトを使うウィルスが作られその対策が迫られる...と歴史は繰り返す...そんな気がします。','',1,3632,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('how_many_bug_in_sys',3,0,'2006-03-17 19:13:39','システムにバグはいくつあるのだろうか？',null,'システムにバグはいくつあるのだろうか？疑問に思ったことはありませんか？\n毎月リリースされるマイクロソフトの重要な更新。いったいいつになったらセキュリティホールは無くなるのか？\n考えた人はいないですか？\nシステムに携わっている人、開発している人ならば、自分のプログラムにはいくつバグがあるのか？と考えたことがあるかと思います。\n\nWindows で話をすると今月（2006/03）にマイクロソフトから提供されたセキュリティパッチは 2 件ありました。\n1 件は一番ランクの高い深刻(MS06-0012)、もう1件は上から 2 番目のランクの重要(MS06-0011)でした。(マイクロソフトのセキュリティパッチのランク分けは 4 段階です)\n\n1 件の重大な事件が起こったとしましょう。\n\nしかし、その 1 件の事件の裏には 29 件の軽い事件があり、さらにその裏には 300 件の事件になりかけてる物があるという法則があるようです。\n\n言い換えると 1 件の深刻なバグの裏には 29 件の軽いバグがあり、さらにその裏には対応されない 300 件のバグがあるということです。\n\nこの法則は「ハインリッヒの法則」(1：29：300の法則)といわれています。\n\n保険会社の災害発生確率の分析で、アメリカのハインリッヒという方が分析したらしいです。\n\nくろねこがこの法則を知るきっかけとなったのが、こちらの<a href=\"http://scrapbook.ameba.jp/kyoto-com_book/entry-10008422004.html\">ここらで旬な話を・・・｜もしかしてタブー？情報販売のからくり！</a>からです。\n\nまた、先ほどのサイトにはクレームを言う人は全体の4%にすぎないと言われています。\nそのときには、くろねこのように「ぶーブー」文句を言う人は全体の 4% しかいないのか...\nと思っていただけだったのですが、掲載のようにくろねこの身近なことにたとえてみたところ、恐ろしいことが判明したわけです。\nクレームは言わないと製品はよくならないと思います。本当にその製品を使い続けようと思うのであれば、良い意味でのクレーム(要望)は伝えてあげた方がいいのだと思っています。\n\nWindows の話に戻りますが、今回の 2 件の重大なセキュリティ上の問題の裏には、58 件の軽いセキュリティ上の問題があり、600 件の未対応の問題がある。しかもこの件数はセキュリティ上の問題の今月の対応件数であって、未対応の重要な問題はまだありますし、Windows のバグの件数ということで数えるともっと多いはずです。\n\nミスでできるセキュリティ上の問題の他に、故意に挿入されるセキュリティ上の問題があります。\n過去には Windows にバックドアがあったといううわさですし、今もある可能性は高いでしょうね...\n日本の政府はいつまで Windows ベースで国防などの重要な情報を扱い続けるのでしょうか？\n\nセキュリティ管理とリスク管理はとても重要ですね。','',1,2988,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060317',3,0,'2006-03-17 23:32:00','レベル62になりました(Lv.62)',null,'<p>レベル62になりました.<br />\r<img width=\"400\" height=\"470\" src=\"http://www.blackcat.xyz/images/articles/xo060317_1.png\" alt=\"\"><br />\r(23:32:07 リニアの森で)</p>\r<p>次上がったら武器が変わるので楽しみです！</p>','',1,2286,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:33','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('demo_in_france',3,0,'2006-03-18 20:35:24','フランスのデモ',null,'最近フランスで大規模なデモが起きているようですね...\n\nテレビでニュースを見てたらデモの様子を放送をしていました。\n原因を見ていると、「26歳以下の就業から2年以内の者は理由なく解雇できる」ようになったとか...\nちょっとなめなめな法改正ですね...そりゃデモが起きても当然という気がします。\n\nしかし、この法案が成立する背景って何があったのでしょうか？\n日本でもこんな法律が成立するの？という法案が通ったことは過去にいくらでもあるのですが、経過がわからないと今後の対策も立てられないですね。','',1,2383,0,0,'0000-00-00 00:00:00',0,null,0,1,1,0,0,'0000-00-00 00:00:00','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060319',3,0,'2006-03-19 21:36:00','レベル63になりました(Lv.63)',null,'<p>レベル63になりました.<br />\r<img width=\"400\" height=\"470\" src=\"http://www.blackcat.xyz/images/articles/xo060319_1.png\" alt=\"\"><br />\r(21:20:39 リニアの森で)</p>\r<p>レベル63なので、武器、鎧、兜と盾が変わるんですが...<br />\rバザーで買ってあった+2のアキペンハンカーを精錬しようとしたら +5 にする際に失敗して、以降もう一度 +5 にチャレンジするときには、12個もゼンストーンを使ってました...とほほ...</p>\r<p>鎧も盾も防具は何もないので、買って精錬しようかと思ってたのですが、いっぱい失敗したのでレアが出るまで取りあえずそのままにします...</p>','<p>今日は昼からずっとリニアでレベル上げをしていたのですが、「ある兵士の日記」が15冊も取れました。<br />\rくろねこのPTは、アイテムの配分がランダムなのですが、今日は珍しく引きが良かった。<br />\r自分が倒しても、PTの仲間が倒してもくろねこに日記が...</p>\r<p>そんなリニアでおもしろい SS が取れました。<br />\r<img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060319_2.jpg\" alt=\"\"><br />\rPTの「グミ嫌い」さんと「ぐみ」さんが並んでいる SS です。いままでぐみさんを見たことは何度かあるのですがこうして並んでSSが取れたのは初めてです。<br />\r公開しても良いと言うことなので、このまま今開催中のコンテストに応募しちゃおうかな～？<br />\r公式の SS じゃないとダメかな？</p>',1,2929,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:16','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('w41t_headphone',3,0,'2006-03-20 19:59:13','W41T Bluetooth ヘッドフォンがほしい',null,'<p>W41T は A2DP に対応していないので、音楽用途では一般的な Bluetooth ヘッドフォンを使用することができない。<br />\r<br />\rW41T 用にはパンフレットにも別売と記載されているヘッドフォンがあるのだが、au ショップでは取り扱いがない。<br />\r唯一のその商品は、加賀電子から BTee Music 対応として、ペンダント型 Bluetooth ヘッドフォンが販売されているが、非常にかっこが悪い。<br />\r(同社ホームページでは洗練されたデザインとして売り文句が書いてあるが、どういうセンスなのだろうか？またこの製品は Designed by YAMAHA となっている。)</p>','格好はおいておくとして、その対応プロファイルだが BTee は対応しているが ハンズフリーには対応していない。<br />\rと言うことは、W41T で外部 Bluetooth アダプタを使用しない前提で話を進めると、音楽が聴けて電話もできるヘッドフォンは現在存在しないと言うことになる。<br />\r<br />\rくろねこ的に音楽携帯電話用のヘッドフォンに求める機能は以下の通りである。<br />\r<ol>\r    <li>ハンズフリー通話ができる </li>\r    <li>音楽が聴ける </li>\r    <li>着信時にヘッドフォン側の操作で、通話・拒否ができる </li>\r    <li>待ち受け時にヘッドフォン側の操作で、発信ができる。<br />\r    (前回着信番号、指定番号、) </li>\r    <li>待ち受け時にヘッドフォン側の操作で、曲の選択ができる</li>\r</ol>\r<p>追加の要件として、<br />\r</p>\r<ol>\r    <li>外では携帯電話で音楽が聴ける </li>\r    <li>さらに通話ができる </li>\r    <li>自宅では、PC などの機器から音楽が聴ける </li>\r    <li>もちろん、電話がかかってきたら通話ができる</li>\r</ol>\rこれを 1 台のヘッドフォンで、面倒な操作無しにこなしてほしいです。',1,3247,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:00','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060321',3,0,'2006-03-21 23:59:13','転職準備(lv.63)',null,'<img class=\"left\" alt=\"転職準備\" src=\"http://blog.blackcatlab.com/images/xo/xo060321.jpg\" width=\"300\" height=\"650\" />\r\n<p>お出かけから帰ってきてログオンしたら...</p>\r\n<p>「ガバルツ探検行こう」と☆ｽﾀﾝﾘｨｰ☆お誘いが...<br />\r\n結局ガバルツに行かずに形象石を取りに行ったのですが、途中でみんなお食事タイム。<br />\r\n独り抜け二人抜けでくろねこが食事から戻ったときには、mary☆さんが数回浮いてしまって18%もダウン(ノ_＜。)ビェェン<br />\r\n申し訳ないです...</p>\r\n<p>くろねこは、一個もとれなかったのですが、PTメンバから譲っていただいて 4個ゲットしました。<br />\r\nその後、エスネのバザーで 11,000kron で販売していたので、16 個買って 20 個としました。</p>\r\n<p>次は、英魂石がほしいな～</p>\r\n<br clear=\"all\" />','',1,2614,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:49','html',0,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060322',3,0,'2006-03-22 01:10:46','ゼネピックで詐欺',null,'<p>くろねこがいつもやっているゼネピックで、突然フレンドのAさんからお話が...</p>\r<blockquote>A さん  :くろねこさんは社会人でしたよね..<br />\rくろねこ:はい<br />\rA さん  :中学生とPTを組まれたことはあります？</blockquote>\r<p><br />\rで始まった会話だったのですが、最初は社会人だけでPTが話が通じて良いなと言う趣旨だったのですが、RMT の話になりよくよく話を聞くと課金アイテムと通常のアイテムのトレードにおける詐欺を、PTのメンバがやっているのだと聞かされました。<br />\r（ゲーム内での高額アイテムを餌に課金アイテムを要求して、アイテムを渡さずログオフと言うところでしょうか？） PTのメンバとして注意はしたのですが、話をはぐらかして聞いてくれないと、悲痛の叫びが...(ノ_＜。)ビェェン</p>','<p>くろねこは RMT 自体にそんなに問題を感じていないのですが &larr;問題？<br />\rRMT をするために BOT 行為やチートを行う方がいらっしゃるのでそちらの方が問題かなと感じています。<br />\r<br />\r個人の主観ですが通常、RMT をする理由としては、<strong>引退するときにせっかく育てたキャラクタ(取ったアイテム)を、このまま消してしまうのはもったいない</strong>と言う理由や、お小遣い稼ぎ？と言う理由が多いと思いますね。<br />\r<br />\rBOT や チートする人は RMT で生活しておられる方が多いと思うので、ゲーム内のお金がインフレして必要なアイテムが非常に高額になったりしてゲームバランスが壊れてしまうので、運営側に対応していただきたいと思います。<br />\r<br />\r詐欺は、ウルティマオンラインなどですと日常茶飯事に行われているので、運営会社でも注意が呼びかけられていますがゼネピックでは全然ありませんね。<br />\r<br />\rゼネピックの課金も一種の RMT だと思っていますし、そもそもシステム適にプレゼントができるようになっているのが、RMT を助長し、課金アイテムと通常のアイテムが安全にトレードできないことが、詐欺をしやすくしていると思います。<br />\rでは、課金アイテムが通常のアイテムのように自由にトレードできるようになればいいのかと言うと、そうするとまたゲームバランスが崩れてしまうと思うのですね。課金無しではプレイできなくなりそうです。<br />\r(PT内やフレンドなど親しい間柄でプレゼントしあうのは問題を感じないのですが、「課金課金くれくれ」はちょっといやになります...)<br />\r<br />\r<em>課金とトレードする方は詐欺の可能性を疑って、詐欺をされても自己責任で</em>行うしかないと思います。<br />\r<br />\rだって、ちょっと考えたらわかるじゃないですか、あやしいって！<br />\rあくまで、「システム的には≪プレゼント≫であって、≪トレード≫ではない。」と言うことですね。<br />\rでも、詐欺を行った者を放置しても良いと言うことではないので、運営会社を通じて警察に届けることがよいかと思います<br />\r<br />\r<em>みなさん、詐欺には気を付けましょう！</em></p>',1,4100,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:13','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060322_windows_vista',3,0,'2006-03-22 19:14:34','Windows Vista が延期？',null,'<p>せっかく今年中に Windows Vista が手にはいると思っていたのに、入らなくなった様です。</p>\r<p>前々から&beta;2 がでないとかで「あやしい」という記事はよく見たのですが...</p>\r<p>正式にマイクロソフトから 2007年頭になると発表されたようです。<br />\rWindows Vista Ready もしくは、プレインストール PC に買い換えをねらっていただけに痛いです。<br />\rこうなったら、つい先日こちらも延期が発表された PlayStation 3 でも買ってしまいますかｗ。</p>\r<p>WEB で記事を探してみたのですが、<a href=\"http://japan.cnet.com/news/ent/story/0,2000047623,20099008,00.htm?tag=blogger.cr\">CNET Japan</a> でしか見つけることができませんでした。<br />\r明日には PC Watch や ZDNet Japan でもそのうち記事がでると思いますね。<br />\rどこまで尾を引くんでしょうか？本当に2007年頭にでるんでしょうか？</p>','',1,2803,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://japan.cnet.com/news/ent/story/0,2000047623,20099008,00.htm?tag=blogger.cr\">CNET Japan</a>',0,1,1,0,0,'1999-11-30 00:00:39','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060323',3,0,'2006-03-23 22:25:41','ゼネピックの運営って何してる？(Lv.63)',null,'<p>本日、エスネで RMT のバザーを見つけました。</p>\r<p>魔人の血(青)が 4000 円なのです。[GM]xxx さんが出していたバザーなのですが、その1時間後くらいには某ｗさんも同様の掲示板を...<br />\r[GM]xxx というキャラ名は利用規約違反じゃなかったんでしたっけ？<br />\r会話を自動的に制限できるなら、GM という文字を含むキャラ名を作成時に自動で禁止すればいいのに...</p>\r<p>問合せへの回答はすごく遅いし、それに対して対応してくるわけでもない。<br />\r別件だけど、こちらが運営方法が違法行為だと訴えている件に対しても、それに対し何の弁明も行われない。</p>\r<p>ペリーさん何か反応くれないと、<a href=\"http://www.npa.go.jp/cyber/\">警察庁サイバー犯罪対策のページ</a> か 全国消費者センターに相談するぞ！</p>','',1,2678,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.npa.go.jp/cyber/\">警察庁サイバー犯罪対策のページ</a>',0,1,1,0,0,'1999-11-30 00:00:00','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('xo060324',3,0,'2006-03-24 08:25:41','レベル64になりました(Lv.64)',null,'<p>レベル64になりました。</p>\r<p>レベルアップすると HP と MP が全快するので、もったいなくないようにぎりぎりまで使ってから...<br />\rと思ってたら、SS を取るのを忘れてしまった～＞＜；</p>','',1,2752,0,1,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:43','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060325_in_mac',3,0,'2006-03-25 18:29:01','マックでピクルスを抜くと！？',null,'<p>今日は近くの帰帆島の矢橋島公園に行きました。今日は前日乗れなかった<a href=\"http://www.gaido.jp/machikado/2005/04/27ya/\">おもしろ自転車</a>に乗るためのチケットを買いに...</p>\r<p>このおもしろ自転車のチケットを大人用と小人用を買いました。<br />\r3歳未満は小人料金が必要と書かれているのですが、係員曰く4歳からということなので一度買った小人用のチケットを払い戻ししていただきました。</p>\r<p>しかし、時間帯が最終の16:00～ の分しかなかったのでしばらく遊んだ後、マックにおやつを食べに...</p>','<p>で食べてたのですが、嫁がおいらたちが自転車に乗っている間に食べる分とか行ってフィレオフィッシュを買いにもう一度レジへ...<br />\rそこで、最近にしては珍しくピクルス抜きを注文したお客さんが居たようです。<br />\rそこで店員が確認しました。「ピクルスとチーズを抜いてもよろしいですか」と、そのあとすかさずお客さんから「いえ、チーズは抜かないでください」と言い返えされてました。<br />\rおいおい、チーズ抜いたら普通のバーガーじゃない...そんなお客さん居ないよ...チーズバーガー頼まずにハンバーガーを頼むでしょ？変な店員も居たものです。</p>\r<p>しかし、他にも居ました変な人。それはうちの嫁です。自転車に乗ってる間に食べると言って買ったフィレオフィッシュ、1つと思いきや3つも買ってました。おいおいさっきせっとたべたでしょ～。</p>',1,3886,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.gaido.jp/machikado/2005/04/27ya/\">おもしろ自転車</a>',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060326',3,0,'2006-03-26 02:42:03','英魂石を取りに...(lv.64)',null,'<p>kou0822 さんと リシェさんと英魂石を取りに行きました。</p>\r<p>今日はとても人が多くて、リシェさんが落ちそうとか言ってましたが、PCのスペックを聞くと 256MB しか積んでないとか...<br />\rそれはダメです。もっとたくさん積んでくださいという感じでした。少なくても 512MB 出来れば 1GB 以上が良いかと...</p>\r<p>結局、英魂石は１個も取れず帰ることになりました。(リシェさんはアコ２の Lv71 の杖がご希望だったのですが、こちらも出ませんでした。)</p>\r<p>途中、行きと帰りに１個ずつ形象石が出たので、こちらはちょっとうれしかったです。</p>','',1,2653,0,2,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:33','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060326_miyagawa_is_dead',3,0,'2006-03-26 13:22:28','作曲家の宮川泰さんが死去',null,'<p>お昼、この１週間に起きた出来事というニュースの中で作曲家の宮川泰さんが死去したニュースを見ました。</p>\r<p>「宇宙戦艦ヤマト」しか記憶になかったのですが、ザ・ピーナッツの「恋のバカンス」などを作曲していたことを初めて知りました。<br />\r弔問客の顔ぶれを見ていると植木等さんなどが...あのおもろい曲は宮川泰さんの曲だったのですね。</p>\r<p>最後の出棺のときは宇宙戦艦ヤマトの曲でというのを見て、嫁が「棺桶がヤマトやったらかっこよかったのに」と言った。<br />\rそのとき同じ映像を見ながら、宇宙戦艦ヤマトやたらまた故人が返ってくるぞ！こわっ！</p>\r<p>ある意味、輪廻転生で帰ってくるのですが、宮川さんもイスカンダルへ旅立ったのでしょうか？</p>','',1,3935,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:55','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060327',3,0,'2006-03-27 23:01:39','ゼネピックでID盗まれた？(Lv.64)',null,'<p>IDを盗まれたという人が出たようです。</p>\r<p>本日23時頃、狩りの途中で WT が重くなったこともあり、エスネに寄ったのですがその際に倉庫近くのジェイピ前に人だかりが...</p>','<p>話を聞いているととある T さんが、F さんの ID を脅迫してだまし取ったと、言っている人がいました。<br />\r(ID は書けないくらいすごい暴言の荒らしだったのと、内容が内容だけに今回は ID は伏せてあります。)</p>\r<p>というか、ID を盗まれるってウィルスやスヌープ、フィッシング、盗聴などの手段を使っていない限り、教えた方にも責任があるとは思うのですが...どういう脅迫を受けたのでしょうか？<br />\rID を盗んだとされるTさん、MPK で有名な方らしいのですが、くろねこは幸いにしてかこの方から MPK を受けた記憶がありません。良く「祭壇への洞窟」にいらっしゃいましたが、普通に狩りをしてらっしゃったきおくしかないのです。</p>\r<p>一度、悪い噂が立てばどんどん尾ひれと背びれがつくようで、チートをしているとか MPK のボスだという噂も立っていたところで、ID を盗むという噂まで立てられて...困ったものです。</p>\r<p>今日は、この方よりも盗まれたと思われる人(T さん死ねというような ID だったと記憶)が、T さんに対して数々の暴言を...<br />\rID を盗むことが犯罪かどうかわかりませんが、不正に知り得た ID を使ってデータ改ざんするのは犯罪なので、しかるべき対処をすればいいのに、それを公の場で暴言を吐きまくる方も犯罪なのです。</p>\r<p>このゲーム、利用者の年齢(精神年齢も？)が低くてとても不愉快な気分になることがあります。<br />\rまあ、困ったことといえばお金が儲かる課金しか対応しない運営も困ったものですが...</p>\r<p class=\"add\">追記<br />\r4月に入ってから、海賊船にちょくちょく顔を出すようになったのですが、T さんに MPK されまくりです。＞＜；</p>',1,2558,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:56','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060328_parachan_mouse',3,0,'2006-03-28 21:54:58','ぱらちゃんマウス',null,'<p>週末に買った New PC の設定作業の合間に、すでに嫁と息子がデスクトップアクセサリの「ぱらちゃん」で遊んでる。。。楽しそうだ。。。なんか、すしがでてきたと思ったら、そのうちにケーキもでるようになったとか...</p>\r<p>保管してあったレーザーマウス左クリックが効かない...保管方法が悪かったかな？仕方がないので買ったときに頂いた販促品の「ぱらちゃんマウス」を開封する。<br />\r息子がそれを使っているが、動かないと文句を言ってる...<br />\rよく見ると「ぱらちゃん」の頭を上に持っている。頭を下に持たないとクリックできないので動かないのだ！普通のマウスは何の問題もなくすぐに使えたのに、動物の形のマウスはやはり先入観で頭を上に持ってしまうものなのでしょうか？<br />\rそういえば、パソコンが普及し出した95～6年頃、パソコン教室でそういう人がいたって聞いてたな～。</p>','',1,4788,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:28','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060329_new_pc_dynabook',3,0,'2006-03-29 02:56:54','新しい PC を購入',null,'<p>今週日曜に Dynabook AX/740LS を買った。今日で購入3日目。<br />\r初日は開けただけで終わった。1日目は無線 LAN の設定と Windows Update、2日目は &quot;Documents and Settings&quot;を C ドライブから D ドライブに移動する作業を行った。</p>','<p>前の Dynabook が息子に牛乳を掛けてつぶされてしまったので、購入したのだが、やはり自宅にも複数台のPCが無いと落ち着かないものだ。<br />\rと言うのも、メールなどは毎日見てないと落ち着かない。1台だと壊れた瞬間に治るまでの間、いっさいの作業が止まる。<br />\rまた、作ったプログラムを開発環境以外の環境でテストしておかないと、きちんと動くと思って提供していたプログラムが動かないと言うこともあった。</p>\r<p>いろんなソフトを導入する前に、無線LANの設定をと思い、がんばってみるがいっこうに繋がらない...仕方がないので以前使用していたPC カードタイプの無線LANカードを取り出し設定を始める。<br />\rそれでも繋がらない。。。なんでぇ～？いろいろパソコン側の設定を変更するも繋がらない。<br />\rなんか近所でYahoo User がいるらしく、その無線の電波が自宅内に紛れ込んでいます。ちなみにちょっこっとそれを使わせていたら、それには繋がった。<br />\rと言うことは、PCの問題ではないかも？と思って Aterm(ルータ)本体もいじってみるが状況が変わらなかったので、思い切って本体側の内容をリセット！<br />\rはじめから設定をし直してみると問題なく繋がりました。<br />\rくろねこが使用している「光プレミアム」は自宅においてあるお弁当箱がルータ機能を持っていると言うことなので、Aterm の設定を HUB モードに変更。<br />\rHUB モードに変更する際に、マニュアルを読んでいると、「内蔵モデムで接続する」と言う章があり、そこをちらっと見てみると、「内蔵モデムを使用可能にしなければならい。使用可能にするには機種によって異なるがスイッチがある」とのこと。おお、原因はこれだ！早速 Dynabook のオンラインマニュアルでスイッチを探すと、右側面にスライドスイッチが...ON にして設定をするとなーんの問題もなく繋がってしまった...</p>\r<p>&quot;Documents and Settings&quot;を C ドライブから D ドライブに移動する作業は未だうまくいってない。デスクトップPC の方はうまく設定できたのに、これが Professional と Home の差？<br />\r具体的には、ホームディレクトリが移動したと思われるユーザは、設定がおかしいのか、キーボードが US配置であったり、設定が保存されなかったりする。<br />\r移動していないと思われるユーザは、未だ「マイ ドキュメント」が C ドライブ側を指している。<br />\r設定がうまくいっていないと思われるユーザの、&quot;Documents and Settings&quot;以下にあるアカウント名のフォルダを削除してやり直そうと思うも、権限の問題で、削除できない。Home なのでセキュリティタブもない。あー CACLS コマンドを利用するしかないのか...</p>\r<p>と言うところで、すでに 2:30 を回ってるので、続きは明日？に持ち越し...</p>',1,2884,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:11','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060330_hot_cake',3,0,'2006-03-30 19:38:35','ホットケーキを作る',null,'今週日曜にホットケーキを焼いた。そのときのひともんちゃく。<br />\r<br />\rくろねこが、ホットケーキを作ろうと材料を買って家でボールに卵を割り、かき混ぜていると...<br />\r嫁　　　：たまにしか料理しないもののやり方やな...<br />\rくろねこ：袋に説明が書いてあるやろうが<br />\r嫁　　　：適当でいいねん。全部先に入れて混ぜた方が洗い物が少なくてすむ。<br />\rくろねこ：適当に作るとおいしくないやろうが。卵を混ぜて牛乳混ぜて、そこに粉をちょっとずつ入れて混ぜると混ぜやすいんや。<br />\r　　　　　本当は、粉もふるいで振った方がおいしいんやけど、この家にはないから...<br />\r<br />\rと言うような内容でした。後でこのやりとりを思い出しながら別のことを思い出しました。<br />\rそれがこれです。<br />\r<blockquote>ある時、牛若丸と弁慶が“糊（のり）作り”の競争をすることになりました。ご飯を等分に分けて、それをどちらが早くのりに練りあげるかの競争です。<br />\r<br />\r牛若丸は、のり押し板と竹べらを持ってきて、一粒一粒、ていねいにご飯粒を練り始めました。弁慶はというと、そんな牛若丸のゆっくりしたやり方を見て馬鹿にして自分は短時間で作ろうと考え、ご飯を一度に全部広げて、大きな鉄の棒を転がし始めました。弁慶は、初めのうちは早くできるように見えましたが、勢いあまってほとんどのご飯粒は飛び散って無駄になり、練りつぶされていないままのご飯粒が混じった質の悪いのりが少しできただけで終わりました。牛若丸は、根気強く一粒一粒を丁寧に練りつぶし続けましたから、時間はかかりましたが、ご飯を一粒も無駄にすることもなく、とても滑らかなよいのりが沢山できました。</blockquote>\rいささか、これは行き過ぎであるとは思いますが...(「根気が重要」などの教育的要素を盛り込むために、脚色されているのが見え見えです。)<br />\r適当に物事を考え適当に省略すると、良いものができないと言うようにとらえることができます。<br />\r<br />\r嫁の意見も一理あります。ただくろねこと考えが異なるだけです。<br />\rくろねこ＝おいしく食べたい。おいしく食べられるなら多少の労力はかけても良い<br />\r嫁　　　＝食べられればよい。食べられるのであれば、手間は少ない方がいい。<br />\r<br />\r仕事でも家庭でも考えが異なるものが一緒に生活すると大変です。','',1,3552,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:43','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060330_clorets_xp',3,0,'2006-03-30 19:39:50','ロッテ「キシリトールガム」よりも「Clorets XP」の方が安全か？',null,'<p>ロッテ「キシリトールガム」の捨て紙についての危険性は以前に、<a href=\"http://www.jnishida.com/blog/archives/2005/07/xylitol_gum.htm\">食品に安全なロッテキシリトール・ガム</a>で書いた。<br />\r<br />\rそれからはボトルタイプでないキシリトールガムを購入していたのだが、最近クロレッツXPボトルを購入する機会があった。<br />\rクロレッツのボトルの側面にある捨て紙についての記載を見てみると、<br />\r</p>\r<blockquote>捨て紙に使用されているノリは人体に安全です</blockquote>\r<p>(ノ゜&omicron;゜)ノ オオオオォォォォォォ-<br />\rいけてるではないですか...キシリトールガムよりも安全性が評価できる。少なくとも食品の安全性が等しいのであれば、捨て紙に対する安全性で評価が高いクロレッツの方が総合的に有利だ。<br />\rと言うことはクロレッツの方が安全だと言い切れるか？<br />\r<br />\r(*゜o゜)/チョットマッター!!</p>','キシリトールガムはボトルの中に封入されている。他方クロレッツはボトルの外に収納されている。<br />\rよく考えてみよう！堅いプラスチックボトルの中にならば、何者かによって混入される危険性は低い。しかし、ボトルの外に張り付けて上から上ラベルで止めてあるだけのクロレッツは、注射器で無色透明の毒物でも混入されてもわからない可能性が大きい。<br />\rしかも上ラベルの上から捨て紙がのぞける構造になっている。これは危険だ。<br />\r<a href=\"http://ja.wikipedia.org/wiki/%E3%83%9E%E3%82%A4%E3%83%88%E3%83%88%E3%82%AD%E3%82%B7%E3%83%B3\">マイトトキシン</a>を水に溶かして一滴垂らしても乾いてしまえばわからないかもしれない。その紙でガムを捨てる際に唇と接触したら...<br />\rなめるわけではないから、そう簡単に致死量の毒物を摂取できるとは思いがたいが、危険な要素であることは間違いない。<br />\r<br />\r安全性を考えて開発してるのかな？',1,14380,1,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.jnishida.com/blog/archives/2005/07/xylitol_gum.htm\">食品に安全なロッテキシリトール・ガム</a>\n<a href=\"http://ja.wikipedia.org/wiki/%E3%83%9E%E3%82%A4%E3%83%88%E3%83%88%E3%82%AD%E3%82%B7%E3%83%B3\">マイトトキシン</a>',0,1,1,0,0,'1999-11-30 00:00:36','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060330_police',3,0,'2006-03-30 21:24:52','警察には道路交通法は通用しない？',null,'<p>今日、通勤に使ってるとおりにあるトンカツ屋に何か入ったようです。</p>\r<p>警察が来ていたのですが、トンカツ屋まではミニパトで来たようです。<br />\rしかし、トンカツ屋のあるとおりのど真ん中に止めてありました。トンカツ屋の向かいにある平和堂から出てきたところでそのミニパトを見つけたのですが、警察官が数人いるにもかかわらず、口から漏れてしまいました。<br />\r「ど真ん中にくるまとめてモラルはないんか！」<br />\r取り締まる立場の警察官がこれでは日本の世の中が良くならないのもうなずけます。<br />\rところで、警察官であっても現行犯なので全員その場で逮捕できるのですが、最寄りの警察署に引き渡さなければなりません。ということは身内に引き渡すようなものなので、何の裁きもないでしょう。</p>\r<p>交番まで数分なのですから歩いてくれば？、もしくはひとり車を交番に止めに戻れば？と思うのはくろねこだけでしょうか？</p>','',1,2736,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:20','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060330',3,0,'2006-03-31 22:41:38','新マップ観光(Lv.65)',null,'<p>今週水曜日に出来た新マップに観光に出かけました。</p>\r<p>水曜日にも行こうとしたのですが、途中で浮いてしまいました。<br />\r今日は慎重に行こうとしたら、途中でゆうまさんを発見。サポートを頼もうとお声を掛けたのですが、そのときにはときすでに遅し...</p>\r<p>と思いきや、帰ってきてくださって観光の先頭を切ってくれることになりました。<br />\rゆうまさんすごくレベルが高く、もうすぐレベル100になると言うこともあり、ほとんどすべての敵が一撃でした。(たまに一マス残るぐらい)<br />\r新マップの最後までゆうまさんの足が速いので、ついてくのがやっとな感じの観光になりました。<br />\r新マップ最終地点到達記念 SS<br />\r<img height=\"375\" alt=\"エムピオンの森\" width=\"500\" src=\"http://blog.blackcatlab.com/images/xo/xo060330_1.jpg\" /></p>','',1,2251,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:46','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060401',3,0,'2006-04-01 09:23:47','ときめきメモリアルオンラインを始めました',null,'<p>ときめきメモリアルオンラインを始めました。</p>\r<p>どうしてかというと&beta;テスタをしていたので、無料レジストレーションコードがもらえたからなのです。<br />\r正式版は&beta;のときよりも簡単になっているようです。しばらく、ゼネピックはお休みのようです。</p>','',1,2673,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:55','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060402',3,0,'2006-04-02 22:29:48','針縫先生と対決',null,'<p>ときメモリアルオンライン初めて二日目となりました。</p>\r<p>&beta;のときには部活で先生と戦うことが出来なかったのですが、正式になってから簡単になったのか、&beta;からの引き継ぎがあったからなのか、先生と戦うことが出来るようになりました。</p>\r<p>しかしときめきメモリアルオンライン、KONAMI さんの規制が厳しくファンサイトにならないと画像は一切使えず、文章なども一切厳禁ですので、書くことが限られてつらいです...</p>','',1,2757,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:42','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060402',3,0,'2006-04-02 23:53:44','グミ嫌いさんが海外に(Lv.65)',null,'<p>グミ嫌いさんが海外に行くので記念撮影会そのあとは冒険に...<br />\r<img height=\"300\" alt=\"グミちゃん行ってらっしゃい！\" width=\"300\" src=\"http://blog.blackcatlab.com/images/xo/xo060402_1.jpg\" /></p>\r<p>ということで、行き先を相談した結果ガバルツに行くことになりました</p>','途中、メンバが遅れたり、落ちたり、迷子になったりしましたが、角の角まで探し回った甲斐があったのか、ビスカーと出会いました。<br />\r最初に発見したのはくろねこだったと思うのですが、二人がビスカーを発見して目の前の敵を放って突っ込んでしまいました。<br />\rんー、ビスカーはチャームの魔法でも使うのでしょうか？人も少ないので取られないと思ったんですけどね。<br />\r<img height=\"500\" alt=\"まだ雑',1,4091,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:14','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060404_componential_analysis',3,0,'2006-04-04 23:52:51','成分分析',null,'ハイドリアンさんのブログで「<a href=\"http://hyderian.blog41.fc2.com/blog-entry-356.html\">成分分析</a>」というのが書かれていて、楽しそうなのでくろねこもやってみました。<br />\r使用したのはこちらの<a href=\"http://tekipaki.jp/~clock/software/\">成分解析 Ver0.1A</a>です。 <br />\rくろねこのゼネピックでのキャラクタ名は「★くろねこ★」ですので、これを成分分析してみたいと思います。<br />\r<blockquote>★くろねこ★の成分解析結果 : <br />\r<br />\r★くろねこ★の87%は夢で出来ています。<br />\r★くろねこ★の8%は黒インクで出来ています。<br />\r★くろねこ★の3%は魂の炎で出来ています。<br />\r★くろねこ★の2%は下心で出来ています。<br />\r</blockquote><br />\rそっか～、くろねこの87%は夢で出来ているんですね...黒インクって普通のしろねこを黒インクで塗りつぶしたのでしょうか？何か嘘くせ～<br />\r87%の夢、やはり四次転職することでしょうか？しかし、当面の目標は二次転職です。','',1,2971,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://hyderian.blog41.fc2.com/blog-entry-356.html\">成分分析</a>\n<a href=\"http://tekipaki.jp/~clock/software/\">成分解析 Ver0.1A</a>',0,1,1,0,0,'1999-11-30 00:00:18','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_ora0001',3,0,'2006-04-05 10:16:27','[Oracle] 記憶領域(非SYSTEM表領域)のデータ・ファイルの移動','','<p><a href=\"http://jibun.atmarkit.co.jp/lskill01/rensai/omsdb04/omsdb01.html\">ORACLE MASTER Silver DBAポイント解説（4）</a>で表領域の取り扱いについて解説されていたのですが、環境が XE だからかうまく動かなかったのでうまくいった方法をご紹介します。<br />\rALTER TABLE SPACE文を使用して移動する場合の手順は以下のとおりです。</p>\r<ol>\r    <li>移動する表領域をオフラインにする。<br />\r    <pre class=\"brush: sql;\">\rALTER TABLESPACE users OFFLINE;</pre>\r    </li>\r    <li>OSコマンドを利用してファイルを移動またはコピーする。</li>\r    <li>移動先を指定する。<br />\r    <pre class=\"brush: sql;\">\rALTER DATABASE\rRENAME FILE \'C:ORACLEXEORADATAXEUSERS.DBF\'\rTO \'D:ORADATAXEUSERS.DBF\'</pre>\r    </li>\r    <li>表領域をオンラインにする。<br />\r    <pre class=\"brush: sql;\">\rALTER TABLESPACE users ONLINE; </pre>\r    </li>\r    <li>必要に応じてOSコマンドを使用して元ファイルを削除する。</li>\r</ol>','<p>※システム領域の移動の際には、以下の手順でできるようです。</p>\r<ol>\r    <li>インスタンスを停止する。<br />\r    <pre class=\"brush: sql;\">\rSHUTDOWN IMMEDIATE; </pre>\r    </li>\r    <li>OSコマンドを利用してファイルを移動する。</li>\r    <li>データベースをマウントする。<br />\r    <pre class=\"brush: sql;\">\rSTARTUP MOUNT;</pre>\r    </li>\r    <li>移動先を指定する。\r    <pre class=\"brush: sql;\">\rALTER DATABAS\rRENAME FILE \'C:ORACLEXEORADATAXESYSTEM.DBF\'\rTO \'D:ORADATAXESYSTEM.DBF\'</pre>\r    非システム領域のときと合わせて見てみると、(3)と(4)の操作が逆のような気がします。</li>\r</ol>',1,7216,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://jibun.atmarkit.co.jp/lskill01/rensai/omsdb04/omsdb01.html\">ORACLE MASTER Silver DB...</a>',0,1,0,0,0,'2010-11-03 01:13:30','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060405_oracle_10g_xe',3,0,'2006-04-05 19:24:15','Oracle 10g XE インストール',null,'<p>インストール自体は非常に簡単。ダウンロードしてきた実行形式ファイルを実行し、利用許諾に同意しその後はパスワードを入力するぐらい。<br />\rインストール後、管理画面がWEBで起動する。ここでふとわからなくなったが、ユーザ名って何？<br />\rパスワードは指定したけど、ユーザ名は入れてないよね？インストール時にユーザ名が書いてあったのだろうが、全然見ていなかったので困り果ててしまった。オラクルのマニュアルを参照すると記載されていて、最初の管理用のユーザアカウント名は<strong>sys</strong>だった。</p>','<p>次に困ったのが、記憶領域はどこで作るの？<br />\rデータベースはCドライブにインストールしたのだが、これから使うデータの記憶領域はDドライブにしたい。<br />\rオラクルはまずユーザを作るところから始まるようなので(ユーザの取り扱いがMS SQLとは違うな)、ここと記憶領域を参照するもそれっぽいメニューが見あたらない。</p>\r<p>SQLで移動させることにした。TEABLESPACEの移動は「＠IT」の記事と「Oracleの使い方」を参考にした。<br />\r(＠ITの記事SQL間違ってる...)何度もファイル名が違うと怒られながらSQLを試し続けたら、いつの間にかエラーメッセージが変わって、ファイルがありませんに変わったので、管理＞記憶領域＞データファイルを見てみると...いつの間にか移動していた。(●⌒&nabla;⌒●) わーい<br />\rでも、SQLを発行するときに新たな疑問が発生したのだが、その内容はまた後で...</p>\r<p>次は、ユーザを作ることにした。ユーザは管理画面に「データベース・ユーザー」と言うボタンがあるので、その機能を使って作ることにした。ここは、何も悩むとところが無く簡単だった。</p>\r<p>その後、さっきも書いた疑問点を解決しようと、作業場のオラクルの達人に相談に伺ったのだが、まだ解決していない。その問題点とは、「他のツールからデータベースを参照出来るのか？」ということなのだが。</p>\r接続文字列はわかったのだが、なぜかTNSPINGがタイムアウトする。NETSTATでネットワークの状況を確認すると、パケットが飛んできてないみたい...\r<p>&nbsp;</p>\r<p>解決するのはもうちょっと先になりそう、解決したらまた書き込みすることにする。</p>\r<p class=\"add\">2006/04/06 追記<br />\rインストール後、&quot;C:oraclexeapporacleproduct10.2.0serverNETWORKADMINtnsnames.ora&quot;内に自動的に作成された&quot;XE&quot;の設定を利用して、サーバ自体から TNSPING したら無事通信できることは確認済み。<br />\rしかし、tnsnames.ora いつもと場所が違う...<br />\r<br />\rあと、ユーザ名でわかったことが...&quot;sys&quot;でログインしていたのだが、&quot;system&quot;でもログインできるのだね。しかも同じ初期パスワードなので、シノニム？＞ちゃうちゃう。<br />\r「SQLコマンドラインの実行」で&quot;sys&quot;で接続を試してみると、sys ではなく &quot;SYSDBA&quot;もしくは、&quot;SYSOPER&quot;を使えと怒られてしまった。しかし、無視して&quot;system&quot;で接続すると繋がる。どれが正しいユーザ名なのか全くわからない。(￣(エ)￣)ゞ クマッタナークマッタナー</p>',1,15250,0,0,'0000-00-00 00:00:00',1,'',0,1,1,0,0,'1999-11-30 00:00:15','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060406_intel_macwindow',3,0,'2006-04-06 23:11:41','Intel MacでWindows XPが利用可能に',null,'<p>CNET Japanより「Intel MacでWindows XPが利用可能に--アップル、「Boot Camp」を公開」という記事が公開された。</p>\r<p>Macユーザの間では、Intel CoreブランドのiMacが発売されてから、Windowsを動かすためのハックが行われていたようだが、今回のアップルからのツールの登場は、コアなマックユーザ用？</p>\r<p>しかし、Windowsユーザから見ると今更マックでWindowsを動かすことにどれほどの意義があるのだろうか？MacユーザがWindowsを動かせることのメリットは大きいかもしれない。しかし、MacでWindowsが動かせるようになったからと言って、Windows PCの代わりにMacを買う人間はほとんどいないだろう。</p>','<p>Mac上でしか動かなかったソフトウェアがWindowsに移植され、そして新しいバージョンはWindowsからリリースという会社が増えてもうずいぶんと立つ。Macを選択する理由が見あたらない。<br />\rデザインを重視するVAIOユーザみたいなものにしかくろねこの眼には映らない。<br />\rくろねこはVAIOがかなり嫌いである。というのもブランド代なのか、同スペックのPCと比較するとおおむね高め、しかも製品のできはいまいち、いまいちさは同一ブランド内の製品間でも接続できないものがあるといった具合。さらにだめ押しは、サポートの頼りなさとやる気のなさである。ほとんど外品で組み立てしかしていないので、自社にスキルがなのであろう。</p>\r<p>おっと、話題がずれたが、Macユーザは研究室やイラスト関係の業界などで多かった。Macはそういうところで使われるのかもしれないが、Microsoftの独禁法予防で活かされている様にしか見えない。</p>\r<p>アップル自体はiPodなどの商品を市場に送り出す能力を持っているようだが、Macと同様シェアは他社に食われるのが落ちのようだ。</p>',1,4784,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060407_oracle_10g_xe',3,0,'2006-04-07 16:59:46','Oracle 10g XE インストール。再インストール？',null,'<p>繋がった。繋がらなかった原因は、Windowsファイアウォールだった。(<a href=\"http://www.blackcat.xyz/article.php/060405_oracle_10g_xe\">前回のトラブル内容</a>)<br />\r原因が分かったのでコントロールパネル！Windowsファイアウォールで例外ポートを指定する。例外ポートはTCP1521。</p>','<p>今度はデータベースのデータを移行しようとがんばってみる。<br />\rとあるサーバからデータを頂いてくることにする。とあるサーバはLinux上で動いている。<br />\rここですでにExportされたデータを、新しいマイデータベースサーバに頂くという寸法。<br />\rこのデータを頂こうとすると、なぜかいろいろエラーがでる。IMPでデータをIMPORTしようとすると、エラーが表示される。</p>\r<pre>imp.exe USER/PASS FROMUSER=USER FILE=&#092;*********.dmp tables=*** TOUSER=USER IGNORE=Y</pre>\r<blockquote>IMP-00058: Oracleエラー 12560が発生しました。<br />\rORA-12560: TNS：プロトコル・アダプタ・エラー<br />\rIMP-00000: エラーが発生したためインポートを終了します。 </blockquote>\r<p>接続先を指定していないので、仕方が無いのか...<br />\rIMP HELP=Y でコマンドの内容を見てみる。しかし、接続先の指定方法はない。<br />\r苦し紛れに ユーザ/パスワード の部分を ユーザ/パスワード@接続文字列 に変更してみる。<br />\rすると、エラーメッセージが変わった。一歩進んだようだ。<br />\r次のエラーは、このような感じだった。</p>\r<pre>imp.exe USER/PASS/hoge FROMUSER=USER FILE=&#092;*********.dmp tables=*** TOUSER=USER IGNORE=Y</pre>\r<blockquote>IMP-00067: サーバのキャラクタ・セットのハンドルを変換できません。<br />\rIMP-00000: エラーが発生したためインポートを終了します。 </blockquote>\r<p>バージョンが違うダンプファイルは取り込み不可なんでしょうか？<br />\rで、ネットをぐぐってみる...<a href=\"http://www.oracle.co.jp/2shin/ora80/18_19.html\">オラクル通信:お知恵を拝借！ OTN-JフォーラムのQ&amp;Aから</a>で旧バージョンをdmpファイルを新バージョンに取り込むのは問題が無いという。<br />\rIMPのバージョンが問題かなとOracle10のクライアントCDを探す。CD管理者に尋ねた際に、必要な原因を話してると、キャラクタセットが異なるからと言う話で、Oracleの設定を確認してみる。<br />\r（くろねこは、dmpファイルもdatabaseもSJISだと思っていた。管理者は、dmpファイルはEUCで、databaseはSJISだと思っていた。）<br />\r確認してみると、意外なことがわかった。dmpファイルはSJIS。データベースがUTF-8だったのです。<br />\rヾ(・・;)ォィォィ スキーマ(=ユーザ)から作り直しかよ...<br />\rちなみにキャラクタセットは、管理｜データベースのバージョン情報｜各国語サポートでNLS_CHARACTERSETの値を見るとわかります。<br />\rコマンドの場合は、以下で調べることが出来ます。</p>\r<pre>SELECT * FROM nls_database_parameters WHERE parameter = \'NLS_CHARACTERSET\'</pre>\r<br />\rここで、OracleだからSQLで変更できるだろうと、下記のようにやってみる。\r<p>&nbsp;</p>\r<pre>update nls_database_parameters SET VALUE=\'JA16SJIS\' WHERE parameter = \'NLS_CHARACTERSET\'</pre>\r<p>下記のように表示されてうまくいかなかった。</p>\r<blockquote>ORA-01733: ここでは仮想配列は使用できません。</blockquote>\r<p>この前の記憶領域のコマンドもあやふやなので、もう一度再インストールしようかなとも思ったんですが...<br />\rインストール時にキャラクタセットを指定できるところがなかった。OTZ</p>\r<p>今日はこの辺で...</p>',1,31165,0,0,'0000-00-00 00:00:00',0,'<a href=\"http://www.blackcat.xyz/article.php/060405_oracle_10g_xe\">前回のトラブル内容</a>\n<a href=\"http://www.oracle.co.jp/2shin/ora80/18_19.html\">オラクル通信:お',0,1,1,0,0,'1999-11-30 00:00:10','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060408',3,0,'2006-04-08 22:21:47','フレンドがナイトに(Lv.65)',null,'<p>本日、フレンドのひとりがナイトに転職しました。<br />\rナイト転職、オメデトバズーカ砲発射!! &sub;(;^^)コ ~~~ю*(/&amp;gt;.&amp;lt;)/ ドッカーン</p>\r<p>くろねこもがんばらないといけないな～と思いつつ、先月末からときメモを始めて...<br />\r来週からウルティマオンラインを 1ヶ月復活させる予定です。</p>\r<p>ナイトに転職できるのはいつになることやら...ちょっとがんばって明日もあるし経験値2.5倍でも買いますかぁ</p>','',1,2675,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:20','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060409_wife_play_tmo',3,0,'2006-04-09 16:30:33','嫁にときメモをさせてみる',null,'<p>くろねこは、今ときメモとゼネピをやっているが、今週からウルティマも復活するので手が回らない。</p>\r<p>そこで、嫁にさせてみることにした。息子もときメモが大好きだ。(ひよことかたこさんウィンナーに反応してる)<br />\rまず、はじめたは良いが操作方法を読んでないので、操作方法がわからんと叫ばれる！<br />\r仕方がないので、適当に簡単な操作方法を教える。(くろねこは雰囲気で覚えた。あとは周りに聞く！)<br />\r操作方法がわかったところで、なにやらプレイを始めたが文字を打つのに手間取っているようだ。<br />\r他人との会話についていけないらしい。<br />\rその後も、なにやら詰まるたびに聞かれるが、何とかお昼過ぎには一段落した。</p>','<p>しかし、良いこともあった。<br />\r一時間に四回、15分おきに授業があって、授業の間ひっきりなしに問題が飛んでくることや、対戦中は途中で席を立つと負けてしまうことから、「ご飯」と呼ばれてもすぐにいけない理由を理解してくれたようだ。<br />\r一つレベルアップだ。今日のご飯は直前でなく、少し前に声を掛けてくれるだろう。</p>',1,2882,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:20','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060410',3,0,'2006-04-10 03:35:00','ベイクク～クロック討伐(Lv.65)',null,'<p>くろねこは経験値2.5倍1Dを購入して、66へのレベルアップに挑戦中。</p>\r<p>そのころkouさんは、ベイククを討伐3回目が終わり、4回目に挑戦しようかと言う状況。<br />\r前回のベイククは&quot;ファイター71の盾&quot;がドロップ品だったようです。その前は、ハンター＆MPK共に全滅で、ドロップ品はもしかしたらネズミが持ってるかも...と言う状況だったのですが、カリンザと骸骨が多すぎて突入不可能だったらしいです。</p>\r<p>日付が変わる頃、レベル66が目の前に...<br />\rくろねこもベイククが見たいので、PTメンバをベイククに誘う。どうやら他のメンバは図書館に行きたいらしい。と言うことでベイククに行ってから図書館に行くことに！</p>\r<p>くろねこは、火薬庫へ...<br />\rちょうど、みんな集まってくれてベイククの時間になったので、ボス部屋に入るとRYURYUさん浮いてる...<br />\rと思ったら、骸骨の群が～。<br />\r戦ったら、反撃むなしく5秒で浮いちゃいました。よく見ると骸骨の群の先頭にちゃーちゃんが、やつの仕業か...もっと強くならなくては...とここで-3%</p>\r<p>その場で復活できないので、一旦街に帰ります。体力回復を待ってたらメンバから、ベイクク登場＆ベイクク討伐成功のお知らせが！くろねこも、ベイクク見たかった。<br />\rどうやら、ベイククはSAMさんの一撃で死んだらしいです。</p>\r<p><img width=\"300\" height=\"300\" src=\"http://www.blackcat.xyz/images/articles/xo060410_1.jpg\" alt=\"\"><br />\r仕方が無いので図書館入り口に向かう、くろねこ。<br />\rエスネの街の真ん中ではクレ軍団が一列に並んで何かのイベントの最中。<br />\rだんだん人が集まってきて、どんどん重たくなる～。。。<br />\r何のイベントなのでしょうか？<br />\r<br clear=\"all\" />\r重いので、おいといて図書館の中へ。図書館の中でレベルアップすることを期待しつつ、集まったメンバについていく。<br />\r(このとき、図書館に行く目的がクロック討伐だとは知らなかったくろねこ...)</p>','<p>どんどん奥へ...奥へと進みます...<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_2_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_2.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_3_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_3.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_4_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_4.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_5_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_5.jpg\" alt=\"\"></a></p>\r<p>どんどん経験値がたまるが、アイテムの使用期限が後約2%と言うところで切れちゃう。ﾟﾟ(&acute;O｀)&deg;ﾟ ｳﾜｰﾝ!! <br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_6_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_6.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_7_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_7.jpg\" alt=\"\"></a></p>\r<p>今日は無理かとつぶやいたら、メンバみんなが、大丈夫と言ってくれる。&nbsp;<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_8_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_8.jpg\" alt=\"\"></a></p>\r<p>書庫に到着。</p>\r<p>ついたとき書庫では、クロック討伐の最中だったらしくすごく重かった。くろねこが見たときにはほとんど終わり...メンバがその一行にに聞くまでクロックだとわかってなかった。。</p>\r<p>くろねこの一行も「ザ・クロック」に遭遇。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_9_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_9.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_10_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_10.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_11_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_11.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_12_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_12.jpg\" alt=\"\"></a><br />\rあっという間に昇天！クロック意外に弱いなと思わせたこの一戦、実はこの後の悪夢への伏線だったのか？</p>\r<p>この後、クロック討伐で疲れたメンバは休憩へ... 休憩の最中にHideさん、SAMさん、ヴィリアスさんの元気回復剤、みあるのパン[壁]_・)ﾁﾗｯショー (当サイト、アダルト禁止のホスティングサーバなので掲載できません。悪しからずご了承下さい。)</p>\r<p>この後もクロックを探す。レベルアップまであと0.99%!!</p>\r<p>クロック見つけた。このクロックさっきのと違ってめちゃ強い!!!＜別物？<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_13_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_13.jpg\" alt=\"\"></a><br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_14_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_14.jpg\" alt=\"\"></a><br />\rくろねこ浮きまくり...ジュレア(100%)で復活して、ライフガード装備するまでの間に死んじゃったりして、結局このクロックだけで-19%経験値が80.2%に &Sigma;(Ｔ▽Ｔ;) ぐわわぁぁ～ん!</p>\r<p>結局、全滅しちゃいました。<br />\r<a href=\"http://www.blackcat.xyz/images/articles/xo060410_15_original.jpg\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"400\" src=\"http://www.blackcat.xyz/images/articles/xo060410_15.jpg\" alt=\"\"></a></p>',1,2549,0,0,'2006-05-10 03:35:00',0,'<a href=\"http://www.blackcat.xyz/images/articles/xo060410_2_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_3_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_4_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_5_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_6_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_7_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_8_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_9_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_10_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_11_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_12_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_13_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_14_original.jpg\">http://www.blackcatlab....</a>\n<a href=\"http://www.blackcat.xyz/images/articles/xo060410_15_original.jpg\">http://www.blackcatlab....</a>',0,1,1,0,0,'2009-12-06 19:46:40','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060410_openofficeorg_b',3,0,'2006-04-10 17:27:20','OpenOffice.org Base 使えなかった',null,'Oracle のデータを CSV にしてみたくてただそれだけの理由で導入してみました、OpenOffice.org Base。<br />\r<br />\rすでに MS-Access 2003 は導入されてるのだが、Access が使えないタイプのテーブルなので、他のツールをと言うのが Base を選択した理由だ。<br />','すでに存在するデータベースに接続するので、最初の画面で&quot;既存のデータベースに接続&quot;を選択する。相手がOracleなので、順当なADOで選択することにする。ドライバは、Microsoft提供のものとOracle提供のものとがあるが、Oracle提供のものを選ぶことにする。<br />\rデータソースのURLを聞いてくるので、&quot;ブラウズ&quot;ボタンを押して、ウィザードに従い接続文字列を作成する。(ちゃんと接続テストもする)<br />\r完了したら、データベースの定義を保存しておく。拡張子はodbになった。<br />\r<br />\rテーブルボタンを押して、テーブル一覧を表示する。Accessの様にいちいち各テーブルごとに取り込むテーブルとキー項目を指定する手間がないのはうれしいが、システム関係のテーブルまで表示されるのが不快だ。<br />\rここで問題のテーブルを開く。すると214万件ほどレコードが存在するのだが、最初に表示されたのが47件、したにずりずりスクロールバーを下げると94件で止まってしまった。<br />\r<br />\rOpenOffice.orgの問題かとも思ったが、ADOドライバの可能性を捨てきれずDelphiで同じドライバを使ってデータ表示プログラムを作成する。Delphiの特徴として設計画面でも実行時と同じデータが参照できるのだが、データを絞っていなかったせいもありBaseとは対照的にデータを読み込むのに結構待たされた。では、「テーブル」ではなく、「クエリ」ではどう表示されるかと、シンプルなSELECT文を作って発行したが状況は変わらなかった。<br />\r<br />\rデータ件数は少ないまでもCSVに出力するテストをと思い、一覧でテーブルを選択 ファイル|名前を付けて保存 を実行。ダイアログを表示したが、出力形式として選択できたファイルの種類は&quot;OpenDocumentデータベース&quot;のみ。<br />\r期待していただけにがっかりだ。Baseのこの出来を見ている限り、Sunも何に無駄な投資をしているんだろうと考えてしまった。<br />\r<br />\rWriteやCalcは使うユーザも多いだろうから、もうちょっとまともなのであろうか？<br />\r※ Accessが取り扱えないデータとは、以下に該当するテーブルである。<br />\r<ol>\r    <li>プライマリインデックス(キー)が無く、フィールドが10以上あるテーブル </li>\r    <li>プライマリインデックスが10以上あるテーブル</li>\r</ol>\rAccessはキーを10個しか取り扱うことができないので、上記のようなデータを表示するとデータがおかしくなる。対策としては、各レコードにユニークなシーケンス番号を与えることだ。',1,6221,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:02','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('ProgramingFAQ_ora0002',3,0,'2006-04-11 09:55:02','[Oracle] SQL*Plus で csv にデータをおとす方法','','<p>Oracle には データを CSV に出力する方法がないので、SQL*Plus を使って出力するか、もしくはサードパーティ製のツールを使う以外ないようです。<br />\r(Oracle Database 10g Express Edition には標準で csv のエクスポート/インポート機能があります。)<br />\r<br />\rGoogle で検索するとすぐにでてくるのですが...<br />\r<br />\r以下のような SQL ファイルを作成して実行します。<br />\r(SQL 文を書かないといけないのがかなりめんどくさい)</p>\r<pre class=\"brush: sql;\">\rSET ECHO OFF\rSET FEEDBACK OFF \rSET HEADING OFF\rSET LINESIZE 10000\rSET PAGESIZE 0\rSET TRIMSPOOL ON\rSET TERMOUT OFF\r\rSPOOL output.csv\r\rSELECT \r\'&quot;\'||col1||\'&quot;,\' \r||\'&quot;\'||col2||\'&quot;,\' \r||\'&quot;\'||col3||\'&quot;,\' \r||\'&quot;\'||col4||\'&quot;,\' \r||\'&quot;\'||TO_CHAR(date1, \'YYYYMMDD\')||\'&quot;\' \rFROM \rtable \r; \r\rSPOOL OFF \rEXIT\r</pre>\r<p>できたら、SQL ファイルを実行します。<br />\r実行方法は</p>\r<pre class=\"brush: sql;\">\rSQL&gt; @hogehoge.sql</pre>\r<p>です。</p>','<dl>\r    <dt>上記の「set」コマンドを説明します。 </dt>\r    <dd>linesize: 1 行の長さを指定します。少し大きめの数字を取っておきましょう。 </dd>\r    <dd>pagesize: 数レコードずつの間のセパレータを無効にする。 </dd>\r    <dd>trimspool: SPOOLファイルの行末のスペースをトリムする。 </dd>\r    <dd>termout: 結果を画面に表示しない。(ただし対話形式では無効) </dd>\r</dl>\r<p>どう考えても外部ツールを使う方が楽です♪<br />\r<a href=\"http://kuronekosoft.ewinds.net/sqlstudio.aspx\">黒猫SQL Studio</a> 等を使うと楽にCSVに落とせます。しかも、フリーですしね。</p>',1,21604,0,0,'1970-01-01 09:00:00',0,'<a href=\"http://kuronekosoft.ewinds.net/sqlstudio.aspx\">黒猫SQL Studio</a>',0,1,0,0,0,'2010-11-03 01:11:49','html',1,1,'','',0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060411_administrator',3,0,'2006-04-11 12:56:54','Administratorのパスワード変えてる？',null,'<p>このブログを読んでいるほとんどがWindowsユーザ、おおむねXPだと思うのだが、Administratorのパスワード定期的に変更してるだろうか？</p>\r<p>AdministratorのパスワードXPになってから変更がとてもめんどくさくなったので、変更してない人も多いと思うのだがどうだろうか？<br />\rとりあえず、元の空のままは危ないので何か設定したほうがよいだろう。できれば定期的に変更する事をおすすめする。</p>\r<p>Windows Vistaからは、アカウントとパスワードの管理からInfoCardと言うものでログオンできるようになるらしい。</p>\r<p>それまでの間、いやそもそもAdministratorのアカウントがインターネットの脅威にさらされることに問題を感じる。家庭に複数台のPCが無ければネットワーク越しに操作することなど無いのだから。<br />\rとすると、Administratorはローカル対話式でのみログオン可能にすると、かなりセキュリティ的に安心な気がする。<br />\r早速、設定してみよう。<br />\r設定するのは、Administratorアカウントにネットワーク経由でコンピュータへアクセスを拒否することだ。<br />\rネットワークから侵入されなければ、たとえパスワードがばれても侵入しにくいに違いない。<br />\rアカウントマネージャが無くなった今、設定はローカルコンピュータポリシーから行う。</p>','<p>ローカルコンピュータポリシーを扱う専用ツールは用意されていないので、MMC(Microsoft Management Consol)を使用する。<br />\r以下の手順で、Administratorでのネットワークからのアクセスを拒否する。</p>\r<ol>\r    <li>ファイル名を指定して実行で、&quot;MMC&quot;と入力しOKをクリックする</li>\r    <li>ファイル|スナップインの追加と削除 で「スナップインの追加と削除」ダイアログを表示する(※1)</li>\r    <li>「追加」ボタンをクリックし、「スタンドアロン スナップインの追加」ダイアログ中の利用できるスナップインの一覧から、「グループポリシー」(※2)を選択し追加する(管理するコンピュータはローカルコンピュータ)</li>\r    <li>追加したら、順番に「閉じる」、「OK」でMMCに戻る(追加された「グループポリシー」は、「ローカルコンピュータポリシー」と表示される)</li>\r    <li>順番にローカルコンピュータポリシーを展開する<br />\r    ローカルコンピュータポリシー＞コンピュータの構成＞Windows の設定＞セキュリティの設定＞ローカルポリシー＞ユーザの権利の設定<br />\r    <a href=\"http://www.blackcat.xyz/images/articles/060411_administrator_1_original.png\" title=\"元のサイズの画像を表示\"><img width=\"400\" height=\"314\" src=\"http://www.blackcat.xyz/images/articles/060411_administrator_1.png\" alt=\"\"></a></li>\r    <li>&quot;ネットワーク経由でコンピュータへのアクセスを拒否する&quot;のプロパティに、Administratorを追加する</li>\r</ol>\r<p>以上で設定できる。他にPCを持っていなければ、Administratorsも追加しても良いかもしれない。<br />\r「バッチジョブとしてログオンを拒否する」も設定するとトロイの木馬からの攻撃にも強くなりそうだが、今度は必要なプログラムも動かなくなりそうなのでこれはやめておいた方が無難だろう。<br />\r<br />\r※1 MMCはいろいろな機能を使うためのベースでしかないので、このツール自体にはポリシーを設定する機能はない。このため、ポリシーを扱うスナップインの追加を行う。<br />\r※2 名前は若干異なる場合があるので注意。</p>',1,5816,9,0,'2006-05-11 12:56:54',0,'<a href=\"http://www.blackcat.xyz/images/articles/060411_administrator_1_original.png\">http://www.blackcatlab....</a>',0,1,1,0,0,'2009-11-18 23:31:36','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060412',3,0,'2006-04-12 01:08:18','何度もリログすいません(Lv.65)',null,'<p>今日は回線の調子がすごく悪いみたい。</p>\r<p>PTメンバでフレンドのリシェさんから、「くろねこさん何度もリログしてる」といわれ、「ずっと座ってただけだよ」と言っていたのだが、今日は何か重くて引っかかる。<br />\rその引っかかってるときにどうやら他人からはリログしているように見えるみたい。</p>','<p>普通のゲームであれば、他人がリログしようが問題ないのだが、ゼネピックは入力システムにバグがあるので、ログオンのお知らせが表示されると非常にむかつく。何とかしてほしいものだ。</p>\r<p>でも、本当に何度かはリログしました。ゲーム中に画面が真っ暗、MAPしか見えないという状況に...<br />\rしばらくしているとスクロールして戻ってくるときもあるのですが、待ってらんない＞＜；<br />\rということでそういうときはリログしています。併せて何とかしてほしいものです。</p>\r<p>でも、回線が遅いのはプロバイダのぷららのせい？</p>',1,2585,2,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:12','html',1,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('tmo060413',3,0,'2006-04-13 00:17:54','せっせと授業の問題集を作る',null,'<p>今まで集めた授業のSSを元に授業の問題集を作り始めました。</p>\r<p>作り始めたら結構しんどい。<br />\rでも作っても公開できないのがつらいですね。公開するには公式ファンサイトにならないとダメなので...</p>\r<p>まあ、使うのは自分ひとりかもしれないですけど、がんばって作ります。</p>','',1,2435,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:41','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060414_screenshot',3,0,'2006-04-14 00:55:02','ウィンドウが大きくならない',null,'<p>おとといのことだが、パソコンの画面を保存するのにツールを入れて、ファンクションキー一発でアクティブウィンドウのスクリーンショットがとれるようにした。<br />\rメモ代わりに使えるのでなかなか便利だ。<br />\rこれの出力先を共有ドキュメントフォルダのサブディレクトリに設定したので、他のPCから参照するのも容易だ。<br />\r(うちの共有ドキュメントフォルダは、共有ディレクトリに設定されている。)<br />\rパソコン操作に困ったときでも、画面を内容を保存しておくことで後で対処できる機会も増えるだろう。</p>','<p>設定後、嫁に操作方法を教える。といっても押すキーを教えるだけなのだが...<br />\r確認のために共有ドキュメントフォルダを開き、画像を確認する。正常に動作している。<br />\rなにやら嫁がまた訳のわからん事を言いだした。</p>\r<p>「これ大きくならないの？」</p>\r<p>おいおいウィンドウを大きくすればいいだろうが...</p>\r<p>「ウィンドウを大きくしたら、大きくなるやろ！」</p>\r<p>タイトルバーをクリックして大きくしようとする嫁。</p>\r<p>「大きくならへんで！」</p>\r<p>(ﾟ&nabla;ﾟ ;)ｴｯ!? それは画像のタイトルバー ヾ(・・;)ｫｨｫｨ</p>\r<p>これだから、初心者っていうのは...</p>',1,4092,1,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:20','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060414_comeback_uo',3,0,'2006-04-14 00:58:15','UO復帰',null,'<p>本日からウルティマ復帰、とりあえず30日間クレジットで支払いました。</p>\r<p>KURO、RingoさんMSNあがってないですが、最近いるんですかね...<br />\rKuro@HP を見る限り活動はされているようですが、ギルドハウスに行ってみますか。</p>','',1,4463,5,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:26','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('xo060415',3,0,'2006-04-15 01:24:00','レベル66になりました(Lv.66)',null,'<p>ながーい間上がってませんでしたが、ようやくレベル66になりました。</p>\r\n\r\n<p><img alt=\"くろねこレベル 66 になりました\" src=\"http://blog.blackcatlab.com/images/xo/blackcat65.jpg\" width=\"400\" height=\"430\" /><br />\r\nナイトまで後5レベル もあるのか、しんどい...</p>','<p>レベル65になったとき書き忘れていたのですが、65になったのは 3/31 でした。<br />\r\n<img alt=\"くろねこレベル65になりました\" src=\"http://blog.blackcatlab.com/images/xo/blackcat65.jpg\" width=\"400\" height=\"430\" /><br />\r\nということは、1レベル上げるのに半月もかかったのか...ナイトまで何日？</p>',1,2290,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:19','html',0,1,null,null,0,3,3,3,3,2,2);
INSERT INTO `bc_stories`VALUES ('060416_a_lost_and_found_item',3,0,'2006-04-16 15:19:05','拾得物...',null,'<p>買い物しようと車に乗ってたら、財布を拾いました。</p>\r<p>黒いビトンの財布で、警察署で確認したら、1万500円ほど現金が入っていました。<br />\rあと、クレジットカードとキャッシュカード*2、収入印紙が数枚とレシートが大量に...</p>\r<p>駅前の交番に届けたのですが、あいにく無人で電話したら10分でくるといったのに、15-20分くらいは待ったかと...<br />\r中に免許証も入っていたのですが、電話番号まではわからないんですよね。クレジットカードからも電話番号が照会可能かと思いきや、最近は個人情報保護の観点から簡単には公開してくれないとか...</p>\r<p>警察も信用できる組織でないので、まあ当然かと思いもしましたがなんとまあ住み難い世の中になったもんです。<br />\r教えてくれなくてもいいので、本人に連絡してくれると良いのですが、その辺は警察任せで。</p>\r<p>以前、クレジットカードを拾ったときには、クレジットカード会社に直接電話したのですが、そのときには会社の方からカードのロックと本人への連絡をしてくれました。<br />\r警察は、盗品照会はしましたがクレジットカード会社に、連絡はしてない様子でした。<br />\r落とした人が気づいてなかったら、くろねこが拾う前に使われていたらOUTですね。<br />\r(￣０￣;アッ。ねこが連絡しておけばよかったですか...</p>\r<p>忘れていました。;￣ロ￣)!!</p>\r<p>まあ、財布を落としたのに気づいたら警察に連絡してくるでしょう。</p>','<p>警察署内でも50円拾いました。</p>\r<p>電話を掛ける際に、電話ボックスを開けたらそこに入っていたのです。<br />\rこれも、拾得物扱いになりましたが、所有権は放棄しました。<br />\rよく考えたらこっちの方が手にはいる確率は高そうですね。＞大した金額でないですが...</p>\r<p class=\"add\">4/18追記<br />\r本日、落とし主が自宅にお土産付きでお礼に現れました。別に一言だけで良かったのですが...</p>',1,2924,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:25','html',1,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060416_toy_box',3,0,'2006-04-16 16:17:00','おもちゃの缶詰',null,'<p>おもちゃの缶詰『キョロ缶・いちご』が届きました。</p>\r<p>入っているのは？</p>\r<ol>\r<li>キョロちゃん のかたちの絵本</li>\r<li>はさんで！キョロちゃんクリップ</li>\r<li>ぱくぱくキョロちゃんプラモデル</li>\r<li>どこでもチョコボールケース</li>\r<li>ぺたっとキョロちゃんシール</li>\r<li>キョロちゃん色合わせゲーム</li>\r</ol>\r<p>らしいが、シールは入ってなかった...何でー？</p>','<p class=\"add\">04/17 追記<br />\rチョコボールケースにチョコボールを入れたら、見事に息子に全部食われた。</p>',1,3603,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:15','html',0,1,null,null,0,3,3,3,2,2,2);
INSERT INTO `bc_stories`VALUES ('060416_saw_the_cherry_blossoms',3,0,'2006-04-16 16:17:04','天気が良い...お花見？',null,'<p>天気予報は雨だというのに、朝からぽかぽかいい気分。</p>\r<p>雨だと聞いていたので、朝からゼネピックの経験値アップ2.0倍1D買って、レベル上げしようと思ったのに、出鼻をくじかれた。それでも午前中に10%稼いだ。</p>\r<p>お昼を外食で済ませて、お買い物をして天気が良いからお花見に行こうと思ったら、雲が...<br />\rどんどん曇ってきて、気温もだんだん下がって肌寒くなってきたと思ったら...<br />\r雨降ってきました。(/□≦、)エーン!!</p>\r<p>おやつも買ったのに...残念です。</p>','',1,2853,0,0,'0000-00-00 00:00:00',0,'',0,1,1,0,0,'1999-11-30 00:00:16','html',1,1,null,null,0,3,3,3,2,2,2);
