~katsuhiko メッセージボード

back 1651-1700

1701-1750

 1751-1800

1750 Re: Delphi6へのインストールがうまくいきません。 コメント数：　 2件
　 本田勝彦　　| 2001/10/22 (月) 00:17
> ●[致命的エラー] DesignEditors.pas(517): ファイル 'Proxies.dcu' が見つかりません

作成されるパッケージの requires リストへ designide を追加して見て下さい。

ヘルプの中の「DsgnIntf の名前変更および関連する変更」というトピックに
記述があるそうです＜nifty:FDELPHI/MES/10/7782


1749 Delphi6へのインストールがうまくいきません。 コメント数：　 3件
　 MNagaoka 　　| 2001/10/21 (日) 19:06
初めて質問いたします。
HEditorを試用したいのですが、ちょっと困っています。
Delphi6でVer2.36をインストールしようとすると以下のようになります。
●[致命的エラー] HEDITREG.PAS(24): ファイル 'DesignIntf.dcu' が見つかりません
そこでToolsAPIにパスを通し、やり直すと
●[致命的エラー] DesignEditors.pas(517): ファイル 'Proxies.dcu' が見つかりません
となります。
なにがいけないのでしょうか。


1748 Re^3: TRubyFountain 007 コメント数：　 0件
　 みずほちゃん　　| 2001/10/21 (日) 15:34
　http://jurader.s1.xrea.com/
インストールされた複数のTEditorのせいで
ごちゃごちゃになっていたようです。
TEditor 236のみをインストールした状態で
正常に動作するようになりました。


1747 Re^2: TRubyFountain 007 コメント数：　 1件
　 みずほちゃん　　| 2001/10/21 (日) 01:03
　http://jurader.s1.xrea.com/
やはり無理です。

RubyFountain007(修正済み) PerlFountain100 で試しましたが、

(「<」は折り返し)

<
=begin
hoge
foo


だと =begin の行の判定がおかしくなります。

# hoge や foo の色付けは正常です。
2回目のパースがおかしいみたいですが、
詳しい原因を調べています。


1746 Re^2: 4つ質問 コメント数：　 0件
　 みずほちゃん　　| 2001/10/21 (日) 00:43
　http://jurader.s1.xrea.com/
> >(3) TFountainParserについて
> あまり深く考えて作ったワケではないので、仕様と言えば仕様でしょうか。
分かりました。

