~katsuhiko メッセージボード

back 2301-2350

2351-2400

 2401-2450

2400 Re^3: TstringsPrinter ver1.8??? コメント数：　 0件
　 本田勝彦 2002/11/15 (金) 19:46
確認出来ました。

で、いまほど公開した ver 1.9 では、フォントプロパティへの代入に
Assign メソッドを使用してみました。
今のところ、不安定にはならないようです。


2399 Re^2: TstringsPrinter ver1.8??? コメント数：　 1件
　 夜ゲイツ 2002/11/15 (金) 17:39
> なんででしょうねぇ？ウチとこでは、特段の変化は見られませんでしたが。
> 同じような症状の方いらっしゃいますか？

Fontプロパティの項目（Sizeとか）単体の入力は出来るのですが、右の...ボタンを使い入力すると
「TPropItemをTFontに代入することはできません」を表示後Delphi6は意識不明に陥ったりします。
どうもこのFontは派生元が違うのではないでしょうか？（参考までに）


2398 Re^3: TEditor.Lines.EndUpdate コメント数：　 0件
　 本田勝彦 2002/11/14 (木) 23:52
> とすると [EOF] が２個あらわれます。
> まだバグがあったんですねぇ・・・

procedure TEditorScreen.Update;

で、
if Sp > FList.Count - 1 then // [EOF] へ対応
InvalidateRow(Sp, Sp);

という部分が２ヶ所ありますが、この２ヶ所を
InvalidateRow(Sp, Sp + 1)
とすることで回避出来ます。

バージョンアップの予感^^;


2397 Re^2: TEditor.Lines.EndUpdate コメント数：　 1件
　 本田勝彦 2002/11/14 (木) 22:18
Editor1.Marks.EofMark.Visible := True;
Editor1.BeginUpdate;
Editor1.EndUpdate;
Editor1.Lines.Add('hogehoge');

とすると [EOF] が２個あらわれます。
まだバグがあったんですねぇ・・・


2396 Re: TEditor.Lines.EndUpdate コメント数：　 2件
　 本田勝彦 2002/11/14 (木) 22:06
> ですが、Invalidate されないようなのですが、皆さん知ってましたか？
> ？Invalidate しない仕様にしたのだったかすら覚えていないという・・・

というか、
procedure TEditorScreenStrings.Clear;

でやってる、再描画領域の指定が変なような・・・調査中


2395 TEditor.Lines.EndUpdate コメント数：　 3件
　 本田勝彦 2002/11/14 (木) 21:47
ですが、Invalidate されないようなのですが、皆さん知ってましたか？
？Invalidate しない仕様にしたのだったかすら覚えていないという・・・


2394 Re: TstringsPrinter ver1.8??? コメント数：　 2件
　 本田勝彦 2002/11/14 (木) 21:45
> TstringsPrinter ver1.8のFontプロパティをオブジェクトインスペクタ上で変更すると反映もされないけど、Delphi6が非常に不安定になるんです。
> 手持ちのＰＣ２台とも同じ症状なのですが、何が悪いのでしょうか？
> 私だけの症状だったら、ごめんなさいです。

なんででしょうねぇ？ウチとこでは、特段の変化は見られませんでしたが。
同じような症状の方いらっしゃいますか？

今、TStringsPrinter をバージョンアップしようかなぁと思ってたばっかり
だったりして^^;

DeviceCapabilities で、用紙のサイズ、名前のリストを取得しようとするものですが、これって不幸になるのかな？


2393 TstringsPrinter ver1.8??? コメント数：　 3件
　 夜ゲイツ 2002/11/14 (木) 19:40
こんばんは、お久しぶりです。

TstringsPrinter ver1.8のFontプロパティをオブジェクトインスペクタ上で変更すると反映もされないけど、Delphi6が非常に不安定になるんです。
手持ちのＰＣ２台とも同じ症状なのですが、何が悪いのでしょうか？
私だけの症状だったら、ごめんなさいです。


