出版社のページ → CUTT System:OBJECT PASCAL HANDBOOK ← 目次あり

楽天ブックスへのリンクです。

OBJECT　PASCAL　HANDBOOK マルチデバイス開発ツールDelphiのためのプログ [ マルコ・カントゥ ]
価格：6480円（税込、送料無料) (2018/3/8時点)

2016年10月に購入した「OBJECT PASCAL HANDBOOK」(本体価格：6000円の本)を3月5日に読み始めた。
買ってから一度2、3日ぐらいで30ページぐらいを寝る前に読んだんですが、
パソコンで全く試さずに読んでいたら、記述されている事が気になりストレスになってしまって読むのを止めてしまいました。

6000円も出して購入したこの本を死蔵させるのは勿体ないと思いこの3月を強化月間として読むことにしました。
あと今年の誕生日に「独習PHP 第3版」を買ったのもある。「OBJECT PASCAL HANDBOOK」を読み終えたら「独習PHP 第3版」をやるつもり。

この本は大きく三部に分かれている。

1. 基礎 [第1章～第6章]
   
2. OBJECT PASCAL での OPP [第7章～第13章]
3. 高度な機能 [第14章～第18章]

3月中に第2部の「OBJECT PASCAL での OPP」の途中まで行きたいと思ってる。

使用環境は、Windows10 / Delphi 10.2 Starter版(新しいバージョンが出たら毎回更新予定)

気になった事をメモっていこうと思う。

第1章で気になった事は、ソースコードにデバッグ用ビルドのみに動くコンパイラ指令「{$IFDEF DEBUG} と {$ENDIF} で囲う」を書いたことはあったけど、これ以外にコンパイラ指令の1つに（あまり使われないらしいけど）

{$INCLUDE XXX}

と言うのがあるのを初めて知った。

Owl’ｓ Perspective さんの解説コメント。

{$INCLUDE XXXX} あるいは {$I XXXX} はファイルXXXXをこの場所に読み込む(置き換える)というものですが、
例えばツールなどで自動生成したファイルをソースコードの一部として使うなどのような場合に使われます。

第2章ではPascalでは、文字列を変数に代入するにはシングルクォテーション記号「'」で囲って

string := '文字列ですよ';

