|
Registriert seit: 10. Jun 2002
Ort: München
11.412 Beiträge
Delphi 11 Alexandria
|
29. Jun 2002, 13:12
Im diesem speziellen Fall könntest Du folgendes tun
Code:
case IntToStrDef(Copy(MainFormMC2004.ComPort.Port, 3, 2), -1) of
-1:; //Fehler
1: Port 1
2: Port 2
3: Port 3
...
end;
Daniel W.
Ich bin nicht zurück, ich tue nur so
|