[kucher]

Код:

var
strFieldOtchet1:string;
................................
case ComboBox1.ItemIndex of
0: strFieldOtchet1:='Edit1';
.............................................
memo1.lines:=strFieldOtchet1.TEXT;

Админ: пользуемся тегами для оформления кода!

в таком случае как?

[kucher]

чёт не работает

[Alegun]

memo1.lines типа TStrings, а strFieldOtchet1.TEXT - это просто string, несовпадение типов

Типа одной строкой

Код:

...
memo1.Lines.Add((FindComponent(Format('Edit%d',[ComboBox1.ItemIndex+1])) as TEdit).Text);
...

[Bargest]

strFieldOtchet1:string;
strFieldOtchet1:='Edit1';
memo1.lines:=strFieldOtchet1.TEXT;

Это просто гениально.
От того, что ты в строку запишешь текст "Edit1" она ВНЕЗАПНО не станет Edit-ом. Или что, если написать на листочке бумаги "миллион рублей" то листок станет миллионом рублей? Было бы неплохо...
Edit - это компонент, который не имеет ничего общего с какими-то там строками. У его есть имя. Если надо найти по имени, то надо не пытаться убедить delphi, что строка - это edit, а, очевидно, перебрать существующие компоненты и найти такой, у которого имя равно строке "Edit1". Этим занимается функция FindComponent.
Но FindComponent - только одно из решений. Можно, например, все нужные Edit-ы сохранить в какой-нибудь массив, и брать из этого массива по номеру выбранной строки в ComboBox.

[Страдалецъ]

Хотелось бы еще понять, каким боком тут Акцес вписался?