[mefistofel]

quTmp.DatabaseName := 'MZ_ORACL';
quTmp.SQL.Text := 'select p.surname from mz.privat p where p.code_privat = 5080';
quTmp.Open;
showmessage(quTmp.FieldByName('surname').AsString) ;
quTmp.Close;


сперва долго думает а потом вилетает ошибка
я думаю что неправильно подключаюсь к базе но незнаю как подключитса правильно