• ベストアンサー
※ ChatGPTを利用し、要約された質問です（原文：Delphi XE5をアップデートしたら(2)）

Delphi XE5アップデート後の正常な動作はデバッグモードか？

suzukikunの回答

  • ベストアンサー
  • suzukikun
  • ベストアンサー率28% (372/1325)
回答No.1

デバッグモードでの実行だとShowmessage刃で無いときがあった気がします。リリースモードでIDEから実行してみてどうですか？

kihonkana
質問者

お礼

すばやい回答ありがとうございます。 「デバッガを使わずに実行」だとShowMessageのエラーが表示されます。 私のプログラムのミスでもRAD Studioのバグ（というほどのもの）ではないわけですね。 安心しました。

この回答がついた質問に戻る
  1. カテゴリ
  2. [技術者向] コンピューター
  3. プログラミング・開発
  4. その他（プログラミング・開発）

関連するQ&A

  • 正規表現のエラーを区別したい

    Delphi　XE5を使って正規表現のプログラムを作りました。 ... try result_txt := TRegEx.Replace(target, pattern, replace, []); AddButton.Enabled := True; except ShowMessage('正規表現にエラーがあります'); end; ... というようなプログラムですけど、この正規表現のエラーをもう少し詳しく表示できないでしょうか？ （正規表現のエラーコードはいくつかに分かれていないでしょうか？） 正規表現のテストプログラム部分で、target、pattern、replaceともユーザーが入力するようになっています。

  • 正規表現でOR

    正規表現について困っています。 $text = '&a=000&b=111&c=222'; mb_ereg('&b=(.*?)&', $text, $result); 上記のように、スタートを&b=とし、エンドを&とすれば、'b=111'　の中の '111'　 は抽出できます。 ところが、$textには次のようなパターンもあります。 $text = '&a=000&b=111'; この場合、エンドを示す文字が文末のために存在しませんので、 mb_ereg('&b=(.*)', $text, $result); とやれば抽出できます。 やりたいことは、上記の２つのパターンに対応する正規表現を１行で記述したいのです。ORを表す表現を調べていろいろ試したのですが、うまくいきません。 よろしくご指導のほどお願いいたします。

    • ベストアンサー
    • PHP
  • delphiで検索機能を作成したいのですが・・・

    Edit1に数字を打ち込むとMemo1に表示されている同じ数字にカーソルが向かうようにしたいのですが procedure TForm1.Button1Click(Sender: TObject); begin FindAndSel(Edit1.Text,Memo1); end; としてしまうと、同じ数字があった場合でも下の行に移らずに同じ行を参照し続けてしまいます。 検索で表示されたそこから先を更に検索するにはどのようにすれば良いのでしょうか？ また、001と打ってしまうと001 0012の両方が検索に引っ掛かってしまいますが完全に一致した場合のみ表示されるようにするにはどうすれば宜しいのでしょうか？ ご存じの方がいらっしゃればご教授お願いします。また、このＨＰが分かりやすいなどありましたらお教えください。

  • 秀丸の正規表現用DLLをDelphiから使いたい

    秀丸に同梱されている正規表現処理用DLL、HMJRE.DLLをDelphiで使用しようとしているのですが、 うまくいきません。 実行しようとすると「エントリーポイントが見つかりません」と表示されます。 ---------------------- function dllfuncstr(func:String;find_str:String;target_str:String;start_pos:Integer;replace_str:String;kind:Integer):String; external 'HMJRE.DLL'; ... procedure TForm1.Button1Click(Sender: TObject); var find_str, target_str, replace_str:String; start_pos, kind:Integer; begin find_str := '123'; target_str := Memo1.Lines[0]; start_pos := 0; replace_str := 'abc'; kind := 1;// Memo2.Lines[0]:= dllfuncstr('ReplaceRegularNoCaseSence',find_str,target_str,start_pos,replace_str,1); end; ----- 秀丸のヘルプにマクロから呼び出す場合の例 が次のように記載されています。 $s = dllfuncstr( "ReplaceRegular", "([a-z]+)([0-9]+)", "--abcdefg1234567--", 0, "\\2\\1" ); message $s; DelphiのバージョンはXE５です。

  • URL＼正規表現＠java

    perlメモさん？にPerlでのURLの正規表現はあるのですが Javaで使いたいと思います。 Pattern pattern = Pattern.compile("正規表現"); Matcher matcher = pattern.matcher(String); のステートメントを使う方法をご存知な方おられませんか？ Perlメモさん？の正規表現をエディタにコピペしても 不正なエスケープエラー？がでてだめでした。 （http Urlのごちゃごちゃした奴の下から二番目） （「\b(?:」で始まる奴です） なのでエディタに貼り付けて\を\\に置き換えたものを 正規表現の部分にしたところコンパイルはとおりましたが、 正確にマッチしてくれませんでした。 よろしくお願いします。

    • ベストアンサー
    • Java
  • delphi try文の使い方

    下記コードのようにエラーを回避したいのですが、try文が機能せずエラーになります。 procedure TForm1.Button1Click(Sender: TObject); var p:integer; begin edit1.text:='abc'; try p:=strtoint(edit1.Text); except p:=-1; end; label1.Caption:=inttostr(p); end; try文の使い方がわかりません。

  • 【delphi】クラスの継承、互換性について

    //Base.pas TSituation = class(TObject) public 　procedure Update;virtual;abstract; 　procedure Reflect;virtual;abstract; end; //Title.pas TSceneTitle = class(TSituation) private 　・ 　・ 　・ public 　constructor Create; 　destructor Destroy;override; 　procedure Update;override; 　procedure Reflect;override; end; //main.pas（メインフォーム） unit main; interface uses 　・・・, Base, Title; 　　　・ 　　　・ 　　　・ var 　fm_main: Tfm_main; 　Situation: TSituation; --------------------------------------------------- こう、きちんとクラスの宣言も継承もしているのに、（しているはず Situation := TSceneTitle.Create; とすると互換性がないといってコンパイルエラーになります。 なにかおかしいところがあるのでしょうか。

  • 日本語文字列の正規表現

    いつもお世話になっております。 日本語文字列を含む正規表現で悩んでおります。 【比較対象の文字列】 $str1 = "<select name='se'><option value='あいう'>あいう</option><option value='abc'></option></select>"; 【正規表現で置換させたいところ】 $text = "あいう";//ここの箇所だけoption valueが変わるので変数にいれています。 <option value='$text'>$text</option>という文字列が一致したら <option value='$text' selected>$text</option>にselectedを追加して置換したいのです。 下記内容で作ってみたのですが どの辺りがダメなのか検討がつきません。。 恐らくダメなところだらけかと思うのですが。 分かりづらい説明で申し訳ないのですが どなたかご教授お願いします。 $rep ="<option value='".$text."' selected>".$text."</option>"; preg_replace("/<option\s+[^>]*value\s*=\s*([\'\"]?)".$text."([\'\"]?)\s*w+>".$text."<\s+\/\s+option\s+>/i",$rep,$str1,$str2);

    • ベストアンサー
    • PHP
  • 「Text」ではエラーになり、「Value 」だと

    「Text」ではエラーになり、「Value 」だと正常に動く理由がわかりません。 アクセスのフォームを作り、その上にテキストボックスとコマンドボタンを設置しました。 テキストボックスに値をいれ、コマンドボタンを押すと、テキストボックスに値を空白にするコードを考えてたのですが ひとつ疑問が浮かびました。 それは、 Private Sub コマンド2_Click() Me.テキスト0.Text = Null End Sub だとエラーになり、 Private Sub コマンド2_Click() Me.テキスト0.Value = Null End Sub だと正常に動くという事です。 「Text」ではエラーになり、「Value 」だと正常に動く理由がわかりません。 こういうことは何を確認すればわかるのでしょうか？（ヘルプ？オブジェクトブラウザ？） よろしくお願い致します。

  • 開いているアプリをactivateするFindWindowの戻り値について

    FindWindow のreturnValue が、開いているNotePad の場合はちゃんと、０以外の値が戻ってきますが、他のアプリで試しても0しか戻ってきません。はて、どうしてなのでしょうか？MsPaint,WordPad、あるいは自作のアプリ.exe どれもだめです。御教示をお願いいたします。Delphi 6, Windows98 procedure TForm1.Button1Click(Sender: TObject); var hMemo:HWND; begin hMemo := FindWindow('Notepad',nil); if hMemo <> 0 then SetForegroundWindow(hMemo) else ShowMessage('メモ帳が見つかりません'); end;

注目のQ&A

カテゴリ

専門家に質問してみよう

職業から探して質問する
質問する