ab.com コミュニティ

お久しぶりです。 早速ですが質問させてください。 ファイルダイアログで指定された複数のファイルを開こうと、 このページ のコードを書いたのですが、 複数のファイルを開くと、 リストボックスに文字化けした文字が入るときがります。 コードは AB3.x のものだそうなので、 違うのであれば AB5 CP3 のコードにしたいのですが、 どう直せばよいのでしょうか？ Dim ofn As OPENFILENAME Dim buf[MAX_PATH] As Byte Dim lpFileName As BytePtr Dim lpf As Long Dim lpd As Long FillMemory(...

> ありがとうございます!!!
> でも、

ダイアログボックスを取得させるウィンドウハンドル

とは何ですか?

スイマセン、間違いです
「取得」ではなく、「所有」です

> デスクトップやマイドキュメントなどの、特殊フォルダのパスを取得する方法はありますか? > マイドキュメントに自動保存などの機能を付けたいのでできたら教えてください。 ほとんどコピペですが… SHGetSpecialFolderPath() というのを使います。 Declare Function SHGetSpecialFolderPath Lib "shell32.dll" Alias "SHGetSpecialFolderPathA" (hwndOwner As Long,_ lpszPath As String,nFolder As Long,f...

サスペンド / 休止状態にするには、
SetSystemPowerState() でできるはずなのですが、

サスペンド: SetSystemPowerState(TRUE, TRUE)
休止状態: SetSystemPowerState(FALSE, TRUE)

としても、'0' が帰ってきて失敗してしまいます。
管理者権限で動かしてもダメです。

Vista では今までの OS とはやり方が違うのでしょうか？

AB: 5.00.00 (CP3)
OS: Windows Vista SP1 (Note PC)

このトピック長い間放っておいてしまいましたが、
友達の家に行き、何をしたのかメモ帳で再現してもらいました。
すると、ただの友達の思い違いでした。
友達がやったのは、
英文入力中に変換キーを押す→ Enter キーを押す
でした。

英文入力中に変換キーを押すということは、
かな入力にして変換するということなので、
別に IME が悪い訳でもソフトが悪い訳でもなく、
ユーザーである友達がアンポンタンなことを言っていただけでした。

ご迷惑をお掛けし、申し訳ありませんでした。ｍ（＿＿）ｍ


STT さんも、同じことをされているということはありませんよね？

僕が投稿したトピックも参考にしてみてください。

ファイルの関連付け: http://www.activebasic.com/forum/viewtopic.php?t=2188

今、Virtual PC 上の WinME で、
BCC で新たにビルドした同じ DLL 及び初期化を実行すると、
正常に暗号化できました。
恐らく、初期化に失敗したのだと思います。
この初期化を元に戻す方法はないのでしょうか？

> 「第２６４章 暗号化の前準備」のプログラムは実行してますよね？
>
はい、既にやってあります。


> あと、最新のソースを載せてもらえると原因が特定しやすいです。
> （「編集」で↑を毎回更新するといいかと）

初めに載せたコードを現在のものに更新しておきました。

のぶあやさん、わざわざ調べていただきありがとうございます。m(_ _)m
DLL の方はビルドできるようになりました。

しかし、その DLL を使用して暗号化をしようとすると、
また「CryptAcquireContext Error」
と出てしまいます。
また、その DLL を使用するプログラムを新たにデバッグビルド、
ビルドをするとコンパイラがエラーで落ちてしまいます。
DLL がまだダメなんでしょうか？
よくわからないのですが…

> となってるので、
> 第三引数はLen(dwByte)ではなくdwByteだと思うのですが・・・。
>
> BasicのLen(a)とCのsizeof(a)が大体同じだったと思います。


Len を外してビルドしてみましたが、
コンパイラが落ちてビルドできませんでした…。
デバッグビルドはできるのですが…

> よく読んでないのですが、Whileループ内とその直前の二つの WriteFile(hAfter, pbBuf, Len(dwByte), VarPtr(dwResult), ByVal NULL) の第三引数が間違っているように見えてならないのですが、どうなんでしょう？ hOrg = CreateFile(szOrgFile, GENERIC_READ, FILE_SHARE_READ, NULL, OPEN_EXISTING, FILE_ATTRIBUTE_NORMAL, NULL); hAfter = CreateFile(szAfterFile, GENERIC_WRITE, FIL...

返信遅くなってしまい、申し訳ありません。 > 「"Crypt" の初期化」とは、第264章に書いてある内容のことを仰っているのでしょうか？ そのとおりです。 > ということは、他に考えられる点は > > 1) API関数の宣言 > > よく見ると *HCTYPTKEYの*が抜けていた箇所がいくつかあったので修正。 > Declare Function CryptAcquireContext Lib "advapi32" Alias "CryptAcquireContextA" (phProv As *HCRYPTPROV, pszCo...

> こんにちは。ゆちボンです。 > > http://www.activebasic.com/forum/viewtopic.php?t=1758 > このような、現象もありませんか？ > > ほかにも、ツールチップ(命令の引数の説明)が出るときに落ちたり(AB4でもあった)してました。 僕の異常が発生するプロジェクトは、 ツールチップが表示されるときたまに時間がかかり、 そのまま abdev.exe が落ちてしまう時があります。 読み込み始めてから落ちるまでの時間は、 大体 5 秒程度だと思います。 WinXP ではコンパイラのバーだけが表示されてしまう時がありますが、 Vista では発生...

作った DLL で暗号化しようとすると、
「CryptAcquireContext Error」
と出てしまいます。
一度だけエラーが出ずに暗号化を終了したのですが、
それ以降ずっと出てしまいます。
既に "Crypt" の初期化はしてあります。
どうして "CryptAcquireContext" で失敗してしまうのでしょうか？

> WriteFile(hAfter, VarPtr(dwByte), Len( dwByte ) , VarPtr(dwResult), ByVal NULL) > > ReadFile(hOrg, pbBuf, Len( pbBuf ) , VarPtr(dwByte), ByVal NULL) > > といった感じでしょうか。 > 後は細かいですが、C言語で指定する配列の要素数と、ActiveBasicで指定する配列の要素数は意味合いが違います。 > C言語で > > int a[10]; > > と書くと添え字は0～9で要素は10個ですが、これをActiveBasicに移植するときに ...