Тоже не совсем понял вопрос... но есть еще такой оператор как:
Код:
...
Var ch:char;
...
Case ch of
'a' : Edit1.Text:='alex';
'g' : Edit1.Text:='gosha';
'z' : Edit1.Text:='zoom';
else
Edit1.Text:='nobody';
end;
...
Но, предупреждаю - работает тока с численными переменными до 4 байт или 1-байтовым типом сhar ! С массивами (включая String) не фурыжет. Хотя в Делфи 6 еще не пробывал. Помница по паскалю.