• ベストアンサー

Delphi 6 で 2進数→10進数変換

kenzo-2000の回答

  • ベストアンサー
回答No.1

> 上手く行きませんでした 何が上手くいかないのか教えていただかないと・・・ と、言いつつ、気になったのでザックリ作ってみました。 Formに「Edit1」「Label1」を配置して、「Edit1Change」に以下コードで試してみてね。 Edit1の値に「0」「1」を入れるとLabel1に出力します。 (申し訳ないけど、入力チェックエラーは行っていません) procedure TForm1.Edit1Change(Sender: TObject); var  Ct1: Integer;  Ret: Integer; begin  Ret:= 0;  for Ct1:= Length(Edit1.Text) downto 1 do  begin   if (StrToInt(Edit1.Text[Ct1]) = 1) then   begin    Ret:= Ret + Trunc(IntPower(2, Length(Edit1.Text) - Ct1));   end;  end;  Label1.Caption:= IntToStr(Ret); end;

ShiroNeko
質問者

補足

説明不足の質問でありながら早速の返答を頂きありがとうございます。Kenzo-2000 さんの指示通り実行したところ上手く行きました。 非常に助かりました。

関連するQ&A

  • Delphi Personal6 と Turbo Delphi

    現在Delphi Personal6(無償版)を使っていますが、Turbo Explorerの中に Turbo Delphi というのがあることを知りました。 両者を比較するとどんな差異などがあるのでしょうか。

  • Delphi2005Personalはどうすれば手に入るの?

    Delphiの勉強をはじめたいと思うのですが、いろいろと検索したところ、 6のPersonal版は手に入ったのですが、 2005Personalはどうなのでしょうか?

  • delphiのヘルプの使い方.

    delphiで分からないことがあったら、どうやって調べていますか? できれば、ネットにつなげられない場合で、お願いします. Borland Delphi 6 Personal版の標準のヘルプは、今一つ使いにくいので、本があればいいのですが. 調べ方が悪かったのでしょうか? 今回は勉強のため、フォルダの中の一覧を表示し、フォルダがあればその中のファイル名・フォルダ名を再帰させて、処理させようとしたのですが、フォルダの中の一覧を表示させるヘルプではメソッドが分かりませんでした. linuxでいう、treeコマンドのようなソフトを作りたかったのですが. 勘違いがあるかもしれませんので、ただ単にフォルダの一覧させるソフトや一覧を調べるメソッドを聞いているのではありません. ヘルプの使い方や調べる効果的な方法を教えてください. ただ、通勤の合間の時間つぶしのdelphiのプログラミングなので、ネット以外での電子データでの効果的な調べ方がいいのですが.やはり難しいでしょうか?

  • delphiのインストールについて

    Vectorさんでdelphi 6 personal版を入手し、インストールしようとしたところ、 登録が必要なようなのでborlandさんのサイトへ行こうとしたのですがアクセスできません。 どうすればよいのでしょうか? 他に手段は無いのでしょうか? 私、学生なんですが、冬休みを利用して言語の勉強をしたいのです。どうしてもDelphiが必要なんです。お願いします・・・。

  • DelphiのPersonal版について・・他

    DelphiのPersonal版について質問させて下さい。 プログラミングの経験は全く無い所からのスタートです。 以前、ここで言語選択の漠然とした質問をさせて頂き、ご回答を踏まえた上で「java」若しくは「Delphi」の何れかを選択しよう!と言う所まで気持ちが固まって来ました。本当はまだ若干の迷いがありランク付けをすると、「Delphi」>「java」>「C」 と言った感じです。 さて前置きが長くなってしまいましたが、 DelphiのPersonal版ではデータベース機能が無いとの事ですが、資産管理ソフト(基本的にデータベースですよね?住所録と同じイメージでいます。)のプログラムは作れないって事なのでしょうか? それとも「データベース機能」の解釈を間違っているのでしょうか? 又、残念ながら資産管理プログラム等を作れないのであれば、この様なプログラムを作る場合「java」と「C」、どちらが向いている言語なのでしょうか?(二択だとした場合です。) 「Delphi」に限らず有償の開発環境もある様ですが、仕事に使いたいと言うよりは、趣味の範囲で勉強出来ればと思い、書籍代位の投資は已む終えないとしても、数万円の出費は今の所考えてません。 また、プログラム自体はスタンドアロンって言うんですか?単体で動く物を作る予定です(出来上がるのは先の先でしょうが・・)。 お手数ですが、ご回答頂ければ幸いです。

  • Delphi初心者向けの本でお勧めのものは

    プログラミング初心者です。 今日、Delphiのパーソナル版をダウンロードしてきました。 初心者向けの書籍を買ってプログラミングの勉強をしたいと思います。 Delphiの初心者向けの書籍の中で、お勧めのものがあったら教えてください。 よろしくお願いします。

  • Delphi入門サイト

    Delphi6 Personalが無料で使えるようなので、ちょっと勉強しようかなと思っています。 参考になるサイトを紹介してください。

  • VB.NETのソースをDelphiに変換したいです

    VB.NETで書いてあるソースをDelphiのソースに書き換えたいのですが、勉強不足でよくわかりません。 有料ででもいいのですが、どこかで変換してくれる会社やプログラマーはいらっしゃらないでしょうか? ちなみにVC#.NET→Delphiに書き換えていただけるところでも構いません。 よろしくお願いいたします。

  • Delphi 6 Personal について

    ずっと前に、無料のDelphi 6 Personalをダウンロードしてインストールしていたのですが、今まで使っていませんでした。 しかし、最近少々暇になってきたので、いじってみようかとも思ったのですが、どうにもよく分かりません。一応、VBには似ているのでとっつきやすそうではあるのですが…… というわけで、質問です。 Delphi 6 Personalでのプログラミングの仕方を載せているホームページを教えてください。VBは少しは出来るので、できればVBからの乗り換えについて詳しいページが好ましいです。 それと、一応自分で調べたときに出てきたコンポーネントというのは、この無料のPersonalでも組み込めるのでしょうか? どちらでも構わないので、お教えください。お願いします。

  • Delphiの型変換について教えてください

    DelphiからRubyプログラムを起動するには ShellExecuteを使えばいけそうなことがわかったのですが、コンパイルでエラーが出ます。 ShellExecute(Handle,'open'、'xxx.rb',OpenDialog1.FileName,syori,SW_SHOWNORMAL)としたのですが TFileNameとPAnsiCharには互換性がありませんとエラーが出ます。 どんな関数を使って変換すればいいのでしょうか?