2392 Re^3: ショートカットを… コメント数：　 0件
　 本田勝彦 2002/11/12 (火) 01:38
uses
heStrConsts, Menus;

procedure TForm1.Button1Click(Sender: TObject);
var
I: Integer;
begin
if (Editor1.PopupMenu <> nil) and (Editor1.PopupMenu is TEditorPopupMenu) then
begin
for I := 0 to Editor1.PopupMenu.Items.Count - 1 do
if Editor1.PopupMenu.Items[I].Caption = PopupMenu_Undo then
begin
showmessage(ShortcutToText(Editor1.PopupMenu.Items[I].ShortCut));
Editor1.PopupMenu.Items[I].ShortCut := TextToShortCut('');
Exit;
end;
end;
end;

で無効に出来ますね^^; 復帰の方法はわかりません^^;;;


2391 Re^2: ショートカットを… コメント数：　 1件
　 乗りれ 2002/11/11 (月) 16:19
わかりました。

ありがとうございました。


2390 Re: ショートカットを… コメント数：　 2件
　 本田勝彦 2002/11/10 (日) 23:31
> 標準でUndo等のショートカットキーが用意されていますよね?
> それを無効にすることはできるのでしょうか?

TEditor は、標準のポップアップメニューを持っています。
ユーザーがポップアップメニューを設定しなかった場合にだけそれが有効になります。なので、空のポップアップメニューを TEditor.PopupMenu にあてがってやれば
無効になります。全部無効になりますが。

デフォのままでショートカットキーだけを無効にすることは出来ません。
拡張コンポをこしらえるか、ソースコードでショートカットキーを設定している
部分をコメントアウトするかを行って下さい。


2389 ショートカットを… コメント数：　 3件
　 乗りれ 2002/11/10 (日) 19:48
はじめまして。

TEditorの質問なんです。
標準でUndo等のショートカットキーが用意されていますよね?
それを無効にすることはできるのでしょうか?

よろしくお願いします。


2388 Re^2: TProgressのインストール コメント数：　 0件
　 DelNov 2002/11/02 (土) 10:33
インストールできました。ありがとうございます。


2387 Re: TProgressのインストール コメント数：　 1件
　 本田勝彦 2002/11/01 (金) 22:17
> Delphi6PersonalでTProgressを利用するため、コンポーネントインストールを
> 試みたのですが、bsClearその他で未定義の識別子とエラーが出てしまい失敗し
> ました。
> 　エラーの出ている識別子は別で定義されるもののようですが、さっぱり要領を
> 得ず困っています。パスの設定等で何処をチェックすればいいですか？

uses 節に Graphics を追加して下さい。


2386 TProgressのインストール コメント数：　 2件
　 DelNov 2002/11/01 (金) 09:00
Delphi6PersonalでTProgressを利用するため、コンポーネントインストールを
試みたのですが、bsClearその他で未定義の識別子とエラーが出てしまい失敗し
ました。
　エラーの出ている識別子は別で定義されるもののようですが、さっぱり要領を
得ず困っています。パスの設定等で何処をチェックすればいいですか？


2385 Re: URLやメールへのジャンプ コメント数：　 0件
　 にしの 2002/10/28 (月) 10:34
> TEditorでは、URLやメールを別の色で表示させることができますが、そこの部分をクリック等して、そのURLやメールのアドレスをアプリケーション側で知る事はできるのでしょうか。

サンプルにそういう機能が実装されています。
TokenFromCaretでキャレット位置のトークンが何かを判断して、TokenStringFromCaretでトークン文字列を取得ですね。


2384 URLやメールへのジャンプ コメント数：　 1件
　 TEditorFan 2002/10/28 (月) 10:05
TEditorでは、URLやメールを別の色で表示させることができますが、そこの部分をクリック等して、そのURLやメールのアドレスをアプリケーション側で知る事はできるのでしょうか。
よろしくおねがいします。


