Code: Alles auswählen
type
TVec = record
x, y: single;
end;
TVecs = record
r0: single;
vec: TVec;
r1: single;
end;
const
v: TVec = (x: 1; y: 2);
v2: TVecs = (r0: 1; vec: v; r1: 2); // bei v motzt er
Code: Alles auswählen
project1.lpr(16,28) Error: Syntax error, "(" expected but "identifier V" found
Code: Alles auswählen
v1: TVecs = (r0: 1; vec: (x: 3; y: 4); r1: 2); // bei v motzt er
Oder bleibt mit da wohl oder üblich nichts anderes übrig, als die Daten in einer procedure manuell zu zuweisen ?
In C geht dies so einfach:
Code: Alles auswählen
constexpr Material ivory = {1.0, {0.9, 0.5, 0.1, 0.0}, {0.4, 0.4, 0.3}, 50.};
constexpr Material mirror = {1.0, {0.0, 16.0, 0.8, 0.0}, {1.0, 1.0, 1.0}, 1425.};
constexpr Sphere spheres[] = {
{{-3, 0, -16}, 2, ivory},
.....
{{ 7, 5, -18}, 4, mirror}
};