delphiで配列を、コピーするには。

質問

delphiで配列をコピーするには、どうしたらいいのでしょうか？

Betr_Hairetu := Moto_Hairetu ;

としたいのですが。

Betr_Hairetu　:= Copy(Moto_Hairetu, 0 ,Length( Moto_Hairetu ) );

では、ダメでした。

ループで、一から入れ直せばいいのですが、かっこわるいなー・・・。
なにか、簡単な関数があるとは思うのですが、探すことができませんでした。
よろしくお願いします。

回答No.1

gyrocompas · ベストアンサー

本来のパスカルでは、配列と文字列（ストリング）は異質であって
相容れるものではありません。
ＤｅｌｐｈｉのＣｏｐｙ関数は、文字列をコピーするものであって
配列をコピーするものではありません。
ちなみに、Ｃｏｐｙ関数の第２引数に０が指定されることはありません
Ｄｅｌｐｈｉの文字列のインデクスは１から始まります

ところが、Ｄｅｌｐｈｉのあるバージョンから、array[] of char と
string が 同じように扱われるようになったので、やや混乱すると思います。

ですが、Delphiでは、文字配列かstringかをはっきり区別して使用するほうが
無難です。

質問では、配列としか書かれていないので、整数の配列か、はたまたレコードの配列か
わかりませんが、

var
ar1, ar2 :array[0..5] of integer;
begin
for i := 0 to 5 do ar1[i] := i * 11;

Move(ar1,ar2, SizeOf(ar1));
end

と Move関数が使えます

また、ＯＳがＷｉｎｄｏｗｓで、Ｗｉｎ３２を使えるなら

CopyMemory関数を使う方法もあります。

お礼

なるほどー。
やはり、変数の型がポイントになりますね。
ありがとうございます。

＞Ｃｏｐｙ関数の第２引数に０が指定されることはありません
訂正ありがとうございます。
ありがとうございます。