2383 Re^2: BCB5へのインストールについて コメント数：　 0件
　 peka　　| 2002/10/23 (水) 22:08
さっそくのお返事ありがとうございます。
残念ながらQ&Aや調べた方法ではうまくいきませんでした。。
以前BCB4ではうまくいけたので、バージョンを落として利用してみようと思います。


2382 Re^7: PerlFountain不具合? コメント数：　 0件
　 本田勝彦 2002/10/22 (火) 06:03
> 特に問題ないように思います。

修正版を公開しました。ver 1.02 になります。
ご指摘に感謝です。


2381 Re^6: PerlFountain不具合? コメント数：　 1件
　 sakazuki 2002/10/22 (火) 00:55
　http://homepage2.nifty.com/sakazuki
> procedure TPerlFountainParser.DollerProc;
(省略)
> でよいように思いますが、どうでしょう。
特に問題ないように思います。


2380 Re^5: PerlFountain不具合? コメント数：　 2件
　 本田勝彦 2002/10/21 (月) 21:03
procedure TPerlFountainParser.DollerProc;
// $
begin
if FElementIndex = NormalElementIndex then
begin
if (FP + 1)^ in PerlVarChars then
begin
FToken := toScallarVar;
Inc(FP);
if FP^ in ['0'..'9'] then
begin
Inc(FP);
while FP^ in ['0'..'9'] do
Inc(FP);
end
else
begin
Inc(FP);
while FP^ in PerlVarChars do
Inc(FP);
end;
end
else
if (FP + 1)^ in ScallarVarChars then
begin
FToken := toScallarVar;
Inc(FP, 2);
end
else
SymbolProc;
end
else
SymbolProc;
end;

でよいように思いますが、どうでしょう。


2379 Re: BCB5へのインストールについて コメント数：　 1件
　 本田勝彦 2002/10/21 (月) 11:25
TEditor Q&A のページにも情報がありますが、だめですか？
yahoo で TEditor builder 5 などをキーワードに検索すると
結構色々出てきます。


2378 BCB5へのインストールについて コメント数：　 2件
　 peka　　| 2002/10/20 (日) 22:49
はじめまして！
このたびTEditorを見つけて、使ってみようと思っているpekaといいます。

さっそくインストールをしようと思ったのですが、大量のリンカエラー（総勢130以上）が発生してしまいできません(TT)
Help、掲示板などで説明されている方法で行いましたが、

[リンカ エラー] 外部シンボル '__tpdsc__ Heditor::TEditorCaret' が未解決（C:\PROGRAM FILES\BORLAND\CBUILDER5\LIB\HEDIT\HEDTPROP.OBJ が参照）

といったようなエラーがたくさん出てしまいます。。

こういった質問は恐縮なのですが、解決方法をどなたか教えていただければ幸いです。


2377 Re^4: PerlFountain不具合? コメント数：　 3件
　 本田勝彦 2002/10/20 (日) 14:06
> Perlの仕様はよくわかりませんが、上記の修正でも問題なさそうです。

もう少し調べて見ます


2376 Re: HTMLFountainで質問 コメント数：　 0件
　 本田勝彦 2002/10/20 (日) 14:05
> protected
> FTagTokenIndex: Integer;
> FEqual: Boolean;
> FTagSlush: Boolean;

全然使われてませんね。ゴミだと思います。^^;


2375 Re^3: PerlFountain不具合? コメント数：　 4件
　 sakazuki 2002/10/20 (日) 00:25
　http://homepage2.nifty.com/sakazuki
> これは、$ につづく PerlVarChars があったとき、$ が連続している場合もスキップするための処理だったと思います。
>
> なので、
>
> while FP^ = '$' do
>
> で良いような気もしますが、いかがでしょう

Perlの仕様はよくわかりませんが、上記の修正でも問題なさそうです。


