2007年10月23日火曜日

特定の文字列を説明文に含む命令・関数を抽出する

空色鉛筆の方に載せるサンプルスクリとして書いたものの、ちょっとややこしすぎたのでこちらへ。
HDLがインストールされていないと動作しませんので注意してください。
// 動作条件・SQLele1.10以降
// およびHSP Document Library BETA 0.01 以降が
// インストール済みであること

#include "sqlele.hsp"
#define DB_NAME "hdlbase.xdb"

    chdir dir_exe
    exist DB_NAME
    if ( strsize < 0 ) {
        dialog "データベースファイルが見つかりません。プログラムを終了します。"1
        end
    }

    key_word = "%ボタン%"   // 検索キーワード
                            // %は0文字以上の文字列にマッチ
                            // _は任意の1文字にマッチ
    sql_open DB_NAME

    // キーワードが説明文にマッチする命令・関数名を検索する(昇順ソート)
    sql_q "SELECT Name FROM Help WHERE Inst LIKE " + prm_text( key_word ) + " ORDER BY Name"
    count = stat

    mes "文字列'" + key_word + "'がマッチした項目一覧:"
    repeat count
        mes " - " + sql_v"Name" )
        sql_next
    loop
    mes "以上" + count + "件"

    sql_close
    stop

0 件のコメント: