@Akku:
Zitat von
Akku:
Ich würde gerne ein Array aus Booleans der Größe 5 on-the-fly erstellen, an eine Funktion übergeben und dort in einen record abspeichern.
Was meinst du mit 'in einem Record abspeichern' ?
Soll der Record in eine Datenbank ?
Du definierst Records und Zeiger auf Records. Sollen diese in einer Liste verwaltet werden ?
Hat 'FittingDim' was mit Installationsmaterial zu tun ?
Möchtest du damit kennzeichnen ob verschiedene Dimensionen verfügbar sind ?
Ein wenig mehr Hintergrundinfo wäre schon hilfreich !
Wenn deine Aufgabenstellung so ist wie ich nur vermuten kann, würde ich den Datentyp Integer verwenden und
die verschiedenen Wahrheitswerte herausmaskieren.
Aus einem Integer(=Longint=32Bit) erhältst du 32 Boolean(=256Bit) => Billawerbung: Sie sparen 28 Byte !
Zurück zur ursprünglichen Frage:
Delphi-Quellcode:
type
TBoolArray = Array of Boolean;
procedure ArrayTest(a:TBoolArray);
begin
end;
function BoolArrayOf(const Values: array of Boolean):TBoolArray;
begin
// hier code ähnlich 'VarArrayOf'
end;
procedure TForm1.Button1Click(Sender: TObject);
begin
ArrayTest(BoolArrayOf([True, False, True]));
end;
Denke so könnt's funktionieren.