Forum: Programmieren allgemein
by timschoen,
19. Feb 2012
So befülle ich den Array:
procedure TForm1.AddClick(Sender: TObject);
begin
Pats := TPat.Create(a);
end;
In der create-procedure zähle ich dann a immer eins hoch, a steht am anfang auf 0. Das Array ist nicht dynamisch, sondern hat immer 20 elemente. Wieviele davon befüllt sind zähle ich mit a.
Pats: Array of TPat;
Forum: Programmieren allgemein
by timschoen,
19. Feb 2012
Hallo Community,
ich bin momentan am programmieren eines kleinen Tools, das mir und ein paar Freunden bei einer Blutspende helfen soll. Wir kümmern uns um den Teil, in dem die Personen 5 min sitzen und 5 min liegen sollen, bevor sie sich etwas zu essen holen und fertig mit der Blustpende sind. Ich habe einige einträge von Personen (ich habe sie im Programm Pat für Patienten genannt), die ich...