Danke für die Antworten. Ich habe es mir schon gedacht.
Habe nur gehofft, daß es etwas gibt, was ich noch nicht weis. Schade.
Dann halt wieder:
Delphi-Quellcode:
lMenge1 = 0;
lMenge2 = 0;
lMenge3 = 0;
lMenge4 = 0;
Statt
SetToZero([lMenge1,lMenge2,lMenge3,lMenge4]);