|
Registriert seit: 10. Jun 2002
Ort: Unterhaching
11.412 Beiträge
Delphi 12 Athens
|
29. Jun 2002, 14: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 Lizbeth
Ich bin nicht zurück, ich tue nur so
|