in diesem Sinne.
DANKE
(danke auch für die optimierung, werde das anwenden...)
wurde nur beim schreiben ein wenig unübersichtlich, weil der originalcode ist:
Delphi-Quellcode:
if (UdpMsg[i+1]='5') or (UdpMsg[i+1]='-5') then TEdit(FrmPositions.FindComponent('edField' + IntToStr(i))).Visible:=True
else TEdit(FrmPositions.FindComponent('edField' + IntToStr(i))).Visible:=False;
aber nun ist er
TEdit(FrmPositions.FindComponent('edField' + IntToStr(i))).Visible:=(UdpMsg[i+1][i]='5') or (UdpMsg[i+1][i]='-5');