Странно но факт. помогите понять

← →
Fantasy © (2007-03-14 02:36) [0]

type
TA = packed record
TArray : array[0..255] of Char;
end;
PA = ^TA;

type
TB = packed record
TArray : array[0..255] of Char;
end;
PB = ^TB;

var
AArray : TB;
BArray : TA;

begin
AArray.TArray := BArray.TArray;//???? ошибка Incompatible types

почему ????

← →
Германн © (2007-03-14 02:40) [1]

> почему ????
>

Потому что для компиллятора это разные типы.

← →
Fantasy © (2007-03-14 02:41) [2]

А как присвоить ?

← →
Fantasy © (2007-03-14 02:43) [3]

если String то присвоит!
как присвоить?

все сам же ответил
спосибо всем.

type
Array255 = array [0..255] of char;

type
TA = packed record
TArray : Array255;
end;
PA = ^TA;

type
TB = packed record
TArray : Array255;
end;
PB = ^TB;

var
AArray : TB;
BArray : TA;

begin
AArray.TArray := BArray.TArray;

> Fantasy © (14.03.07 02:46) [4]
>
> все сам же ответил
> спосибо всем.
>

Поздравляю. Без всякого юмора, поздравляю!
Правильное решение, да ещё так быстро.
Но вот ещё раз приходится напоминать про "орфографию" :(

Странно но факт. помогите понять Найти похожие ветки