この発言は
#00561　熊谷秀武        さんのeval:関数電卓つきグリッド(３００行)
に対するコメントです

この発言に対し以下のコメントが寄せられています

#00563　らせん企画      さん　RE^2:eval:関数電卓つきグリッド(３００行)





》　静的項目を作って、OnSetText イベントに次のように記述すると関数電卓
付
》きのＤＢグリッドやＤＢエディットになります。

　と書いてしまいましたが、今実験したら、数値項目だとマスクがかかって
いて、数字と＋−以外は入れられませんね。入力可能にする方法はあるのか
な？。聞いてみよう。無理かも？。大言壮語してごめんなさい。

　「プラスマイナスの計算が可能なグリッド」になるだけでした。

　−−

》  procedure EvalError( const msg:string );
》  begin
》    raise exception.create( copy(s,1,p)+' <-err:'+Msg+'
》'+copy(S,p+1,255) );
》  end;

　この部分は半角スペース（一個）の文字列が折り返されてしまいました。
本来は次のとおりです。

  procedure EvalError( const msg:string );
  begin
    raise exception.create( copy(s,1,p)+' <-err:'
      +Msg+' '+copy(S,p+1,255) );
  end;

　−−

》function Power( v1,v2:extended ):extended;

　power はデルファイ２以降では標準であるかもしれません。

　標準の power(-3,3) はちゃんと−２７を返しますか？。

                              98/6/11(Thu) GGB03124 熊谷秀武


Original document by 熊谷秀武        氏 ID:(GGB03124)

ここにあるドキュメントは NIFTY SERVEの Delphi Users' Forum の16番会議室「玉石混淆みんなで作るSample蔵」に投稿されたサンプルです。これらのサンプルはボーランド株式会社がサポートする公式のものではありません。また、必ずしも動作が検証されているものではありません。これらのサンプルを使用したことに起因するいかなる損害も投稿者、およびフォーラムスタッフはその責めを負いません。使用者のリスクの範疇でご使用下さい。