名前 題名 ▼ Mr.XRAYさん > > 興味ある方用に，テスト用のプロジェクトを UP しました． > > 自分で実際に確認するのが一番です．ハイ． > > Delphi は GUI のアプリ開発用ですので，コンソールじゃないです． > > > > mrxray.on.coocan.jp/Delphi/zip/DynamicArrayTest_Integer.zip > > (544 KB) > > てなわけで，元の Integer の配列を独立させるためには， > 動的な配列なので，領域を確保する必要があります． > 添付のコードを以下のようにしてみてください． > 元のコードは，コーディング通りの動作をしていることになります． > > Memo1.Lines.Clear; > > // array1の確保と変更 > SetLength(Array1, DefaultLength); > SetLength(Array2, DefaultLength); > for i := Low(Array1) to High(Array1) do > Array1[i] := i; > // array1 を array2 にコピーではなくて > // (配列を示すアドレス-ポインタ - を同じにするのではなく) > // arrayy1の値を array2に代入 > for i := Low(Array1) to High(Array1) do begin > Array2[i] := Array1[i]; > end; > > もっとも， > > > Delphi/動的配列の罠 > > http://tobysoft.net/wiki/index.php?Delphi%2F%C6%B0%C5%AA%C7%DB%CE%F3%A4%CE%E6%AB > > が，何を狙ったのかは，よく分かりませんが (^^; > 別に「罠」でも何でもないと思いますが... GIF,JPEG,PNG画像ファイル及びLZH,ZIPファイルをアップロードできます.600 x 1200 ピクセルを超える画像は縮小表示されます(画像クリックで拡大表示). (上限122000(120k)バイト) 削除キー Link