喫茶XRAYトップページ

[▲前のスレッド]
[10640] 最近更新した記事返信　削除
2017/1/4 (水) 22:29:27 Mr.XRAY
[Delphi の無料ダウンロード版] に
[Delphi のフレームワーク - VCL と FireMonkey]
を追加しました．
http://mrxray.on.coocan.jp/Delphi/Others/Delphi_Starter.htm#03

[932_Google Chrome ブラウザコントロール] に
[15_Google 検索ページの URL と「Chrome は古いバージョンです」等 ]
を追加しました．
http://mrxray.on.coocan.jp/Delphi/plSamples/932_GoogleChromeControl.htm#15

[10644] Re:最近更新した記事返信　削除
2017/1/8 (日) 11:02:05 Mr.XRAY
以下に DEKO さんとこと山本さんのブログの検索用を追加しておきました．
どちらのサイトも検索機能がありますが，Google で検索したい場合用です．
山本さんのところは Google にクロールされるのが早いようです．
DEKO さんのところは確認していません．

FireMonkey 関係を調べる時は FireMonkey を検索語句に含めてください．

[Google 検索エンジンでオンラインヘルプを検索]
http://mrxray.on.coocan.jp/Delphi/Others/A_Delphi_OnlieHelp.htm#08

[10671] Re:最近更新した記事返信　削除
2017/1/14 (土) 15:12:40 Mr.XRAY
以下のサンプルを追加しました．

[882_テキストをバイナリデータ形式で保存]
http://mrxray.on.coocan.jp/Delphi/plSamples/882_TextSaveBinary.htm

TBytesStream が使えないバージョンの Delphi では TStream でも OK です．
02 のサンプルは，比較的新しいバージョンの Delphi 用ということになります．

[10672] Re2:最近更新した記事返信　削除
2017/1/14 (土) 16:22:17 Mr.XRAY
> 以下のサンプルを追加しました．
>
> [882_テキストをバイナリデータ形式で保存]
> http://mrxray.on.coocan.jp/Delphi/plSamples/882_TextSaveBinary.htm

よく考えてみたら，最初のサンプルは単に UTF-16 で保存しいてるだけですね．
だめだ !! (汗)
最初のサンプルは削除しておきます．

[10674] テキストデータの暗号化返信　削除
2017/1/16 (月) 12:40:06 Mr.XRAY
エンバラデロのフォーラムに

>とりあえず、簡単に読めなくするのが目的です。

  (↑ 最初からそう言えばねぇ...)

という書き込みがありましたので，以下のサンプルを追加してみました．
ネット上にある昔のコードと違い，TBytesStrea, TEncoding を使用しているので，
コードがかなり短くなっています．

[882_テキストをバイナリデータ形式で保存]
[03_データの暗号化と復号化 ( 簡易版 )]
http://mrxray.on.coocan.jp/Delphi/plSamples/882_TextSaveBinary.htm#03

[10675] Re:テキストデータの暗号化返信　削除
2017/1/17 (火) 00:21:41 KON
▼ Mr.XRAYさん

> [882_テキストをバイナリデータ形式で保存]
> [03_データの暗号化と復号化 ( 簡易版 )]
> http://mrxray.on.coocan.jp/Delphi/plSamples/882_TextSaveBinary.htm#03

読みました〜
XorBytesStreamの関数の処理内容を色々と変更すれば、
独自の暗号化プログラムが出来て面白そうですね。
バイトローテートシフト、バイトスワップ、あとダミーバイトを入れるとか^^
そのロジックパターンを数10種類作って、ロジックパターン番号を埋め込めば、
もう複合化プログラムが無ければ作った本人でも読めなさそうですね（笑）

[10679] 簡単とは?返信　削除
2017/1/18 (水) 15:29:25 Mr.XRAY
> >とりあえず、簡単に読めなくするのが目的です。
>
>   (↑ 最初からそう言えばねぇ...)

この「簡単に」の簡単とはどのような操作の意味するのかは分かりません．
もしかしたら，こういうことも含まれるのかな ?
ということで，コードの下に [備考] として追記しておきました．

# 取説を書いたとします．
# その取説に「このテキストは簡単には読めません」
# と書いてあったとして，その取説を読んだ人はどう解釈するんでしょうね．

[10680] Re:簡単とは?返信　削除
2017/1/18 (水) 16:46:57 SO@まだ魔女の一撃中
▼ Mr.XRAYさん
> > >とりあえず、簡単に読めなくするのが目的です。