2374 HTMLFountainで質問 コメント数：　 1件
　 Km　　| 2002/10/19 (土) 23:23
どうもです。特に問題はないのですが、ちょっと気になっているので質問
します。THTMLFountainParserで以下のメンバは何ですか？なんかの名残で
しょうか。

protected
FTagTokenIndex: Integer;
FEqual: Boolean;
FTagSlush: Boolean;


2373 Re^2: PerlFountain不具合? コメント数：　 5件
　 本田勝彦 2002/10/19 (土) 23:04
ご指摘感謝です。

> 内の482行目を
> while not (FP^ in PerlVarChars) do

これは、$ につづく PerlVarChars があったとき、$ が連続している場合もスキップするための処理だったと思います。

なので、

while FP^ = '$' do

で良いような気もしますが、いかがでしょう


2372 Re: PerlFountain不具合? コメント数：　 6件
　 sakazuki 2002/10/19 (土) 19:50
　http://homepage2.nifty.com/sakazuki
procedure TPerlFountainParser.DollerProc;
内の482行目を
while not (FP^ in PerlVarChars) do
から
while not (FP^ in PerlVarChars + ['$']) do
と修正することでとりあえず、回避できます。


2371 PerlFountain不具合? コメント数：　 7件
　 sakazuki 2002/10/19 (土) 10:06
　http://homepage2.nifty.com/sakazuki
sakazukiです。
PerlFountain1.0.1
ですが、以下の場合に描画にゴミがまじります。
PerlVarに色を付ける設定をしておいて

