~katsuhiko メッセージボード

back 1751-1800

1801-1850

1851-1900


1850 ADSL前夜 コメント数:  3件
  本田勝彦  | 2001/11/29 (木) 00:12
今は開通予定日の11月29日になったばかりなのだが、当然ながらまだ繋がらない。
明日の夜までお預けぢゃ。待ち遠しいぞ。



1849 Re^5: インデント コメント数:  0件
  本田勝彦  | 2001/11/29 (木) 00:10
> http://jurader.s1.xrea.com/archive/indent.zip
>
> に置いておきます。Delphi6 Personalでテストしていたので、
> Delphi6を使うかDFMをコンバートする必要があります。

げっとしました。これから見せて頂きます。ちょっと時間頂戴ね。



1848 Re^4: インデント コメント数:  1件
  みずほちゃん  | 2001/11/28 (水) 21:41
http://jurader.s1.xrea.com/archive/indent.zip

に置いておきます。Delphi6 Personalでテストしていたので、
Delphi6を使うかDFMをコンバートする必要があります。

Unit1.pasとIndention.pasに
THogeEditor、TIndentionとその継承クラスが定義されています。
TIndentionはインデントの数を計算する抽象クラスで、
その孫クラスが実際にインデント数を求めます。
THogeEditorは得られたインデント数に応じて、
アンインデント・インデント・キャレットの移動を行います。

TIndetionを継承して、TBasicIndetionを作っているのは
TFountainを使うことを考えてのことですが、今は全く意味がありません。

現段階での問題はTIndetionにTEditorと重複するメソッドがあること、
THogeEditorの__indentとGrammaticalIndentが重いこと、
TIndetionのFListのデータ隠蔽が全くされていないことです。

最後に関しては少々考えがありますが、
最初の二つに関してはどうしようか考え中です。



1847 Re^3: 行間? コメント数:  1件
  本田勝彦  | 2001/11/26 (月) 20:33
> ズバリです。
> 0Dがついていました。元が悪いってことなのでしょうか?

良いか悪いかはともかく、どんなソフトで書かれた html なのでしょうね?少なくてもエディタで書いたとは思えないです。

> それと、検索で反転されている場所にCLIPBOARDの内容を挿入する場合
> 前は入れ替わりになっていたんですが今は反転部分の後に挿入されてしまいます。
>
> 前の方がよかったんですがソース壊しちゃったのでしょうか(;_;)