zipファイルにして、拡張子をbinとかにするのも１つの手かも？
[10681] Re2:簡単とは?返信　削除
2017/1/18 (水) 17:01:12 Mr.XRAY
▼ SO@まだ魔女の一撃中さん

> zipファイルにして、拡張子をbinとかにするのも１つの手かも？

これもありですね．ziP の操作はプログラムからできますから．
考えればいろいろあります．
そう言えば，Office 2007 以降の ZIP 形式のエクセルやワードの文書も
「簡単」には見ることができませんね．

ということで，[備考] の文章に追加させていただきました (^^;

[10682] Re:簡単とは?返信　削除
2017/1/18 (水) 20:19:27 Mr.XRAY
> > >とりあえず、簡単に読めなくするのが目的です。
> >
> >   (↑ 最初からそう言えばねぇ...)
>
> この「簡単に」の簡単とはどのような操作の意味するのかは分かりません．
> もしかしたら，こういうことも含まれるのかな ?
> ということで，コードの下に [備考] として追記しておきました．

[備考] から格上げしました．

[04_ユーザに変更されたくないテキストや画像の扱い]
http://mrxray.on.coocan.jp/Delphi/plSamples/882_TextSaveBinary.htm#04

おかげ様でレスの準備が整いました．
質問された方が，実際にはどんなことが目的かによって，レスの内容を
考えたいと思います．
その前に，他の人がレスしてまうかも知れませんか (笑)

[XMLデータをバイナリ形式でシリアル化したいのですが]
https://forums.embarcadero.com/thread.jspa?threadID=245817&tstart=0

「シリアル化」の意味はまだ謎のままです．

[10686] Delphi 10.1 Berlin Starterでデータベース返信　削除
2017/1/21 (土) 19:33:17 Mr.XRAY
どこかで「エンバカデロは本気です」というような話を聞きました (?)
ほんだば，こんな記事があってもいいのかな ? と書きました．

[564_Delphi 10.1 Berlin Starter で JET データベース]
http://mrxray.on.coocan.jp/Delphi/plSamples/564_ZeosLib_DelphiBerlin.htm

なんで Paradox のサンプルがあるのか ?
いいじゃないですか，あったって !!

[10687] Re:Delphi 10.1 Berlin Starterでデータベース返信　削除
2017/1/21 (土) 20:26:09 Mr.XRAY
> [564_Delphi 10.1 Berlin Starter で JET データベース]
> http://mrxray.on.coocan.jp/Delphi/plSamples/564_ZeosLib_DelphiBerlin.htm

記事とサンプルを掲載したので，ググってみました．

「delphi ZeosLib ADO」
「delphi ZeosLib mdb」

ほとんどない.... ウッウッウ．
ほとんど需要がないということなのね．そうなのね．そうなのかしら...

[10688] Re2:Delphi 10.1 Berlin Starterでデータベース返信　削除
2017/1/21 (土) 23:06:52 taka
▼ Mr.XRAYさん
> > [564_Delphi 10.1 Berlin Starter で JET データベース]
> > http://mrxray.on.coocan.jp/Delphi/plSamples/564_ZeosLib_DelphiBerlin.htm
>
> 記事とサンプルを掲載したので，ググってみました．
>
> 「delphi ZeosLib ADO」
> 「delphi ZeosLib mdb」
>
> ほとんどない.... ウッウッウ．
> ほとんど需要がないということなのね．そうなのね．そうなのかしら...
メモ帳代わりにしていた mdbが壊れて 痛い目にあったことがあるので
mdb は使わない派です。

Paradox と firebird と mysqlは破損したことはないです。

Starterをインストールするだけで、一度も使わずに終わっているんですよね。
Starterで簡単にDBを扱えないと思っていたのでありがたい情報です
必要になったときにZeosLibをインストールさせてもらいます。

[10689] Re3:Delphi 10.1 Berlin Starterでデータベース返信　削除
2017/1/21 (土) 23:59:40 Mr.XRAY
▼ takaさん

> メモ帳代わりにしていた mdbが壊れて 痛い目にあったことがあるので
> mdb は使わない派です。

それが一番無難です．ハイ．
Nifty Forum の時代にも結構話題になっていましたからね．
ある人がマイクロソフトに問い合わせたら，
SQL Server をお使いくださいと言われたそうです．しかも回答は有料 !!

昔，Delphi で Access に接続したい，とかいう質問があったので，
ZeosLib を使えばデータベースの接続ができます．という文章だけではと思った
のでございます．
今はそういう方はいなくなったのかも知れません．
 
> 必要になったときにZeosLibをインストールさせてもらいます。

多分ないでしょう (笑)
あるとしたら，誰かに訊かれた時ぐらいかも.... (^^;

[10691] Re:Delphi 10.1 Berlin Starterでデータベース返信　削除
2017/1/22 (日) 19:49:45 taki
▼ Mr.XRAYさん

> [564_Delphi 10.1 Berlin Starter で JET データベース]
> http://mrxray.on.coocan.jp/Delphi/plSamples/564_ZeosLib_DelphiBerlin.htm
>


564_ZeosLib_DelphiBerlin.zip を解凍(←おっさん)してサンプルを試しました。

Windows7 Pro 32Bit SP1で試すと

01_ZeosLib_TZTable 正常
02_ZeosLib_TZQuery 正常
03_ZeosLib_JET2010 正常

04_ZeosLib_ParadoxDB

Project1.exe
Button1をクリックすると、
「外部データベース ドライバ(11265)で予期しないエラーが発生しました。.」
のダイアログが表示されます。

念のために

Windows10 Pro 64bitで試すと

05_ZeosLib_TZTable 正常
06_ZeosLib_TZQuery 正常

でも、
「WindowsによってPCが保護されました
Windows SmartScreenは認識されないアプリの起動を停止しました。
このアプリを実行すると、PCに問題が起こる可能性があります。」と表示され
「実行しない」ボタンしかなくて試せないじゃん。
詳細情報 をクリックすると「実行」のボタンが出たので試せた。

07_ZeosLib_JET2010は

Button1をクリックすると
「プロバイダーが見つかりません。正しくインストールされていない可能性があります。.」
とダイアログが出ます。

08_ZeosLib_ParadocDBは

Button1をクリックすると
「参照順序が正しくありません。.」
とダイアログが出ます。

あと、何故Win7の解凍は01〜04でWin10の解凍は05〜08なんだろう？
間違って２回解凍したか？

新しいWin10は「Delphi10.1 Berlin Starter」をインストールするだけに
購入しました。(T_T)
なので、アクセスとかデータベースの類は一切入っていません。

[10692] ダウンロードしたZIP内のファイル名の違い返信　削除
2017/1/22 (日) 21:18:19 Mr.XRAY
▼ takiさん

わわっ，taki さん，テストして頂いたんですか．
ありがとうございます．
わかるところから．

> あと、何故Win7の解凍は01〜04でWin10の解凍は05〜08なんだろう？
> 間違って２回解凍したか？

実は，記事の各項目の番号に合わせて名前，番号だけですが，変更しました．
スミマセン．よくやることなんです．

[10693] プロバイダーが見つかりません返信　削除
2017/1/22 (日) 21:24:55 Mr.XRAY
▼ takiさん

> 07_ZeosLib_JET2010は
>
> Button1をクリックすると
> 「プロバイダーが見つかりません。正しくインストールされていない可能性があります。.」
> とダイアログが出ます。

PC にインストールされているエクセルとか，ワードのバージョンが
Office 2007 以降であれば動作すると思います．
それらがインストールされていない場合は，そのエラーとなります．

対処方法は，以下の記事にあるマイクロソフトのサイトから
再配布可能なコンポーネントをインストールする必要があります．

[04_Microsoft Access データベース エンジン 2010 を使用した接続]
http://mrxray.on.coocan.jp/Delphi/plSamples/590_ADO_Excel.htm#04

[10694] 参照順序が正しくありません返信　削除
2017/1/22 (日) 21:26:55 Mr.XRAY
▼ takiさん

> 08_ZeosLib_ParadocDBは
>
> Button1をクリックすると
> 「参照順序が正しくありません。.」
> とダイアログが出ます。

これは，以下のサンプルで設定して回避するしかありません．

[01_「照合順序が正しくありません」の回避]
http://mrxray.on.coocan.jp/Delphi/plSamples/568_ADO_Paradox.htm#01

[10695] WindowsによってPCが保護されました返信　削除
2017/1/22 (日) 21:32:27 Mr.XRAY
> 「WindowsによってPCが保護されました

以下を参考にして，ダウンロードした ZIP ファイルのでロックを解除して
みてください．

[EXE 起動時の [ 不明な発行元 ] ダイアログを非表示にする]
http://mrxray.on.coocan.jp/Delphi/Others/SecurityDialog.htm

その他はこれから考えます．(^^;

[10696] 予期しないエラーが発生しました返信　削除
2017/1/22 (日) 22:37:32 Mr.XRAY
> 04_ZeosLib_ParadoxDB
>
> Project1.exe
> Button1をクリックすると、
> 「外部データベース ドライバ(11265)で予期しないエラーが発生しました。.」
> のダイアログが表示されます。

思い出しました．
これですね．Windows Vista 以降の 32 ビットの Windows では．
Paradox にアクセスするプログラムは，この例外が発生します．
管理者権限で実行すれば動作します．

もちろん，参照順序の設定はしておく必要があります．
原因は分かりせん．というより追及していません (^^;

[10697] Re:予期しないエラーが発生しました返信　削除
2017/1/22 (日) 23:31:08 taka
▼ Mr.XRAYさん
> > 04_ZeosLib_ParadoxDB
> >
> > Project1.exe
> > Button1をクリックすると、
> > 「外部データベース ドライバ(11265)で予期しないエラーが発生しました。.」
> > のダイアログが表示されます。
>
> 思い出しました．
> これですね．Windows Vista 以降の 32 ビットの Windows では．
> Paradox にアクセスするプログラムは，この例外が発生します．
> 管理者権限で実行すれば動作します．
>
> もちろん，参照順序の設定はしておく必要があります．
> 原因は分かりせん．というより追及していません (^^;
思い切っていれてました。
そして、berlinでの初コンパイル！！
マイアプリを差し置いて、Zeosちゃんが、初コンパイルになるとは思ってもいなかったです。

ざっとGoogleさんで調べてみたところ、
UACがからんでいて通常ユーザーでは無理なので管理者権限つけて
起動しましょうってことでした。

プロジェクトオプション
 アプリケーション
  マニフェストファイル
    □ 管理者権限の有効化 にチェックする

代償として IDEからは、
エラー
プロセスを生成できません: 要求された操作には管理者特権が必要です。.
になりますけど

[10698] Re2:予期しないエラーが発生しました返信　削除
2017/1/22 (日) 23:42:16 Mr.XRAY
▼ takaさん

> 思い切っていれてました。
> そして、berlinでの初コンパイル！！
> マイアプリを差し置いて、Zeosちゃんが、初コンパイルになるとは思ってもいなかったです。

ハハハッ．Delphi Berlin も喜んでいることでしょう．
もしかしたらエンバカデロさんも．

 
> エラー
> プロセスを生成できません: 要求された操作には管理者特権が必要です。.
> になりますけど

下の図ですね．
Delphi の IDE を管理者権限で起動してみてくださいませ．


[10699] Re3:予期しないエラーが発生しました返信　削除
2017/1/22 (日) 23:45:17 Mr.XRAY
> 下の図ですね．
> Delphi の IDE を管理者権限で起動してみてくださいませ．

大元の bds.exe を設定しておくと便利です．

[プロジェクトの開き方 ]
http://mrxray.on.coocan.jp/Delphi/Others/WindowsVista.htm#04

[10703] Re:予期しないエラーが発生しました返信　削除
2017/1/24 (火) 10:49:46 taki
▼ Mr.XRAYさん
> > 04_ZeosLib_ParadoxDB
> >
> > Project1.exe
> > Button1をクリックすると、
> > 「外部データベース ドライバ(11265)で予期しないエラーが発生しました。.」
> > のダイアログが表示されます。
>
> 思い出しました．
> これですね．Windows Vista 以降の 32 ビットの Windows では．
> Paradox にアクセスするプログラムは，この例外が発生します．
> 管理者権限で実行すれば動作します．
>
> もちろん，参照順序の設定はしておく必要があります．
> 原因は分かりせん．というより追及していません (^^;

サンプルのプログラムを管理者として実行すると正常に動きました。

[10704] Re2:予期しないエラーが発生しました返信　削除
2017/1/24 (火) 11:37:43 Mr.XRAY
> サンプルのプログラムを管理者として実行すると正常に動きました。

管理者権限でないと動作しないというのは，本当は困るんですが，
しょうがないですね．原因追及もする気ないし...
Paradox はですね，もう，わざわざ新規に使う必要ないでしょうし．

そういう意味も含めてのサンプルと考えてくださいませ．

[▼次のスレッド]
INCM/CMT
Cyclamen v3.82