名前 題名 ▼ Syakeさん > おかしくなるはずやん。 > > > //============================================================// > > // OnDataHintを用いた描画処理 > > //============================================================// > > procedure TForm1.ListViewDataHint(Sender: TObject; StartIndex, EndIndex: Integer); > > ・・・・・ > > for i := StartIndex to EndIndex - 1 do > → for i := StartIndex to EndIndex do > 自動補完機能のせいにしとこ (^_^;) > > いや〜素晴らしいです。 > ListViewなるものを始めて使いましたが、お陰様で大変勉強になりました。 > さてさて、本プログラムの書き直し作業に入ります。 > > やはり、もつべきは「X-Ray」さんです。 > GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link