[Сёна]

Помогите, please, подскажите:

Код:

if MessageDlg(msg+'Вы уверены в своем выборе?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
podsranovka;
form2.pasp_rol0.Refresh;
form2.pasp_rol0.Locate('ROL_PASP_ID',form8.OracleDataSet1.FieldByName('ROL_PASP_ID').AsInteger,[locaseinsensitive]);

на refresh выходит ошибка

[mav_c]

Сообщение от Сёна

Помогите, please, подскажите:

Код:

if MessageDlg(msg+'Вы уверены в своем выборе?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
podsranovka;
form2.pasp_rol0.Refresh;
form2.pasp_rol0.Locate('ROL_PASP_ID',form8.OracleDataSet1.FieldByName('ROL_PASP_ID').AsInteger,[locaseinsensitive]);

на refresh выходит ошибка

А Form2 создана?

[Сёна]

да, конечно

[Aristarh Dark]

А может надо так?

Код:

if MessageDlg(msg+'Вы уверены в своем выборе?',
    mtConfirmation, [mbYes, mbNo], 0) = mrYes then
begin
podsranovka;
form2.pasp_rol0.Refresh;
form2.pasp_rol0.Locate('ROL_PASP_ID',form8.OracleDataSet1.FieldByName('ROL_PASP_ID').AsInteger,[locaseinsensitive]);
end;

[Сёна]

всё равно ошибка на refresh

[X-rem]

А что за pasp_rol0 ?

[Сёна]

pasp_rol0 - это dataset

[AlexSku]

Привет.
А какое последнее действие перед Refresh было с базой данных? (Может быть, в процедуре podsranovka)