HitStyle が hsSelect になってないとそういう動作になりますね。
Hit 状態を選択状態に変更するためのメソッドがあったような・・・あった(^^;
HitToSelected メソッド呼び出しを SelText 更新処理の前に行って下さい。



1846 Re^3: インデント コメント数:  2件
  本田勝彦  |  2001/11/26 (月) 20:28
> インデントの挙動がおかしかったり、
> タブインデントができなかったり、

こっちのインデントだったのですね。VK_RETURN の方だと思ってました。

> 文法解釈の問題があったりしますが、
> コードを見てみますか?

見して下さい。



1845 Re^2: 行間? コメント数:  2件
  みきお  | 2001/11/26 (月) 02:10
> > こんばんはです
> >
> > またご指導おねがしたいのですが
> >
> > TEDITORでHTMLファイルを読み込むと
> >
> > 何も無い行が1行置きにできてしまうのですがこれは何がげにんなんでしょうか?
>
> こういう具合に改行が余計に入るんですよね?
> そのHTMLファイルをバイナリエディタで開くと $0D, $0A とかが余計に付いているのが見えたりすると思うのですが、どうでしょう?
>
> お勧めバイナリエディタはこちら
> http://www6.airnet.ne.jp/dds2/


ズバリです。
0Dがついていました。元が悪いってことなのでしょうか?

それと、検索で反転されている場所にCLIPBOARDの内容を挿入する場合
前は入れ替わりになっていたんですが今は反転部分の後に挿入されてしまいます。

前の方がよかったんですがソース壊しちゃったのでしょうか(;_;)



1844 Re^2: インデント コメント数:  3件
  みずほちゃん  | 2001/11/26 (月) 00:16
> インデントの枠組みについては、空前絶後です。
> キー入力に対するコマンド実行のシステムが完成すれば、可能になると思います。
今でも jed(http://space.mit.edu/~davis/) の ruby.slをもとにした
作りかけのコードはあります。
TEditor.FList、TEditor.TabbedTopSpace、TEditorEx.ListString
を利用して、インデントのカウントを計算し、
それに応じたインデントをTEditor.SelIndentとTEditor.SelUnIndent
を使って行っています。

インデントの挙動がおかしかったり、
タブインデントができなかったり、
文法解釈の問題があったりしますが、
コードを見てみますか?



1843 てれほーだい コメント数:  4件
  本田勝彦  |  2001/11/26 (月) 00:04
NTT テレホーダイの契約が今日で切れる。
明日からADSLが開通する29日までは、ケチネットぢゃ。



1842 Re^3: 処理落ちについて コメント数:  0件
  本田勝彦  | 2001/11/26 (月) 00:03
> フォントやスタイルが変わらないと抜ける条件をチェックし
> ていないようです。

そうか、そうですね。描かなくても良い場合でも、TokenToFountainColor は実行されると。ロジックを見直してみますね。

アドバイスありがとうございます。



1841 Re: 行間? コメント数:  3件
  本田勝彦  |  2001/11/25 (日) 23:57
> こんばんはです
>
> またご指導おねがしたいのですが
>
> TEDITORでHTMLファイルを読み込むと
>
> 何も無い行が1行置きにできてしまうのですがこれは何がげにんなんでしょうか?

こういう具合に改行が余計に入るんですよね?
そのHTMLファイルをバイナリエディタで開くと $0D, $0A とかが余計に付いているのが見えたりすると思うのですが、どうでしょう?

お勧めバイナリエディタはこちら
http://www6.airnet.ne.jp/dds2/



1840 Re^2: インデント コメント数:  0件
  本田勝彦  |  2001/11/25 (日) 23:52

> TEditorにマージすることは可能ですか?

キー入力に対するコマンド実行のシステムが完成すれば、可能になると思います。



1839 Re: インデント コメント数:  5件
  本田勝彦  |  2001/11/25 (日) 23:52
> TEdtiorで文法をある程度解釈した上でインデント
> するようにさせたいと思っています。
>
> そこで聞きたいのですが、TFountainの時のようにインデントのために
> 何らかの枠組みが用意されることはありますか?
> また、仮にそういうコードがあったとして
> TEditorにマージすることは可能ですか?

インデントの枠組みについては、空前絶後です。
キー入力に対するコマンド実行のシステムが完成すれば、可能になると思います。



1838 Re^2: 処理落ちについて コメント数:  1件
  DR-X   | 2001/11/25 (日) 05:56

>情報ありがとうございます。検討してみたいのですが、抜け
>ない場合の条件についてもアドバイス頂けるとありがたいです。

フォントやスタイルが変わらないと抜ける条件をチェックし
ていないようです。

ただ、ここをかえてもあまり変化はないかもしれません。
画面が最後のほうにあれば、結局最初から最後まで構文解析
することになりますので。

やはり大きいのは、Parser.TokenToFountainColorの処理だと
思います。速そうに見えますが、内部では予約語を調べたり
しているので結構重いです。



1837 行間? コメント数:  4件
  みきお  | 2001/11/25 (日) 05:12
こんばんはです

またご指導おねがしたいのですが

TEDITORでHTMLファイルを読み込むと

何も無い行が1行置きにできてしまうのですがこれは何がげにんなんでしょうか?



1836 インデント コメント数:  6件
  みずほちゃん  | 2001/11/25 (日) 03:32
TEdtiorで文法をある程度解釈した上でインデント
するようにさせたいと思っています。

そこで聞きたいのですが、TFountainの時のようにインデントのために
何らかの枠組みが用意されることはありますか?
また、仮にそういうコードがあったとして
TEditorにマージすることは可能ですか?



1835 Re: 処理落ちについて コメント数:  2件
  本田勝彦  |  2001/11/24 (土) 23:21
> 場所はPaintLineのParser.NextTokenで回っているループで、一
> つは描画範囲を超えたときに抜ける処理が実行されない場合が
> ある点と、もう一つは、Parser.TokenToFountainColorの処理に
> は時間がかかるので、見えているときだけ実行すれば高速になる
> という点です。

情報ありがとうございます。検討してみたいのですが、抜けない場合の条件についてもアドバイス頂けるとありがたいです。



1834 Re^2: EditEditorPropをpublic宣言に コメント数:  0件
  sakazuki   | 2001/11/24 (土) 19:37
 http://homepage2.nifty.com/sakazuki/rde.html
> え?あらスンマセンね^^;お安いご用です。今度ので直します。

ありがとうございます。
よろしくお願いします。



1833 処理落ちについて コメント数:  3件
  DR-X   | 2001/11/24 (土) 14:56
本田さん、こんにちは。DR-X です。

TEditorを使った自作アプリをいろいろ試しているのですが、
一行が2000文字ぐらいのデータを読み込ませると、かなり
重くなってきます。

先頭から構文解析をするのだから、しかたない面もあると思う
のですが、調べてみるとかなり改善できそうなところを見つけ
ましたので報告しておきます。

場所はPaintLineのParser.NextTokenで回っているループで、一
つは描画範囲を超えたときに抜ける処理が実行されない場合が
ある点と、もう一つは、Parser.TokenToFountainColorの処理に
は時間がかかるので、見えているときだけ実行すれば高速になる
という点です。

試しに改造したところ3倍は速くなりました。参考になれば幸い
です。



1832 Re: EditEditorPropをpublic宣言に コメント数:  1件
  本田勝彦  |  2001/11/24 (土) 00:05
> HViewEdt.pasの
> EditEditorProp
> をpublic宣言にしていただけないでしょうか?

え?あらスンマセンね^^;お安いご用です。今度ので直します。




1831 Re^4: 文字のドラックについて質問です コメント数:  0件
  本田勝彦  |  2001/11/24 (土) 00:01
> NIFTYに使い放題プランが出来るとか出来ないとか
> 言っていたのは出来たのかなぁ〜再挑戦してみようかなぁー

私は月2,000円で使い放題ですよ(電話代は別)。
他のプロバイダから inet 経由で使い放題1,200円/月というのもあります。

詳細は http://www.nifty.com/



1830 EditEditorPropをpublic宣言に コメント数:  2件
  sakazuki   | 2001/11/23 (金) 07:46
 http://homepage2.nifty.com/sakazuki/rde.html
こんにちは。sakazukiです。
HViewEdt.pasの
EditEditorProp
をpublic宣言にしていただけないでしょうか?
ヘルプボタンを隠したりするために、継承して使っているのですが、
overrideした
class function Execute(EditorProp: TEditorProp;
Option: TPersistent; ViewFileExt: Boolean): Boolean;
の中で
Result := Form.EditEditorProp(EditorProp, Option);
が呼びたいのです。
ご検討よろしくお願いします。



1829 Re^3: 文字のドラックについて質問です コメント数:  1件
  みきお  | 2001/11/22 (木) 23:32
>Google Toolbarで良いんじゃないですか?
kmさんありがとうござます。Google Toolbarって言うのはたぶんオンラインで無くては
使えない物だと思うんですが、ファイルからHTMLを読み込んで編集して保存と言う物を
作りたく思っていたので・・・・スイマセン(;_;)もう少し探してみます。

NIFTYに使い放題プランが出来るとか出来ないとか
言っていたのは出来たのかなぁ〜再挑戦してみようかなぁー



1828 自己レスです コメント数:  0件
  たかあき  | 2001/11/22 (木) 23:26
あちゃ、間違えて宣言を消してしまっていたようです。
すいません。お騒がせして。(汗汗)



1827 Re^2: BCBでのコンパイルエラー コメント数:  1件
  たかあき  | 2001/11/22 (木) 23:07
ありがとうございます。
インクルードできましたっ!!

それでもう一つ質問なのですが、
次はSpin.hにて
template TTimeBtnState ;
の部分でコンパイルエラーがきてしまいます。
「明示的なインスタンス化には厳密化指定子が必要(たとえば"class foo<int>")」
と出てきてしまいます。

テンプレートとは縁の遠い人生を歩んでいるのでイマイチ・・・(汗)
すいませんが教えてもらえませんでしょうか。



1826 Re^3: 文字のドラックについて質問です コメント数:  0件
  Km   | 2001/11/21 (水) 00:56
> それと、ブラウザー内の文字列をダイアログを使わないで検索したいんですが
> 前方検索で立て続けに検索する方法が判らなくて困っています。
>
> 関係ない事で恐縮ですが、どこか参考になる所あるでしょうか

Google Toolbarで良いんじゃないですか?
これなら複数検索文字列を別々の色でハイライト表示してくれるし、
もちろんページ内の連続検索もできますよ。



1825 Re^3: 文字のドラックについて質問です コメント数:  0件
  本田勝彦  |  2001/11/20 (火) 23:26
> 行ってみたんですが会員じゃ無いのでFAQしか検索できないみたいでした(;_;)

私は FDELPHI を利用したいがために @nifty とプロバイダ契約しています。

> それと、ブラウザー内の文字列をダイアログを使わないで検索したいんですが
> 前方検索で立て続けに検索する方法が判らなくて困っています。

こちらは、残念ながら今の私にはわかりません。



1824 Re: BCBでのコンパイルエラー コメント数:  2件
  KWX   | 2001/11/20 (火) 02:54
 http://homepage2.nifty.com/kwx/
たかあき さん、こんにちは。

> しかし、エディタの設定変更ダイアログを表示させようと思い、
> HVIEWEDT.hppをインクルードし、コンパイルすると
> Spin.hppがオープンできないとエラーが出てきてしまいます。

BCBが生成するヘッダの <Spin.hpp> を全て <Spin.h> に
書き換えれば大丈夫ですよ。

ではでは。



1823 Re^2: 文字のドラックについて質問です コメント数:  4件
  みきお  | 2001/11/20 (火) 00:59
アドバイスありがとうございました。
こんな凄いコンポ作者さんがお勉強してるなんて(^_^;)

行ってみたんですが会員じゃ無いのでFAQしか検索できないみたいでした(;_;)
凄く便利な機能なので余裕が出来ましたら是非宜しくお願いいたします。

それと、ブラウザー内の文字列をダイアログを使わないで検索したいんですが
前方検索で立て続けに検索する方法が判らなくて困っています。

関係ない事で恐縮ですが、どこか参考になる所あるでしょうか



1822 Re: BCBでのコンパイルエラー コメント数:  0件
  本田勝彦  |  2001/11/18 (日) 23:23
> HVIEWEDT.hppをインクルードし、コンパイルすると
> Spin.hppがオープンできないとエラーが出てきてしまいます。

いまだに C++Builder は飼っていないのでわかりません。すいません。
皆さんどうされているんでしょうね。

CSpin.obj とかは何処ぞにありませんか?



1821 Re: 文字のドラックについて質問です コメント数:  5件
  本田勝彦  |  2001/11/18 (日) 23:21
> ブラウザーコンポからマウスの左クリックで文字を持ってくる場合
> richeditには持ってこられるんですがTEDITORに
> 持ってくるにはTEDITOR Crateの設定のselmoveとdmautomaticをtrueにするだけではダメなのでしょうか?

ダメです。OLEDrag&Drop を実装しなければなりません。
nifty:FDELPHI のログを IDragTarget で検索すると、どう書けば動くかという情報はありますが、私自身が何故そう書くと動くのかが理解出来ていない状態で、今 Interface のお勉強中です。

TEditor にデフォで実装されることは無いと思いますが、その内実装例をここで公開したいと思っていますので、少々お待ち下さい。



1820 BCBでのコンパイルエラー コメント数:  4件
  たかあき  | 2001/11/18 (日) 00:42
一つ質問があります。
BCB5でHEdit2.36を使用しようと思い、
ヘルプに書いてあるとおりにインストールしました。

しかし、エディタの設定変更ダイアログを表示させようと思い、
HVIEWEDT.hppをインクルードし、コンパイルすると
Spin.hppがオープンできないとエラーが出てきてしまいます。

なにか良い方法は無いでしょうか??



1819 文字のドラックについて質問です コメント数:  6件
  みきお  | 2001/11/17 (土) 21:18
こんばんはです。
今度はTeditorで文字のドラック&ドロップをやってみたいのですが
ブラウザーコンポからマウスの左クリックで文字を持ってくる場合
richeditには持ってこられるんですがTEDITORに
持ってくるにはTEDITOR Crateの設定のselmoveとdmautomaticをtrueにするだけではダメなのでしょうか?



1818 Re^2: teditorでソ問なんですが コメント数:  0件
  みきお  | 2001/11/16 (金) 02:53
こんばんはです。

ありがとうございました。
無事できました(^_^)



1817 Re: teditorで質問なんですが コメント数:  1件
  KWX   | 2001/11/15 (木) 17:30
> memo1.text := teditor1.text;
memo1.text := teditor1.Lines.Text;

ですね。



1816 teditorで質問なんですが コメント数:  2件
  みきお  | 2001/11/15 (木) 16:05
初めまして
TEDITORダウンさせて頂きました。
いろいろいじって何となく使えるようになってきたんですが

TMEMOの下記のような感じでTeditorからメモへボタンで内容を映すには
何が必要でしょうか?
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
procedure TForm1.Button1Click(Sender: TObject);

begin
memo1.text := memo2.text;
end;
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー

単純に
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
procedure TForm1.Button1Click(Sender: TObject);

begin
memo1.text := teditor1.text;
end;
ーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーーー
のようにすると怒られちゃいます。

どうかご指導お願いいたします。



1815 Re^2: 搭載メモリ コメント数:  0件
  本田勝彦  |  2001/11/12 (月) 23:33
> WordとExcelとPowerPointを同時に起動して仕事すれば体感出来るかも(^-^;

Excel97 しか持ってません。PowerPoint も Word も無いです。
一太郎はバージョン7 for windows95 てなもんで(^^;

> #95系のOSの場合、更にDelphiを立上げて開発を行なうとシステムリソースが不足してOSの挙動が変になったりします(^^;

Delphi と同時に起動するのは、FDELPHI の過去ログを検索するための Nifterm
だけですね。非力なマシンに順応した体になってますので、使ってないソフトは条件反射的に閉じるという悲しい癖が付いてます。



1814 Re: 搭載メモリ コメント数:  0件
  本田勝彦  |  2001/11/12 (月) 23:28
> OSが95/98/Meなら256M以上積んでもあまり変わらないと思います。
> Win2000/XPなら違いは体感できるかもしれませんが、グラフィックやVideo等の
> ソフトを使わないと意味ないかもしれません。

win98se でし。win2000 は貧乏なので買えません。

> 本田さんは写真屋さんだからこの辺のソフトは使ってそうですね。

会社のマックには、入ってますが。windows の photoshop って使いづらくて嫌いなんですよね。手ぇ抜いているのかも>あどび

> そういえば本田さんはディスクトップ何を使っているのでしょうか?
> もしマザボのVideoを使っているならば、ビデオカードによって劇的に早くなりますよ。

えとね。C&J TD-400L2 というケースに ASUS CUV4X マザー Celeron566。
ビデオカードは All-In-Wonder 16M です。モニタは NANAO の FlexScan T561。





1813 Re: 搭載メモリ コメント数:  1件
  M&I  | 2001/11/12 (月) 17:54
> OSが95/98/Meなら256M以上積んでもあまり変わらないと思います。

WordとExcelとPowerPointを同時に起動して仕事すれば体感出来るかも(^-^;

#95系のOSの場合、更にDelphiを立上げて開発を行なうとシステムリソースが不足してOSの挙動が変になったりします(^^;



1812 搭載メモリ コメント数:  3件
  Km   | 2001/11/12 (月) 02:21
11/11のDiaryより。
>デスクトップのメモリを128Mから512Mにした。が、たいした変わったように感じない。こんなモン?

OSが95/98/Meなら256M以上積んでもあまり変わらないと思います。
Win2000/XPなら違いは体感できるかもしれませんが、グラフィックやVideo等の
ソフトを使わないと意味ないかもしれません。
本田さんは写真屋さんだからこの辺のソフトは使ってそうですね。
そういえば本田さんはディスクトップ何を使っているのでしょうか?
もしマザボのVideoを使っているならば、ビデオカードによって劇的に早くなりますよ。



1811 Re^3: TEditor.SetFountain コメント数:  0件
  本田勝彦  |  2001/11/12 (月) 00:31
> ユーザーが NotifyEventList プロパティを介して、NotifyEventList オブジェクトを操作した場合、その動作は保証されません。
> とあることですが、これはユーザー側が無理にNotifyEventList
> をいじった時などを想定しているのでしょうか?

Add, Remove などは、仕様上 public になってますが、ワケわからないウチはいじって欲しくないです。という意味に書いたように思います。
FList が private になっているのもそういう気持ちが強かったのかもしれません。




1810 Re^2: TEditor.SetFountain コメント数:  1件
  みずほちゃん  | 2001/11/12 (月) 00:06
> InitBrackets, Invalidate を実行させるだけなら
> with B.NotifyEventList do
> begin
>  BeginUpdate;
>  EndUpdate;
> end;
> とすることで、A の ViewChanged が実行されます。
ViewChanagedが実行されるところまでは追ったんですが、
ここではInitBracketsが実行されないと思っていました。
どこかで勘違いしていたみたいです。

とりあえず上の方法で上手くいきました。
どうもありがとうございます。

一つ気になるのはHelpに

ご注意

ユーザーが NotifyEventList プロパティを介して、NotifyEventList オブジェクトを操作した場合、その動作は保証されません。
とあることですが、これはユーザー側が無理にNotifyEventList
をいじった時などを想定しているのでしょうか?



1809 Re: TEditor.SetFountain コメント数:  2件
  本田勝彦  |  2001/11/10 (土) 23:24
> TEditorのオブジェクトAがTFountainのオブジェクトBを
> 参照している状態で、TEditor.Fountainの変更無しに
> TEditor.SetFountainを実行した場合と同じ動作を
> BからAにさせることは可能ですか?

InitBrackets, Invalidate を実行させるだけなら
with B.NotifyEventList do
begin
 BeginUpdate;
 EndUpdate;
end;
とすることで、A の ViewChanged が実行されます。

TNotifyEventList の FList: TMethodList を public に引きずり出せば、

var
Editor: TEditor;
begin
 with B.NotifyEventList do
 begin
  if FList.Count > 0 then
  begin
   Editor := TEditor(PMethod(FList[0]).Data);
   Editor.Top := Editor.Top + 5;
  end;
 end;
end;
といったことも出来ます。



1808 TEditor.SetFountain コメント数:  3件
  みずほちゃん  | 2001/11/10 (土) 00:26
TEditorのオブジェクトAがTFountainのオブジェクトBを
参照している状態で、TEditor.Fountainの変更無しに
TEditor.SetFountainを実行した場合と同じ動作を
BからAにさせることは可能ですか?



1807 Re^7: 11/03Diaryを読んで コメント数:  0件
  本田勝彦  |  2001/11/09 (金) 00:26
>  う、私もDX7IIを人に貸したままだし、QX-3,RX-7,GC-10(シンセギター)
> 等々のMID機器?が箱に入って眠っております。

おともだち〜。YAMAHA の MSX 買った奴が羨ましくて悔しかったなぁ(^^;

>  http://www.itv24.com/
>  このあたりを時々みてますが、最近はオンラインゲームのほうが・・・(以下自粛)

行って見ましたが、テレホタイム寸前で番組が終了するのは何故?(笑)
http://www.ea.com/ とかが好きだったりもします。

ADLSよ、はよ〜来い〜



1806 Re^5: マウスホイールは効く?、効かない? コメント数:  0件
  本田勝彦  |  2001/11/09 (金) 00:21
>  win2000でも、スクロールバーの表示をしないようにすれば、マウスホイールに
> 反応しませんよ。

芸が細かいですね。皆さん参考にして下さいまし。




1805 Re^4: 同じトークンだよーと知る方法 コメント数:  0件
  本田勝彦  |  2001/11/09 (金) 00:19
> function TEditor.RowColToPos(const ARow, ACol: Integer): TPoint;
> 実装しているのですが。。。しくしく。

泣かんでも。次ので付けて置きますね。

どんなことにお使いになるのでしょう?



1804 Re^6: FindNextWordStart について コメント数:  0件
  本田勝彦  |  2001/11/09 (金) 00:16
> が本当で、Fountain にとらわれない「Word」単位の移動
> を狙ったものであるとしたら、PosTokenString メソッドと同様に
> FindNextWordToken の中でも、ActiveFountain ではなく
> TTokenParser を使うことになるのではないでしょうか。

厳密にはそうかもしれません。が FineNextWordStart 内のコメントにもあるように
次の又は前の行の先頭に移動して終わらせています。パースするための文字列も該当行のみを取得しています。コメントにもあるように手抜きと言えば手抜きですが。

たぶんね、CTRL + ←に対応する場合、その行の始まり(RowStart)までさかのぼってから文字列を取得して、パースのループ内で現在のトークンが何行目の何カラム目にあるのかを考えるロジックを仕込むのがメンドかったような気がします。トークンや、Word は3行やそれ以上にまたがる場合もありますからね。

で、今考え中の(考え中が長いですが^^;)キー入力がコマンドを呼び出す形式が実装出来れば、CTRL + ←→によって実行されるメソッドを指定出来るようになりますので、それまでお待ち下さい。お望みの動作をするメソッドをこしらえておいても無駄になることは無いと思います。




1803 Re^4: マウスホイールは効く?、効かない? コメント数:  1件
  清明  | 2001/11/08 (木) 08:20
参考になれば。

 win2000でも、スクロールバーの表示をしないようにすれば、マウスホイールに
反応しませんよ。



1802 Re^6: 11/03Diaryを読んで コメント数:  1件
  清明  | 2001/11/08 (木) 08:16
> 私も今 MIDI にハマリそうで自分が恐い状態(^^;
> ローランドが PC-8801 用のシーケンスソフトを PC-9801 用にバージョンアップするぞするぞといいながら出なかった頃ハマっていました。YAMAHA DX7 や TEAC の TASCAM 4 トラックがいまだに実家の納戸に眠っています。
>
> 隔世の感がありますね<MIDI

 う、私もDX7IIを人に貸したままだし、QX-3,RX-7,GC-10(シンセギター)
等々のMID機器?が箱に入って眠っております。

> お勧めストリームは?(笑)
 http://www.itv24.com/
 このあたりを時々みてますが、最近はオンラインゲームのほうが・・・(以下自粛)



1801 Re^3: 同じトークンだよーと知る方法 コメント数:  1件
  かとちん  | 2001/11/08 (木) 01:50
 http://homepage2.nifty.com/t-katochin
ところで、TPointを使う関数をよく使うので常々思っているのですが、
PosToRowCol の逆関数の実装予定はないのでしょうか。

function TEditor.RowColToPos(const ARow, ACol: Integer): TPoint;
begin
 Result := Point(LeftMargin + (ACol - TopCol) * ColWidth,
          TopMargin + (ARow - TopRow) * RowHeight);
end;

...という超単純なんだけど良く使う関数なのですが、実装しませんか?
いつも必ず TEditor の最新バージョンを取得するたびに、追加して
おりましたが、最近では 派生基底クラス(無茶苦茶な言葉だ)の
TBaseEditor = class(TEditor) なるものを用意して、そいつに
実装しているのですが。。。しくしく。