Я не могу изменить значения полей TcxGrid при наборе данных в режиме вставки - PullRequest
Новая
       16

Я не могу изменить значения полей TcxGrid при наборе данных в режиме вставки

0 голосов
/ 18 августа 2011

Я использую Delphi2010 и Oracle 10g в качестве базы данных

Мой TcxGrid подключается к набору данных (qryDONEMSEL -> TOraQuery), когда я хочу добавить что-то в базу данных, нажав кнопку. Я изменяю набор данных на режим вставки, НО поля в TcxGrid не включены, в чем проблема?

Код внутри кнопки, как следует 

if (qryDONEMSEL.RecordCount = 0) then
  begin

    qryDONEMSEL.Insert;
    qryDONEMSEL.FieldByName('YIL').asinteger := STRTOINT(Util.GETSQL('SELECT OGIS.AKTIFYIL FROM DUAL'));
    qryDONEMSEL.FieldByName('donem').asinteger := STRTOINT(Util.GETSQL('SELECT OGIS.AKTIFDONEM FROM DUAL'));
    qryDONEMSEL.FieldByName('DURUM').AsString := 'ST1';
    // qryDONEMSEL.FieldByName('sinif').ASstring := 'C2';
    // qryDONEMSEL.FieldByName('okudugu_somestre').ASinteger := 1;
    // 9 - Transfer kayıt sebebi
    if (POS('9', qryOGR.FieldByName('kay_sebep').AsString) > 0) then
    begin
      showmessage(gsLabels('Öğrenci transfer olarak kayıtlı.', self, 'OGIS') + #13#10 + gsLabels('Sınıf ve Sömestresini dikkatli ve doğru girin.', self, 'OGIS'));
    end;
  end

Кто-нибудь может мне что-то посоветовать?

1 Ответ

1 голос
/ 19 августа 2011

Я решил проблему. Это потому, что в одной функции была строка, как показано ниже, которая отключает поля. grdDonemselView.columns [i] .Options.Editing: = False; или изменить на grdDonemselView.columns [i] .Options.Editing: = True; решил проблему

...