Ryuzee.com
Webコンサルタントの愚痴とアジャイル,生産性向上,Trac,オープンソースなどの与太話
Categories
FEED
Archives
- 2008 年 11 月 (24)
- 2008 年 10 月 (34)
- 2008 年 9 月 (23)
- 2008 年 8 月 (22)
- 2008 年 7 月 (32)
- 2008 年 6 月 (33)
- 2008 年 5 月 (20)
- 2008 年 4 月 (25)
- 2008 年 3 月 (6)
- 2008 年 2 月 (5)
- 2008 年 1 月 (20)
- 2007 年 12 月 (22)
- 2007 年 11 月 (10)
- 2007 年 10 月 (17)
- 2007 年 9 月 (25)
- 2007 年 8 月 (12)
- 2007 年 7 月 (16)
- 2007 年 6 月 (12)
- 2007 年 5 月 (17)
- 2007 年 4 月 (21)
- 2007 年 3 月 (6)
- 2007 年 2 月 (5)
- 2007 年 1 月 (10)
- 2006 年 12 月 (5)
- 2006 年 11 月 (9)
- 2006 年 10 月 (9)
- 2006 年 9 月 (7)
- 2006 年 8 月 (18)
- 2006 年 7 月 (9)
- 2006 年 6 月 (16)
- 2006 年 5 月 (18)
- 2006 年 4 月 (7)
- 2006 年 3 月 (6)
- 2006 年 2 月 (3)
- 2006 年 1 月 (3)
- 2005 年 12 月 (6)
- 2005 年 11 月 (15)
- 2005 年 10 月 (10)
- 2005 年 9 月 (7)
- 2005 年 8 月 (11)
- 2005 年 7 月 (7)
- 2005 年 6 月 (8)
- 2005 年 5 月 (12)
- 2005 年 4 月 (6)
- 2005 年 3 月 (4)
- 2005 年 2 月 (4)
- 2005 年 1 月 (1)
- 2004 年 12 月 (2)
- 2004 年 11 月 (1)
- 2004 年 10 月 (3)
- 2004 年 9 月 (2)
- 2004 年 8 月 (2)
- 2004 年 4 月 (5)
- 2004 年 3 月 (2)
- 2004 年 1 月 (3)
- 2003 年 12 月 (7)
携帯対応
RING
IHTMLElementCollectionから、特定のFormオブジェクトを取得するには、item関数を利用するのだが、この際、実は引数の渡し方は複数ある。
上記は、要素名がauthと呼ばれる要素のうち一番最初のformを取得する。この場合は第一引数に要素名、第二引数にindex値を指定する。
上記はformの中で、二番目のformを取得する。この場合は、第一引数と第二引数に共に、IHTMLElementCollectionのindex値を指定する。
参考
http://msdn2.microsoft.com/en-us/library/aa703930.aspx
Delphiの話。
色々あって起動中のブラウザで表示中の画面を横取りして、formの項目をfillinしてPOSTしないといけない要件がある。まずはWindowハンドルを元にして、起動中のIEのIWebBrowser2インタフェイスを取得する方法。
var
hInst: HWND;
lRes: Cardinal;
Msg: Integer;
pDoc: IHTMLDocument2;
ObjectFromLresult: TObjectFromLresult;
begin
hInst := LoadLibrary('Oleacc.dll');
@ObjectFromLresult := GetProcAddress(hInst, 'ObjectFromLresult');
if @ObjectFromLresult <> nil then
begin
try
Msg := RegisterWindowMessage('WM_HTML_GETOBJECT');
SendMessageTimeOut(WHandle, Msg, 0, 0, SMTO_ABORTIFHUNG, 1000, lRes);
Result := ObjectFromLresult(lRes, IHTMLDocument2, 0, pDoc);
if Result = S_OK then
(pDoc.parentWindow as IServiceprovider).QueryService(IWebbrowserApp,
IWebbrowser2, IE);
finally
FreeLibrary(hInst);
end;
end;
end;
これでIWebBrowser2のインタフェイスが取得できれば、文書の操作は簡単。
ShowMessage(doc.body.innerHTML);
ブラウザからIHtmlDocument2インタフェイスを取得し、それを通じてhtmlの本体にアクセスできる。
DelphiComponentListerは、あまり人の役に立たない簡単なツール。
Delphi製のアプリケーション（C++Builderもいけると思う）で利用しているコンポーネントの一覧を抽出してくれるツールである。
色々な野良コンポーネントを導入していると、ビルドに必要か必要でないのかの判断が付かなくなってしまうので、利用しているコンポーネントの一覧作成が必要だったのが作成動機。作成時間は60分。
ローカルにおいておくとなくすのでこちらにアップしておく。
単なるメモ。とあるソフトがイベントログを監視しているらしいのでその対応。
Eventlog : TEventLogger;
str : string;
eventType : Integer;
category : Integer;
id : Integer;
source : string;
begin
source := 'Security';
str := 'セキュリティのカテゴリに監査成功を突っ込む';
eventType := Windows.EVENTLOG_AUDIT_SUCCESS;
category := 0;
id := 538;
Eventlog := TEventLogger.Create(source);
try
EventLog.LogMessage(str,eventType, category, id);
finally
Eventlog.Free;
end;
end;
なお,usesにSvcMgrを追加しておく必要がある。
Delphiの良いところはコンポーネントが豊富なこと、ってことで色々見つけては試しているが、今日見つけたこれはなかなか良い。
その名の通り文字列を電光掲示板方式で表示するコンポーネント。
ベータテストが開始してしばらくたつが、DB周りのエラー報告はなかなか出てこない。Nさんからは初期化して登録したらエラーが出るって連絡あるけど、ほかでは出ていないようだ。気持ち悪い。
でこのまま一般公開するとマズイかと思ってさらってみたら、理由がわかった。
原因はテーブル生成時のBDEの設定の問題で、Paradoxのテーブルサイズの制限は
ブロックサイズ*65535
なのだそうだ。そういえば昔はまったかも。
ということでブロックサイズはデフォルトでは2048なので
2048*65535/1024/1024=約127M
こりゃだめだ。
ということで早急に対策モジュールを作成。
自宅のDell Inspironでテスト。最近XPのSP2を適用してからマシンが突然死するようになって夜間放置すると朝にはきっちりｗ電源が落ちている。
ネットで検索したらノートPCの下に足をつけて通気性を向上させると解決するかも、とのことなので実験。
朝起きたらとりあえず正常に動作していた。
なんだかなぁ。
DelphiでMDIフォームのWindowメニューが消える
ので悩んでいたが、WindowMenu に指定するMenuItem に分割線を入れないようすればいいらしい。
Delphi5もいい加減バージョンアップすっかな。
最近またDelphiを触っている。
今の会社に転職する前はパッケージソフトの構築をしていてDelphiを良く触っていたんだけど、Web系のシステム構築が多くなっからぜんぜん触っていなかったので約５年ぶりくらい。久々に昔のソースコード見てみたら、コメントに1998年とか1999年とか書いてある。この世界で考えたら浦島太郎なコードだよｗ。んで内容を見るとあまりにレベルが低い。オブジェクト指向言語を何故名前のCみたいに書いてたんだ？＞俺
自分では気づかないうちに成長してるみたい。
そういうもんかにぃ。
今日のキーワード
SQLite
→Delphiでも使えるオプソなDB
GEXPERTS
昔自分が作ったソフトの後継版を作ろうかと思った。
Delphiなんか久々に触るからもう忘れてそうな悪寒。
でもPerlより全然好き。コンパイルは爆速だし。
Delphiはどんどんバージョンアップされているみたいだけど、Delphi4とか5でそんなに不自由なさそうだな。
日記 PHP オープンソース Linux Trac Perl wordpress フリーソフト Agile 自宅サーバ phpMyFaq Plugin 書評 Delphi apache プラグイン Subversion アジャイル mojavi セキュリティ Ruby Firefox Ajax/Web2.0 eclipse サーバ Zope フレームワーク CakePHP 文字化け scuttle OpenVZ 自宅 phpBB CMS 翻訳・日本語化 Excel ApacheDS 生産性向上 仮想化 hacks CodeIgniter XAMPP LDAP SBM taskfreak Ajax 修正 言語ファイル mod_security ダウンロード HTML::FillInForm 情報共有 格安 メンテナンス 移転 アンケート レンタル PhpScheduleIt 翻訳 API
ads
Recent Posts
最近のコメント
Ryuzeeのお気に入り
- IE のデバッグ環境作った - あーありがち (2008-11-17)
- Oracle Database 10g （XE） インストール（Fedora5） - いこいの森
- Remember The Milk 日本版 公式ブログ » Tips ： メール送信でタスクを追加する（受信箱のメールアドレス）
- エクサイト � CakePHP 1.2の便利なValidation
- BubbleTimer - Achieve your goals through better time management
- "$this->[Model]->save時のエラー" フォーラム - CakePHP Users in Japan
- "複数選択可能なメニュー、チェックボックスでセキュリティエラー" フォーラム - CakePHP Users in Japan
- ORACLE 10G XE WEB ADMIN TOOL - HTTP PORT CHANGE - 1bitのココロ
- Remember The Milk リピート（繰り返し）の入力を極める - Forgot the Milk.
- CakePHP1.2 で同じ名前の複数のチェックボックスの値をコントローラに送る方法 - 夜の Discovery
- AuthComponentのパスワード暗号化を無効にする方法 - Writing Some Code
- Javaフレームワークの比較検討資料公開 - 矢野勉のはてな日記
- 【CakePHP】バリデーションルールの自動作成：『私的』 Bake Modelツール - 『私的』ソフトウェア開発室
- floatingdays: CakePHP 1.2 のFormHelperで日付選択リストを作る
- ユーザーインサイト : どんな読者が、どうサイトを見たかが分かる Web マーケティングツール
- VMware Player, Ubuntu Linux Oracle XE (kimada's weblog)
- CakePHP 入力フォームで確認画面を表示する方法
- Validation | Sun Limited Mt.
- PCに付箋！メモ帳にも！デスクトップ付箋ソフト「メモ箋人」公式サイト：フリーソフト
- "認証関連では“id”の書き換え詐欺に注意。" フォーラム - CakePHP Users in Japan
Mambopress is Mambo/Wordpress Theme made by Ekta Paneri Provided by Domain Registration of Ecommerce Hosting & Web Hosting.
49 queries. 5.492