Засыпаю уже и голова ничего не соображает... разобралась-таки со своей проблемой:
Код:
Form2.Caption:=a;
Form1.ADOTable1.Active:=False;
if (a='Пара') or (a='Идентификация') or (a='Соотвествие') then
begin
Form2.DBMemo1.DataField:='';
end;
if (a='История') then
begin
Form2.DBMemo1.Visible:=True;
Form2.DBMemo1.DataSource:=Form1.DataSource1;
Form2.DBMemo1.DataField:='Текст';
end;
....
потом актив - тру и хэппи энд...