Dynamic Array with multiple values?
Posted on 2006-04-15
Let me first explain what I need to do:
I have a table where each record is storing 42 timevalues. The record has also a unique integer number (autoinc).
Record can be added and deleted from this table.
I need to have very quick access to the autoinc-number and the 42 timevalues of all records in the table.
I was thinking about an array of some kind, but I don't know how to add (and later access) the autoinc-number as well as the timevalues.
But when I set it up as I tried below, I get an error, because the autoinc-number will exceed the maximum number allowed for the array (as soon as the autoinc-number is missing one number - 1-2-3-(4 deleted)-5-6-7 in line.
var Werktijden : Array of Array of TTime; // Gebruikt voor de agenda
For i := 0 to DM.TMedewerkers.RecordCount -1 do
Werktijden[DM.TMedewerkers.FieldByName('Persoonsnr').AsInteger,0] := DM.TMedewerkers.FieldByName('AgendaZo1B').AsDateTime - strToTime('00:00:01');
// etc. for each timevalue
So I need to be able to quickly get all timevalues of a certain autoinc-number.
Can anybody give me a sample on how to set it up correctly.