と書くのだけど、著者の名前(シングルクォテーション記号「'」も付けた状態)を変数に代入する場合には

string := 'Marco Cantu''';

正規表現で「\」を表現したい時の\\みたいにシングルクォテーションを重ねる必要があるのは面白いなと思った。

また、ダイアログボックス等で文字列を途中で改行したい場合に「#13#10」と入れていたけど、「sLineBreak」と入れれば改行されると知った。

string := 'Marco' + sLineBreak + 'Cantu''';

グローバル変数の初期化時だけに初期値も一気に宣言できると知った。

var
 Value: Integer = 10;
 flag: Boolean = True;

定数の宣言は変数名と値だけでOKと知った。コンパイラが型を推察してくれるらしい。

const
  Value = 1000;
  Pi = 3.1415;
  Name = 'アンナ';

また定数の型を指定したい場合は以下のようにすればOK

const
  Value: Integer = 1000;

リソース文字列定数という特殊な定数があるのを知った。使い道としては様々な言語で使うプログラムを作る時のローカライズに使用するみたい。

resourcestring
  strName = 'アンナ';

begin
  ShowMessage(strName);
end;

グローバル変数、ローカル変数というのは他のプログラミング言語にもあるけど、グローバル隠れ変数というのはあるのかな？
オイラの理解で書くと複数のファイル[A、B、C]で書かれたソースコードがあるとする。
ファイルAで宣言されたグローバル隠れ変数にはファイルAに書かれた手続きや関数からアクセス出来るけど、ファイルBやCからはファイルAのグローバル隠れ変数にはアクセスできない。

こういう仕様。他のプログラミング言語だと同じ変数の仕組みがあるとしても名称が違うのかもしれないなぁ～。

整数型 = エイリアス整数型

• 8ビット

  ShortInt = Int8
  

  -128から127

  Byte UInt8
  

  0から255

• 16ビット

  SmallInt = Int16
  

  -32Kから32K

  Word = UInt16
  

  0から64K

• 32ビット

  Integer = Int32
  

  -2GBから2GB

  Cardinal = UInt32
  

  0から4GB

• 64ビット

  Int64

  -922京から922京

  UInt64

  0から1844京:16エクサバイト

• プラットフォームによってサイズが変わる型

  NativeInt、NativeUInt、LargeInt

  プラットフォームが32ビットプラットフォームなら32ビットの整数型と同じサイズになるし、
  64ビットプラットフォームなら64ビットの整数型と同じサイズになる。

YouTubeの解説動画か生配信を見て便利だなぁと思った記憶があるけど、Val := Integer.ToString で数値を数字として文字列に代入出来る機能(Integer型ヘルパー)って、どのバージョンから導入されたんだろう？

ToString以外には、ToBoolean、ToHexString(16進数表記)、ToSingle(単精度浮動小数点数型へ変換)、ToDouble(倍精度浮動小数点数型へ変換)、ToExtended(Extended型 浮動小数点数型へ変換)がある。浮動小数点数って数学を使うプログラムを書いたことないから使ったこと無いからイメージが浮かばない・・・。

Val := hoge.Size.ToStringとするとValにhogeという変数が使用するバイト数が代入される。 他にParse、TryParseってあったけど、どういう時に使うのかよく解らないや(´・ω・`)
一応動くソースコードを書けたけど。

var
  _64bit : Integer;
  num : string;
begin
  _64bit  := 123456;
  num     := '98765';

  ShowMessage('バイトサイズ:' + _64bit.Size.ToString);

  _64bit := num.Parse(num.ToInteger).ToInteger;
  ShowMessage('Parse:' + _64bit.ToString);
end;

Dec()、Inc()は数値を増減させる関数で例えばInc(変数名、数値)って書くと数値の分増やせる。数値を加えるとその分増減するというのは今回知った。

var
IncInc : Integer
  IncInc : = 0;
  Inc(IncInc); // IncInc は1になる。
  Inc(IncInc , 10); // IncInc は11になる。
  Dec(IncInc); //  IncInc は10になる。
  Dec(IncInc , 10); // IncInc は0になる。

odd()は変数が奇数ならTrueを返す。
Low()は最小値、High()は最大値。Pred、Succ、Ordはよく解らなかったので後回しにする。

var
str : string;
  str := Low(Int8).ToString; // -128
  str := Low(Integer).ToString; // -2147483648

  str := High(Int8).ToString; // 127
  str := High(Integer).ToString; // 2147483647

オーバーフローチェックをするようにするコンパイラの設定ってここで設定するのかな？

Boolean型の値には'True'と'False'だけが入る。

var
  checkFlg: Boolean;
begin
  checkFlg := True;
  ShowMessage( checkFlg.ToString ); // -1 と表示される ←メモにあったMicrosoftのCOMおよびOLEオートメーションとの互換性のため-1という事かな？
  ShowMessage( checkFlg.ToInteger.ToString ); // 1 と表示される
end;

文字型#32未満の制御文字などに使用されて、よく使われる特殊文字

• #8 : バックスペース
  • テキストエディタで文字を1文字ずつ消していく演出に使うのかな？と思ったけど、それだけの為にこの特殊文字があるのは変だと思ってググってみた。
    バックスペースキーが入力された時の判定などに使うようだ。
    →1文字ずつ消していく演出を試しに作ってみよう。
    
• #9 : タブ文字
• #10 : 改行
• #13 : キャリッジリターン
• $27 : エスケープ

Cher型のヘルパー関数を使うにはusesでCharacterを宣言しないと使えないっとφ(．．)メモ。

ユニコードの文字コードの番号(Unicodeポイント)からchr関数で文字を表示する書き方がわからなかった。例えば大文字のQだと[U+0051]なんですが(´・ω・`)

Owl's Perspective さんの解説コメント

Unicodeのコードポイントを文字にする方法ですが、即値であれば#を前につけるだけです。
var
S: String;
begin
S := #$0041 + #$0042; // U+0041(A) + U+0042(B)

一方でコードポイントが変数(16ビット/符号なし)に入っている場合はChar型にキャストします。
var
W1: UInt16;
W2: UInt16;
S: String;
begin
W1 := $0041;
W2 := $0042;
S := Char(W1) + Char(W2);

浮動小数点型って近似値という事なのでだいたい合っているという数値っていう理解で良いのかな？一部を除いて小数点以下何桁が決まっていないのかな？

Single - 単精度浮動小数点型 4バイト。

他のプログラミング言語ではfloatと呼ばれることがある。

var
sl : Single;
begin
  sl := 0.5 * 0.2;
  show(sl.ToString); // 0.100000001490116 
  

Doubleだと計算結果はちゃんと0.1になる。

Double - 倍精度浮動小数点型 8バイト。

良く使用される。

Extended - ？？？ 10バイト。

この型を使用できないプラットフォームもある。Win64ではDoubleと同じ精度に引き下げられる。
他のプログラミング言語ではlong doubleと呼ばれることがある。

Comp - ？？？ 8バイト。

大きな整数(18桁まで)を正確に表現したい時に使う。

Currency - ？？？ 8バイト(64bit)。

小数点以下4桁に固定されている。通貨計算を処理するために追加された。

Mathユニットを使うことあるのかなぁ？ゲームアプリを作ろうとしない限り近い将来には使わなそうだけど・・・。