喫茶XRAY [Mr.XRAY掲示板]

[13608] Delphi のコードを自動生成

返信　削除

2023/4/14 (金) 13:34:40 Mr.XRAY

AI という技術というかテクノロジーに興味はあるのですが，
昨今の AI が，とか，AI がどうのこうの，ということにはあまり興味ありません．
で，やってみました．
質問は「Delphiでテキストをバイナリに変換する方法」です．

------ ここから回答 ------

受信したメッセージ. Delphiでテキストをバイナリに変換する方法は、以下のようになります。 ```

var
  TextFile: TextFile;
  BinaryFile: File of Byte;
  Buffer: array[0..1023] of Byte;
  Count: Integer;
begin
  AssignFile(TextFile, 'Text.txt');
  AssignFile(BinaryFile, 'Binary.bin');
  Reset(TextFile);
  Rewrite(BinaryFile);
  try
    repeat
      BlockRead(TextFile, Buffer[0], SizeOf(Buffer), Count);
      BlockWrite(BinaryFile, Buffer[0], Count);
    until Count = 0;
  finally
    CloseFile(TextFile);
    CloseFile(BinaryFile);
  end;
end;
上記のコードは、テキストファイルをバイナリファイルに変換する方法です1.

詳細情報:
1. petitmonte.com
2. docwiki.embarcadero.com
3. docwiki.embarcadero.com

----  回答はここまで -----

詳細情報はリンクになっていて，以下の URL になっていました．

https://www.petitmonte.com/bbs/answers?question_id=2420

https://docwiki.embarcadero.com/RADStudio/Sydney/ja/%E6%A8%99%E6%BA%96%E3%83%AB%E3%83%BC%E3%83%81%E3%83%B3%E3%81%A8%E5%85%A5%E5%87%BA%E5%8A%9B

https://docwiki.embarcadero.com/RADStudio/Sydney/ja/%E3%83%90%E3%83%AA%E3%82%A2%E3%83%B3%E3%83%88%E5%9E%8B%EF%BC%88Delphi%EF%BC%89
2

[13609] Re:Delphi のコードを自動生成

返信　削除

2023/4/14 (金) 13:41:37 Mr.XRAY

上のコードをそのままコンパイルすると，コンパイルエラーとなります．
単純にコンパイルエラーを回避するように修正しても，実行時にエラーが発生します．

しかし，コードを，実際に自動生成したことは事実でしょう．
少し前にも書き込みかありましたが，スゴイことです．
テキストをバイナリに変換なんて処理は存在しませんが・・・

[13610] AI の行きつく先は・・・

返信　削除

2023/4/14 (金) 20:30:34 Mr.XRAY

AI で思い起こすことがあります．
ノーベル経済学賞を受賞したマイロン・ショールズ博士らか考えた
ブラック・ショールズ方程式です．
金融工学という言葉を生み出す元となった方程式です．

それまはで人の経験と勘による株式市場に物理，数学が使われだしました．
株価だけでなく，様々な金融関係商品の適正価格を算出でき，
株式市場に革命をもたらした数式です．

彼は自ら会社を立ち上げ，成功しました．
しかし，ロシアの経済破綻によって 1998年に破産しました．
コンピュータでは，100 万年に 3 回の確率であるろロシアの経済破綻が起きたのです．

2008 年にはリーマン・ショックがありました．

今や，AI を搭載したコンピュータが自動で，1 秒間に 1 万回以上の売買を行っています．
HFT ( 高頻度取引) と呼ばれるものです．

[▼次のスレッド]

INCM/CMT
Cyclamen v3.82