> >(4) 今後の予定
> >内部文字列のUTF-8化とありますか?
>
> こちらのご質問は UTF-8 の意味が、わかりません。調べる気が無いの意(^^;
概要はこちら
http://www2.justnet.ne.jp/~ranran/unicode/try9709.html

詳しくはこちら
http://www.unicode.org/

ついでに問題点とか
http://euc.jp/i18n/ucsnote.ja.html
http://www.asahi-net.or.jp/~hc3j-tkg/unicode/

# 私も詳しいことはあまり分ってません。

UTF-8にされると、Fountainの仕様が変わるので、
それが心配で質問しました。
当面の間はそういうことはなさそうですね。

# 最近、アプリケーションの国際化する際に
# UTF-8を使うというのをよく聞きます。


1745 Re^2: 4つ質問 コメント数：　 0件
　 みずほちゃん　　| 2001/10/21 (日) 00:31
　http://jurader.s1.xrea.com/
> コピーを作って Assign して直接編集すればえぇぢゃんの場合、
> PropInstance := TObject(GetOrdProp(Instance, PropList[I]));
> これを ListBox1.Items.Objects[I] に直接代入して Brackets の場合は追加や破棄もあるワケで、そりはちょっと恐ろしいぞ。というのが本当のところかもしれません(^^;

今は コピーを作ってそれを直接編集しています。

ユーザーが使用するダイアログなので、
Brackets は無視しても問題ないという考えからこうしています。
(あと、下手に触られて、色付けが変になるのが怖いというのもあります)。


1744 Re^2: 4つ質問 コメント数：　 0件
　 みずほちゃん　　| 2001/10/21 (日) 00:26
　http://jurader.s1.xrea.com/
> つまり、該当コンポーネントの殺生に対してプログラマが責任を持つのであれば、何でもありです。
了解です。

今は Fountain 用のダイアログを作っていて、
そのダイアログで AssignProperties と クラス参照型を用いて
設定用の Fountain を動的に生成しています。

Create の引数が Fountain 毎に変わると困るなあと
思って尋ねたんですが、この点はどうしようも無いようですね。
不具合が出た時に個々に対処しようと思います。


1743 Re^2: 4つ質問 コメント数：　 0件
　 Km 　　| 2001/10/20 (土) 23:36
> こちらのご質問は UTF-8 の意味が、わかりません。調べる気が無いの意(^^;

Ascii文字のところが1バイトのUnicodeじゃなかったかな。
この辺はDECOさんが詳しいかも。


1742 Re: 4つ質問 コメント数：　 2件
　 本田勝彦　　| 2001/10/20 (土) 23:15
>(3) TFountainParserについて
>このクラスに日本語の処理が入っているのは仕様ですか?

あまり深く考えて作ったワケではないので、仕様と言えば仕様でしょうか。

>TFountainParserをTFountainBaseParserみたいなのから継承して、
>TFountainBaseParserでは日本語処理をしないというのは無理ですか?

メンドイので(^^; InitMethodTable を override して inherited を実行せずに、

　for C := #0 to #255 do
　　case C of
　　　#0: FMethodTable[C] := EofProc;
　　　#9: FMethodTable[C] := TabProc;
　　　#10: FMethodTable[C] := LFProc;
　　　#13: FMethodTable[C] := CrProc;
　　　'0'..'9':
　　　　　　FMethodTable[C] := IntegerProc;
　　　'A'..'Z', '_', 'a'..'z':
　　　　　　FMethodTable[C] := AnkProc;
　　else
　　　　　　FMethodTable[C] := SymbolProc;
　　end;

　//FTokenMethodTable も同様

というのを作成して、基底クラスとしてください。


>(4) 今後の予定
>内部文字列のUTF-8化とありますか?

こちらのご質問は UTF-8 の意味が、わかりません。調べる気が無いの意(^^;



1741 Re: 4つ質問 コメント数：　 0件
　 本田勝彦　　| 2001/10/20 (土) 23:14
># 任意のオブジェクトがある時に、そのクラスのオブジェクトを
># 新しく生成するのが難しいから?
># クラス参照型だけではコンストラクタの引数は
># 簡単には分からないですよね。

TComponent であることが明白であれば、

Component := TComponentClass(FindClass(Instance.ClassName)).Create(nil);

で作れます。該当クラスが、コンポーネントインストール又は RegisterClass されている必要があります。cf Classes.pas


>あと、AssignPropertiesは将来も使用することは可能でしょうか?

Delphi の TypeInfo.pas の内容が変わらない限り大丈夫だと思います。



1740 Re: 4つ質問 コメント数：　 1件
　 本田勝彦　　| 2001/10/20 (土) 23:13
>(2) AssignPropertiesやEnumPropertiesとEditFountain
>AssignPropertiesを使わずに上記の方法を取る理由は何ですか?

EditFountain の目的は、ReserveWordList, FileExtList プロパティの編集と、プロパティ名が不明な任意の個数の TFountainColor 型オブジェクトを編集するためのインターフェースを提供することですから、コピーしてもそのコピーからまた同じ事をやらなければならないっしょ？

かき集めるのが美しくない場合は、編集のために個々に生成された TFountainColor オブジェクトの OnChange イベントハンドラでプロパティ名から該当オブジェクトを探して更新するという処理も必要になると思います。

コピーを作って Assign して直接編集すればえぇぢゃんの場合、
PropInstance := TObject(GetOrdProp(Instance, PropList[I]));
これを ListBox1.Items.Objects[I] に直接代入して Brackets の場合は追加や破棄もあるワケで、そりはちょっと恐ろしいぞ。というのが本当のところかもしれません(^^;


1739 Re: 4つ質問 コメント数：　 1件
　 本田勝彦　　| 2001/10/20 (土) 23:10
> (1) TFountainの継承クラスのコンストラクタ
> 継承クラスで引数を変更しても TEditor で使用することはできますか?
>
> # 動きそうな気はしますが。

TMyFountain = class(TFountain)
public
　constructor CreateByParam(AOwner: TComponent; Params: TParams); virtual;
end;

といったクラスを実行時に生成して利用することは可能ですし、TEditor に接続することも可能です。ただ、Delphi にコンポーネントインストールしても CreateByParam コンストラクタが Delphi によって利用されることはありません。

つまり、該当コンポーネントの殺生に対してプログラマが責任を持つのであれば、何でもありです。

でも、Params をプロパティとして公開し、そこに値をセットしてからメソッドを呼び出すという流れの方が以下の理由から幸せになれると思います。
１．RegisterClass しないと Delphi のストリームシステムを利用出来なくなる可能性がある。
２．生成されるとすぐ仕事をするという作りは、コンストラクタの乱発を招きやすい。以前の TEditorParser がそうであったことからの老婆心ですが。




1738 4つ質問 コメント数：　 8件
　 みずほちゃん　　| 2001/10/20 (土) 16:30
　http://jurader.s1.xrea.com/
(1) TFountainの継承クラスのコンストラクタ
継承クラスで引数を変更しても TEditor で使用することはできますか?

# 動きそうな気はしますが。

(2) AssignPropertiesやEnumPropertiesとEditFountain
EditFountainではEditEditorと違って、Fountainのコピーを作らず、
EnumPropertiesを使って、プロパティに対応するオブジェクトを生成し、
設定が終わった段階でオブジェクト群から情報をかき集めてきて
Fountainに設定しています。

AssignPropertiesを使わずに上記の方法を取る理由は何ですか?

# 任意のオブジェクトがある時に、そのクラスのオブジェクトを
# 新しく生成するのが難しいから?
# クラス参照型だけではコンストラクタの引数は
# 簡単には分からないですよね。

あと、AssignPropertiesは将来も使用することは可能でしょうか?

(3) TFountainParserについて
このクラスに日本語の処理が入っているのは仕様ですか?

TFountainParserをTFountainBaseParserみたいなのから継承して、
TFountainBaseParserでは日本語処理をしないというのは無理ですか?

(4) 今後の予定
内部文字列のUTF-8化とありますか?


1737 Re: TEditor ver 2.36, TStringsPrinter ver 1.8 コメント数：　 0件
　 sakazuki 　　| 2001/10/20 (土) 09:12
　http://homepage2.nifty.com/sakazuki/rde.html
sakazukiです。
> ・文字列定数ユニット heStrConsts.pas を導入した。
さっそくの対応ありがとうございます。
いただいていきます。



1736 TEditor ver 2.36, TStringsPrinter ver 1.8 コメント数：　 1件
　 本田勝彦　　| 2001/10/20 (土) 01:29
公開です。

TEditor ver 2.36 では
・fsUnderline の下線を１点破線で描画出来るようになった。
・文字列定数ユニット heStrConsts.pas を導入した。
・D5, D6 用のマウスホイールイベントを追加した。
property OnMouseWheel;
property OnMouseWheelDown;
property OnMouseWheelUp;

TStringsPrinter では
・行間マージンを指定出来るようになった。

とバージョンアップされています。どうぞお試し下さいまし。


1735 Re^3: 自己レスです コメント数：　 0件
　 本田勝彦　　| 2001/10/20 (土) 01:26
ぐりぐりでスクロールするの、嫌いなんですよね(^^;

> {$IFDEF COMP5_UP}
> property OnMouseWheel;
> property OnMouseWheelDown;
> property OnMouseWheelUp;
> {$ENDIF}

こちらの方を採用させて頂きましたので、イベントハンドラを書いて下さいまし。


> えー、でも本田さんのコードは触らないようにして派生させてますよー。
> 最近は TEditroは全く派生させずに Foutainの派生だけに留めようと
> 努力してるのにー。

ver 2.0x ではたいしたご迷惑をおかけいたしましたが、今のえぇでしょ(^^;
許してね。


1734 Re^4: 要望 コメント数：　 0件
　 本田勝彦　　| 2001/10/20 (土) 01:24
> heConsts.pas が導入される予感。

ver 2.36 で heStrConsts.pas が追加されました。見てね。


1733 Re^3: THTMLFountain のコーテーション コメント数：　 0件
　 かとちん　　| 2001/10/19 (金) 02:21
　http://homepage2.nifty.com/t-katochin
> でも、TagAttributeValueProc() 内で、
> DoubleQuotationProc() と SingleQuotationProc()
> が呼ばれているので、問題は無いと思うのですが。
あぁ〜そうですね。タグブロック内で、値の代入以外で
' や " を使うことも現実的には無いでしょうしねぇ。
ではアリってことで。


1732 Re^2: 自己レスです コメント数：　 1件
　 かとちん　　| 2001/10/19 (金) 02:12
　http://homepage2.nifty.com/t-katochin
> ぐりぐりで、どこをスクロールさせるかは、個々のアプリケーションの都合が
> あるように思いますので、きっとやらないと思います。
えーそれも見越したコードですよー。そのために、戻り値がTrueの場合は
「ユーザ側で処理したよん」っていう意味なんじゃないですかー。
だから、Falseの場合は、
「TEditorではデフォルトとしてマウスホイールは単純なスクロール制御を行います。」ってことにしておくとオアトが宜しいのでは？

忘れてたけど本当なら、publish に、
<PRE><CODE>
{$IFDEF COMP5_UP}
property OnMouseWheel;
property OnMouseWheelDown;
property OnMouseWheelUp;
{$ENDIF}
</CODE></PRE>
も、あった方がよいですー。

> どうせ^^; 拡張コンポ使っていらっしゃるのだろうし・・・まかせます。
えー、でも本田さんのコードは触らないようにして派生させてますよー。
最近は TEditroは全く派生させずに Foutainの派生だけに留めようと
努力してるのにー。

> あ゛、かとちんさんのコードはＱ＆Ａの方で使わせて頂きたいと思います。
どもです。


1731 Re^4: THTMLFountain のコーテーション コメント数：　 4件
　 パンタグラフ　　| 2001/10/19 (金) 01:37
　http://homepage1.nifty.com/cosmic/
> > できれば THTMLFountain でデフォで対応きぼーん(^-^)
>
> へいへい。開発日誌のページ http://compodev.at.infoseek.co.jp/ に置きましたので、お試し下さい。

ありがとうございます。ゲットしました。
さっそく使ってみます。


1730 Re^3: 要望 コメント数：　 1件
　 本田勝彦　　| 2001/10/19 (金) 00:11
> でした。まだ漏れは、あるかもしれません

いやぁスンマセン。助かりました。

> HViewEdt.dfmの
> Fontシートの"可変ピッチフォント"←ここだけなぜか日本語^^;）

わはは(^^; Variable Pitch Font でええでしょうか？

> と、最初から記述してあるサンプル文章もソースで一箇所で宣言してFormShow時に動的に設定する形式にしていただけると大変うれしいです・・・。

サンプル文章って、あそか。あれだ。へへ〜ぃ。
heConsts.pas が導入される予感。


1729 Re^3: THTMLFountain のコーテーション コメント数：　 5件
　 本田勝彦　　| 2001/10/19 (金) 00:06
> できれば THTMLFountain でデフォで対応きぼーん(^-^)

へいへい。開発日誌のページ http://compodev.at.infoseek.co.jp/ に置きましたので、お試し下さい。



1728 Re^2: 要望 コメント数：　 2件
　 sakazuki 　　| 2001/10/18 (木) 06:35
　http://homepage2.nifty.com/sakazuki/rde.html

> いつかはやらないと駄目だろなぁと、おぼろげに感じていた部分ですが(^^;
> ShowMessage している部分だけで良いですよね。そのウチやりますです。

お手数ですが、よろしくお願いします。
ご参考までに、ざっと拾ってみました（'でgrepかけて拾ってみると）。
日本語もしくは、２バイト文字を直に書いてあるのは、

HViewEdt.pas
889,900,915,926,1086,1087,1238,1485,1490,1495,1570
HEditor.pas
4012-4285の標準ポップアップメニュー設定
heStringList.pas
107,111
HStrProp
365-436のステータスバー周り、619,620,675,676

でした。まだ漏れは、あるかもしれません
HViewEdt.dfmの
Fontシートの"可変ピッチフォント"←ここだけなぜか日本語^^;）
と、最初から記述してあるサンプル文章もソースで一箇所で宣言してFormShow時に動的に設定する形式にしていただけると大変うれしいです・・・。

よろしくお願いします。


1727 Re^2: THTMLFountain のコーテーション コメント数：　 6件
　 パンタグラフ　　| 2001/10/18 (木) 00:48
　http://homepage1.nifty.com/cosmic/
> > 　　<title>Let's Begin</title>
>
> あらまぁ、こんなのもありなんですね。アンパサンドを使うものだとばかり思ってました。
「"」の実体参照 ＆quot; は HTML2.0 の頃からあるのですが、「'」の実体参照 &apos; は
XML からと新しめで、対応していないブラウザも多いでし。
Netscape6くらいです。IE6でも、XML だとうまくいくのですが、XHTML だとダメです。

てわけで、「'」を使う機会は多いと思います。「"」は実体参照にすべきでしょうけど。

> どうしましょうね。色々方法はあると思いますが、AnkProc を override して
> toAnk が、', " を取り込んでしまうようにすると良いかもしれません。こうすると、= の後や、全角文字の後、スペース、タブの後にある ', " は認識されます。

うーん。override ですか。
できれば THTMLFountain でデフォで対応きぼーん(^-^)


1726 Re: 自己レスです コメント数：　 2件
　 本田勝彦　　| 2001/10/17 (水) 23:53
だいぶ進んでいらっしゃるようですね。

WM_MOUSEWHEEL だっけ^^;
以前、フォームのイベントハンドラでやれるよというお話をココで聞いたので、
そのまま〜になってます。

ぐりぐりで、どこをスクロールさせるかは、個々のアプリケーションの都合が
あるように思いますので、きっとやらないと思います。

どうせ^^; 拡張コンポ使っていらっしゃるのだろうし・・・まかせます。

あ゛、かとちんさんのコードはＱ＆Ａの方で使わせて頂きたいと思います。



1725 Re: 要望 コメント数：　 3件
　 本田勝彦　　| 2001/10/17 (水) 23:47
> 標準で配布している、PropertyEditorのソース内で使用している日本語文字列を一個所で宣言もしくは、resourcestringを使って書いていただけないでしょうか。
> 拙作のRDEでは、PropertyEditorをまんま使わせていただいておりますが、英語版をつくるにあたり、日本語部分の書き替え作業を効率化したいなーという非常に身勝手な動機によるものなのですが・・・

いつかはやらないと駄目だろなぁと、おぼろげに感じていた部分ですが(^^;
ShowMessage している部分だけで良いですよね。そのウチやりますです。

> # 私のサイトに張っていただいているリンクですが、アドレスの最後に"/"が含まれ
> # まってつながりません。何かのついでに修正していただけましたらうれしいです。

これは失礼いたしました。（繋がらなかった理由がわかりました^^;）
直しましたです。


1724 Re: THTMLFountain のコーテーション コメント数：　 7件
　 本田勝彦　　| 2001/10/17 (水) 23:44
> さて、 THTMLFountain なのですが、
> 　　<title>Let's Begin</title>

あらまぁ、こんなのもありなんですね。アンパサンドを使うものだとばかり思ってました。

どうしましょうね。色々方法はあると思いますが、AnkProc を override して
toAnk が、', " を取り込んでしまうようにすると良いかもしれません。こうすると、= の後や、全角文字の後、スペース、タブの後にある ', " は認識されます。


1723 Re: Win32 API by Object Pascal of Delphi コメント数：　 0件
　 本田勝彦　　| 2001/10/17 (水) 23:39
> 　WinAPI について解説したサイトです。まだ未完ですが書籍ならば大変な力作というところ。しかもサイト運営者はうれしいことにDelphiの信奉者です。
>
> http://halbow.cool.ne.jp/top.html

見てきました。すんごいですねぇ。新たな小さいＶＣＬを作られるようで、
リンクしよぉ・・・

どうどす＞夜ゲイツさん。



1722 Re^2: THTMLFountain のコーテーション コメント数：　 1件
　 パンタグラフ　　| 2001/10/17 (水) 17:15
　http://homepage1.nifty.com/cosmic/
パンタグラフです。


> > 試しに、THTMLFountain.InitMethodTable() の
> > DoubleQuotationProc と SingleQuotationProc を
> > 代入している行を削除したら、それらしく動いています。
> > 副作用あるかなー。
> タグブロック内で困ることになります。

でも、TagAttributeValueProc() 内で、
DoubleQuotationProc() と SingleQuotationProc()
が呼ばれているので、問題は無いと思うのですが。


1721 自己レスです コメント数：　 3件
　 かとちん　　| 2001/10/17 (水) 16:32
　http://homepage2.nifty.com/t-katochin
> else if line > Lines.Count then line := Lines.Count;
ではなく
else if line > ListCount then line := ListCount;
ですね。


1720 Re^2: THTMLFountain のコーテーション コメント数：　 0件
　 かとちん　　| 2001/10/17 (水) 16:09
　http://homepage2.nifty.com/t-katochin
自己レスです。
よく考えたら以下のように変更すればOKでした。
一番スッキリさせたコードです。

procedure THTMLFountainParser.SingleQuotationProc;
begin
DoubleQuotationProc;
FToken := toSingleQuotation; // toDoubleQuotation を書き換える
end;

procedure THTMLFountainParser.DoubleQuotationProc; // override;
begin
if (FElementIndex <> TagBlockElement) then
begin
FToken := toSymbol;
Inc(FP);
Exit;
end;
inherited;
end;


1719 Re: THTMLFountain のコーテーション コメント数：　 3件
　 かとちん　　| 2001/10/17 (水) 15:52
　http://homepage2.nifty.com/t-katochin
こんにちわ。かとちんです。

> 　　<title>Let's Begin</title>
>
> って感じでシングルコーテーションがあると、
> それ以降が文字列として認識されてしまいます。
ほんとだ−、これは困りますね。

> 試しに、THTMLFountain.InitMethodTable() の
> DoubleQuotationProc と SingleQuotationProc を
> 代入している行を削除したら、それらしく動いています。
> 副作用あるかなー。
タグブロック内で困ることになります。
ちゃんとした対応としては、SingleQuotationProc に入った
直後で、

if (FElementIndex <> TagBlockElement) then
begin
FToken := toSymbol;
Inc(FP);
Exit;
end;

のようにするのが望ましいと思います。
同じように DoubleQuotationProc も、override して、
前述のコードを実行した後に、inherited すれば良いと
思います。


1718 TEditor ホイールマウス対応のお願い コメント数：　 4件
　 かとちん　　| 2001/10/17 (水) 15:38
　http://homepage2.nifty.com/t-katochin
Delphi5からのホイールマウス対応してほしいよー。

protected
// VCL override
{$IFDEF COMP5_UP}
function DoMouseWheel(Shift: TShiftState; WheelDelta: Integer; MousePos: TPoint): Boolean; override;
{$ENDIF}

{$IFDEF COMP5_UP}
function TEditor.DoMouseWheel(Shift: TShiftState; WheelDelta: Integer;
MousePos: TPoint): Boolean;
var
line: Integer;
WA: Integer;
begin
Result := (inherited DoMouseWheel(Shift, WheelDelta, MousePos));
if not Result then
begin
WA := Abs(WheelAccumulator);
if WA = 0 then WA := 1;

if (WheelDelta < 0) then
line := TopRow + WA * 3
else
line := TopRow - WA * 3;

if line < 0 then line := 0
else if line > Lines.Count then line := Lines.Count;
TopRow := line;
Result := True;
end;
end;
{$ENDIF}

これでグリグリと縦スクロールします。
なんで、３行ずつなのかというと、秀丸やエクスプローラなどが、
１回の「グリッ」で、３行単位でスクロールするからです。
どうかお願いします。


1717 要望 コメント数：　 4件
　 sakazuki 　　| 2001/10/17 (水) 09:33
　http://homepage2.nifty.com/sakazuki/rde.html
こんにちは、sakazukiです。
要望なのですが、
標準で配布している、PropertyEditorのソース内で使用している日本語文字列を一個所で宣言もしくは、resourcestringを使って書いていただけないでしょうか。
拙作のRDEでは、PropertyEditorをまんま使わせていただいておりますが、英語版をつくるにあたり、日本語部分の書き替え作業を効率化したいなーという非常に身勝手な動機によるものなのですが・・・

ご検討いただけましたら幸いです。
よろしくお願いします。

# 私のサイトに張っていただいているリンクですが、アドレスの最後に"/"が含まれ
# まってつながりません。何かのついでに修正していただけましたらうれしいです。


1716 THTMLFountain のコーテーション コメント数：　 12件
　 パンタグラフ　　| 2001/10/17 (水) 01:32
　http://homepage1.nifty.com/cosmic/
こんにちは。お久しぶりです(^-^)

さて、 THTMLFountain なのですが、

　　<title>Let's Begin</title>

って感じでシングルコーテーションがあると、
それ以降が文字列として認識されてしまいます。

基本的には、HTMLFountain は、タグの属性値の囲みの部分だけ
シングルコーテーション、ダブルコーテーションを認識して
ほしいのですが、ダメでしょうか。

試しに、THTMLFountain.InitMethodTable() の
DoubleQuotationProc と SingleQuotationProc を
代入している行を削除したら、それらしく動いています。
副作用あるかなー。





1715 Win32 API by Object Pascal of Delphi コメント数：　 1件
　 ゆうきひろ　　| 2001/10/17 (水) 01:07
　http://homepage2.nifty.com/ultla7/mozart/_start.htm
　WinAPI について解説したサイトです。まだ未完ですが書籍ならば大変な力作というところ。しかもサイト運営者はうれしいことにDelphiの信奉者です。

http://halbow.cool.ne.jp/top.html


1714 Re: TRubyFountain 007 コメント数：　 2件
　 みずほちゃん　　| 2001/10/17 (水) 00:47
　http://jurader.s1.xrea.com/
> の EqualProc ですが、
> if ( SourcePos = 0 ) and ( MatchKeyWordStrictly('=begin') ) then
>
> に ( FPrevRowAttribute <> raWrapped ) を加えると、改行の次の行頭
> という判別が出来ます。
これ一回試したんですが、どうも挙動がおかしくて007では取りやめています。
もしかしたら勘違いしているかもしれないので、
時間がある時にもう一度試してみようと思います。

# ソースを読み返すと滅茶苦茶なコメントが多いです(苦笑)＞TRubyFountain


1713 Re^3: 質問 コメント数：　 0件
　 本田勝彦　　| 2001/10/16 (火) 23:50
> > > 3) TEditorLeftbarやTEditorImagebarについて
> TEditorのprivateなフィールドのFImagebarWidthとFLeftbarWidth
> が参照したいです。

protected ですが(^^;


> ドキュメントは
>
> 「TEditorViewInfo は、TEditorFountain コンポーネントを内包し、TEditor ユーザーへTEditorFountain へのインターフェースを提供します。」
>
> だと、Fountainプロパティが設定された時にViewプロパティがすべて
> 無効になるような印象を受けます。
> TFountainにSelectやHitの記述があるので、
> 例外に関する記述としてそちらへのリンクがあった方が良いと思います。

なるほど、そうですね。次ので直します。ご指摘ありがとうございます。




1712 TRubyFountain 007 コメント数：　 3件
　 本田勝彦　　| 2001/10/16 (火) 23:38
の EqualProc ですが、
if ( SourcePos = 0 ) and ( MatchKeyWordStrictly('=begin') ) then

に ( FPrevRowAttribute <> raWrapped ) を加えると、改行の次の行頭
という判別が出来ます。


1711 Re^2: 質問 コメント数：　 1件
　 みずほちゃん　　| 2001/10/16 (火) 23:17
　http://jurader.s1.xrea.com/
> > 1) TEditorのソースについて
了解です。

> > 2) TEditorPropについて
必要になったら、継承するなりラッパーを書くなりして実装してみます。

> > 3) TEditorLeftbarやTEditorImagebarについて
TEditorのprivateなフィールドのFImagebarWidthとFLeftbarWidth
が参照したいです。

> > 4) TEditor.View.Colors.Selectについて
プロパティの過去の互換性は捨てられないのですね。

ドキュメントは

「TEditorViewInfo は、TEditorFountain コンポーネントを内包し、TEditor ユーザーへTEditorFountain へのインターフェースを提供します。」

だと、Fountainプロパティが設定された時にViewプロパティがすべて
無効になるような印象を受けます。
TFountainにSelectやHitの記述があるので、
例外に関する記述としてそちらへのリンクがあった方が良いと思います。


1710 Re^3: 質問 コメント数：　 0件
　 本田勝彦　　| 2001/10/16 (火) 23:14
> TFountain Link のですよね?
> http://jurader.s1.xrea.com/delphi/rbft.html
> ではないのかな?

あ、そだった。Delphi のページにもリンクがありましたね(^^;
Link のページに集約しました。

直リンクは失礼かなと思ったので、トップページに行くようになっています。


1709 Re^5: 初心者にお勧めのサイトOR参考書をおしえてください コメント数：　 0件
　 本田勝彦　　| 2001/10/16 (火) 23:12
> http://www.oreilly.co.jp/BOOK/delphi/

これは、Inside Delphi の著者によるリファレンス本ですよね。本屋で眺めただけですが、実行時型情報も扱われていて濃いぃですよ。分量から言っても、Delphi に付属のマニュアルを読むより根性が要ると思います。

両方読めば鬼に金棒ですが(^^;



1708 Re^2: 質問 コメント数：　 1件
　 moriq 　　| 2001/10/16 (火) 17:23
　http://www.moriq.com/
こんにちは。
> > # どうでも良いですが、引越し完了しました。
> おめでとうございます。リンクを更新しました。
TFountain Link のですよね?
http://jurader.s1.xrea.com/delphi/rbft.html
ではないのかな?


1707 Re^4: 初心者にお勧めのサイトOR参考書をおしえてください コメント数：　 1件
　 ゆうきひろ　　| 2001/10/16 (火) 00:26
　http://homepage2.nifty.com/ultla7/mozart/_start.htm
> > 　そういえば最近 ObjectPascal 言語の解説書が出たんじゃないでしょうか？
>
> http://www.amazon.co.jp/exec/obidos/tg/detail/glance/-/books/477410891X/
> ですね。でもリファレンス読めばこんなのは要らないと思います。
> 本屋で見たけど読みたいところがいっこもなかったモン。


http://www.oreilly.co.jp/BOOK/delphi/
　私が見かけたのはたしかこっちの方でした。発行日が５月になってますけど私が書店で目にしたのは８月の末です。Delphiの本としては珍しくも５冊くらい置いていました(^_^;)。


1706 Re: 質問 コメント数：　 4件
　 本田勝彦　　| 2001/10/16 (火) 00:08
> 1) TEditorのソースについて

全然問題ありません。そのつもりで書いたユニットですから。

> 2) TEditorPropについて

仕様・・・かなぁ。あまり深く考えたことはない部分だったりします。
Assign, AssignTo を override してフィールドと published なプロパティを追加すれば、何でもおっけ〜なので、そういうのをこしらえて使って下さい。

> 3) TEditorLeftbarやTEditorImagebarについて

TEditor.LeftMargin メソッドは使えませんか？

> 4) TEditor.View.Colors.Selectについて

Colors.Hit もあったりして(^^;
Colors の published なプロパティなので、Colors から削除すると悲劇が起きるので、そのままになってます。勘弁してね。

ドキュメントはどのあたりを修正すると良いでしょうか？

> # どうでも良いですが、引越し完了しました。

おめでとうございます。リンクを更新しました。


1705 TEditor ver 2.36 beta 1 コメント数：　 0件
　 本田勝彦　　| 2001/10/15 (月) 23:50
公開しました。http://compodev.at.infoseek.co.jp/　に差分ファイルを置きました。

fsUnderline なフォントを一点破線で描画するようになっています。それだけです。
ウチの Pentium 75Mhz マシンでは、fsUnderline なフォントで描画するより
高速に動作しています。ベータ版としていますが、ほぼ完成版と言えます。

不具合がありましたら、ご指摘頂けると幸いです。


1704 質問 コメント数：　 5件
　 みずほちゃん　　| 2001/10/15 (月) 21:52
　http://jurader.s1.xrea.com/
幾つか質問があります。

1) TEditorのソースについて
HViewEdt.pasとheColorManager.pasを参考にして
(場合によってはソースをコピー＆ペーストして)
設定ダイアログを作ったんですが、
私が書いたソースをRubyライセンス
(http://www.ruby-lang.org/en/LICENSE.txt)
で公開する際、TEditorのライセンスの問題はありますか?

2) TEditorPropについて
TEditorPropはTEditorのすべてのプロパティを設定できませんが
(例えば、TEditor.UndoListMax)これは仕様ですか?

3) TEditorLeftbarやTEditorImagebarについて
この二つにはWidthというプロパティがありません。
右端で折り返す設定をする場合はWidthプロパティが
欲しいです(今は代替コードを書いてます)。

4) TEditor.View.Colors.Selectについて
Fountainが接続されていても、TEditor.View.Colorsの中でこれだけは
有効になっています。TEditorViewInfoのドキュメントを修正するか、
Fountainに合わせたプロパティの整理をして欲しいのですが、いかがでしょう。

# どうでも良いですが、引越し完了しました。


1703 Re^2: ホームページをＯＰＥＮしました！ コメント数：　 0件
　 Ｍ．Ｈ　　| 2001/10/15 (月) 08:33
　http://www7.ocn.ne.jp/~mhsoft/
おはようございます。Ｍ．Ｈです。

> ホームページ開設おめでとうございます。
ありがとうございます。
ようやくの開設です（＾＾）

> こちらからもリンクさせて頂きますね。
これまたありがとうございます。

> Ｍヘディター濃いですね。開発頑張って下さい。
濃いぃですねぇ（＾＾；
余計な機能は正式版では省かないとキッツイかも（笑）
これからも開発頑張っていくのでよろしくお願いしますね。


1702 Re: ホームページをＯＰＥＮしました！ コメント数：　 1件
　 本田勝彦　　| 2001/10/14 (日) 23:42
ホームページ開設おめでとうございます。
こちらからもリンクさせて頂きますね。

Ｍヘディター濃いですね。開発頑張って下さい。


1701 Re^4: 初心者にお勧めのサイトOR参考書をおしえてください コメント数：　 0件
　 本田勝彦　　| 2001/10/14 (日) 23:40
> やっぱり一番の参考書は人のソースだと思いますね。

んだんだ。

その最高のお手本が Source フォルダにあるワケで。
コラム http://compodev.at.infoseek.co.jp/ にも書いたけど、
ＶＣＬを読めるようになれるよう「Object Pascal 言語ガイド」は
必読書なんですね。