sub targparser ($$) {

sub addarch($$$$$$$){

$が続くような時に発生するようです。


2370 Re^3: 予約語について コメント数：　 0件
　 KNT 2002/10/18 (金) 12:59
本田さん、Kmさん、回答ありがとうございます。
やっぱり、できないのですね。
他の方法を模索してみようと思います。

R2Fountain 大変参考になりました。
色々と弄くってみようと思います。

KmさんのEditorExも使わせていただいております。
正規表現が使えるのは便利ですね。


2369 JSPFountain コメント数：　 0件
　 Km　　| 2002/10/18 (金) 12:08
　http://homepage2.nifty.com/Km/
HTMLFountainとR2Fountainを参考に、JSPFountainを作成しました。
が、JSPの開発はしたことが無いので、複雑なソースの時きちんと動作しているかわかりません。(^^;;;
あと、スクリプトとHTML部分の違いがはっきりわかればいいかなっという思想のもと作っているので、スクリプト中はコメントと文字列以外は一色です。


2368 Re^2: 予約語について コメント数：　 1件
　 Km　　| 2002/10/18 (金) 11:51
> > 記号を含めて予約語とする方法があったら
> > 教えていただけるとありがたいです。
>
> ヘルプの ReserveWordList のトピックにもあるように、パーサーが切り出した語句が、予約語リストにあるかどうかという判別方式になりますので、[test などは認識出来ません。Km さんの TEditorEx を利用すると、正規表現で予約語を指定できますので、お望みの動作を実現出来ると思います。

正規表現による検索はできますが、予約語としては指定できません。(一瞬できるのかと思って、試しましたがやはりできませんでした)


2367 Re: 予約語について コメント数：　 2件
　 本田勝彦 2002/10/18 (金) 10:08
> 記号を含めて予約語とする方法があったら
> 教えていただけるとありがたいです。

ヘルプの ReserveWordList のトピックにもあるように、パーサーが切り出した語句が、予約語リストにあるかどうかという判別方式になりますので、[test などは認識出来ません。Km さんの TEditorEx を利用すると、正規表現で予約語を指定できますので、お望みの動作を実現出来ると思います。


2366 予約語について コメント数：　 3件
　 KNT 2002/10/18 (金) 00:29
はじめまして、KNTと申します。
予約語についての質問なのですが、
[test と予約語に指定しても上手くいきません。
[ を省くと問題ないのですが…。
記号を含めて予約語とする方法があったら
教えていただけるとありがたいです。


2365 Re^3: 文字挿入/削除イベント コメント数：　 0件
　 本田勝彦 2002/10/16 (水) 11:16
> 入力されていて、「い」のうしろで「うえ」と入力確定したら、2番目の文字のうしろに2文字入力されたよ、ということが知りたいのです。

TEditor は行単位で文字列を更新しているので、残念ながら、お望みの機能を実現するのはむつかしいと思います。

キー入力のみならず、クリップボードからの張り付けなどにも対応しなければなりませんよね。

ソースコード中で UpdateList を呼び出している部分全部に改造を行えば
可能かもしれませんが、かなり大変だと思います。


2364 Re^2: 文字挿入/削除イベント コメント数：　 1件
　 TEditorFan 2002/10/13 (日) 11:17
> キャレット位置から Row, Col を求める PosToRowCol メソッドはありますが、
> お望みの動作をもう少し詳しく、具体的に提示して頂けますでしょうか？

すみません、出来るのかもしれませんが、挿入の場合、エディタで「あいお」と
入力されていて、「い」のうしろで「うえ」と入力確定したら、2番目の文字のうしろに2文字入力されたよ、ということが知りたいのです。
色をつける上で、「あいお」が黒、「うえ」が赤という色をアプリケーション側で管理したいのです。
削除するときは、「あいうえお」の「うえ」を選択して消したときに、3番目の文字から2文字消された事を知りたいです。
宜しくお願いします。


2363 TEditor ver 2.41 コメント数：　 0件
　 本田勝彦 2002/10/12 (土) 23:40
公開です。Delphi7 対応＆ Quotation プロパティ関連のバグフィックスバージョンです。

また、heverdef.inc も公開しました。Ini/Reg 簡単アクセスコンポなど、
heverdef.inc を利用するコンポのための差し替え用としてご利用下さい。


2362 Re: 文字挿入/削除イベント コメント数：　 2件
　 本田勝彦 2002/10/12 (土) 23:38
キャレット位置から Row, Col を求める PosToRowCol メソッドはありますが、
お望みの動作をもう少し詳しく、具体的に提示して頂けますでしょうか？


2361 Re^4: TEditorの予約語 コメント数：　 0件
　 本田勝彦 2002/10/12 (土) 23:34
> 久々にプログラミングにのめり込みそうな予感です。

TSchemeFountain 楽しみにしています。


2360 文字挿入/削除イベント コメント数：　 3件
　 TEditorFan 2002/10/12 (土) 19:34
いつも勉強になります。
私は弱視者のための、大きな文字のテキストベースの文字装飾ソフトを作ろうとしています。ワープロとはいえませんけども....そのようなソフトです。
文字挿入/削除のイベントが欲しいのですが、これが、何文字目が挿入されたか、何文字目が削除されたかを日本語の文字のインデックスとして取得するにはどうしたらよいでしょうか。

文字の色をアプリケーションで覚えているのですが、これをどのようにして結びつけてよいのか分からずにいます。
色弱の方もいる為に、TEditor上で色をつけるわけではなく、文字で表現します。
ここを何とかヒントを下さいませんでしょうか。


2359 Re^3: TEditorの予約語 コメント数：　 1件
　 笹川賢一 2002/10/12 (土) 00:07
TR2Fountain を弄くっています。TCOBOLFountainが予約語に「−」を含んだものをＯＫにしていましたので、参考にしてAnkProcをoverrideしてみました。
->を含む予約語も認識してくれました。今のところ猿真似でコードを書いてる程度なのですが、理解できてきたらTSchemeFountainを作成してみたいものです。

久々にプログラミングにのめり込みそうな予感です。


2358 Re^2: UrlCharsに,を含めて欲しい コメント数：　 0件
　 CHEEBOW 2002/10/11 (金) 19:16
> UrlChars は、グローバル変数なので、アプリの初期化部で
> UrlChars := UrlChars + ',';
> などとして下さい。
>
> このためだけに新しいバージョンをリリースするのはいやぢゃ^^;
　了解です！（笑）
　この方法で対応してみます。
　ありがとうございました。


2357 Re^2: TEditorの予約語 コメント数：　 2件
　 笹川賢一 2002/10/11 (金) 07:16
本田さん　こんにちは

ご教示ありがとうございました。早速、とりかかりたいと思います。
ありがとうございました。


2356 Re: UrlCharsに,を含めて欲しい コメント数：　 1件
　 本田勝彦 2002/10/11 (金) 00:07
> はじめまして。
> ちょっと要望があります。
> これは、自分でソースを弄ってしまえばいいことなんですけど。^^;
> heUtils.pasで定義されているUrlCharsに,（カンマ）を含めて欲しいのです。
> RFCを見てみましたが、一応予約文字になっているみたいですし。
> どうでしょう？

UrlChars は、グローバル変数なので、アプリの初期化部で
UrlChars := UrlChars + ',';
などとして下さい。

このためだけに新しいバージョンをリリースするのはいやぢゃ^^;


2355 Re: 折り返しのインデント コメント数：　 0件
　 本田勝彦 2002/10/11 (金) 00:06
> いつもお世話になります。
> WrapByteで折り返されたものを元のインデントにあわせて整形することはできますか？

えとね、ヘルプにもあるように、折り返し表示されている行と、インデントすることによって折り返されてしまう行は、インデントすることが出来ない実装になっています。

実装するのであれば、選択されている全行の先頭部分の空白を除去した状態の各行文字列を取得して、必要な空白を先頭に挿入するかたちで折り返し処理を行い、選択された全行文字列と入れ替えるという作業になると思います。

実装したくないっす^^;


2354 Re: Delphi7インストール コメント数：　 0件
　 本田勝彦 2002/10/11 (金) 00:00
> Delphi7が来たのでインストールしてみました、
> 付属のおまけ？ＣＤに、TEditor入ってましたね。

このおまけＣＤは、pro, ent 版だけに付属するのでしょうか？
当然か^^;

D7 personal 版の人は対応版がないということですねぇ
近いうちに、こちらでも公開したいと思います。


2353 Re: TEditorの予約語 コメント数：　 3件
　 本田勝彦 2002/10/10 (木) 23:57
> integer->char　のようなキーワードを１つの予約語したいのですがどうしたらいいでしょうか？

これは、Km さん作の TEditorEx をお使い下さい。正規表現で予約語が指定出来ますので、対応可能だと思います。


> ２種類以上の色分けをするにはどうしたらいいでしょうか？
> 例えば、define　は茶色、sub1　は青　のようにです。

これは、予約語リストを２つ持つ Fountain をこしらえないとだめですね。
というわけで、開発日誌のページにそういう Fountain コンポーネントを置きました。 TR2FountainParser, TF2Fountain

お使いの Fountain の派生元をこれらにすれば、予約語リスト２個おっけーになると思います。お試し下さいまし。


2352 Re: RubyFountain コメント数：　 0件
　 本田勝彦 2002/10/10 (木) 23:54
> みずほさんの開発された、RubyFountainの公開を引き継ぎました。
> http://homepage2.nifty.com/sakazuki/delphicompo.html
>
> 今後は、こちらで公開します。

みずほさんはどうされたのでしょうかねぇ・・・日記は更新されているようですが。
これからもよろしくお願い致します。


2351 UrlCharsに,を含めて欲しい コメント数：　 2件
　 CHEEBOW 2002/10/10 (木) 21:13
はじめまして。
ちょっと要望があります。
これは、自分でソースを弄ってしまえばいいことなんですけど。^^;
heUtils.pasで定義されているUrlCharsに,（カンマ）を含めて欲しいのです。
RFCを見てみましたが、一応予約文字になっているみたいですし。
どうでしょう？