[es] - Prevodjenje koda sa ADOTable u ADOQuery?

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.neobee.net.

Profil

Prevodjenje koda sa ADOTable u ADOQuery?

^{09.05.2006. u 16:29 - pre 218 meseci}

Kako mogu ovo:

Code:

with ADOTable do begin
      Insert;
      FieldByName('IME').Value := Edit1.Text;
      FieldByName('PREZIME').Value := Edit2.Text;
      FieldByName('ADRESA').Value := Edit3.Text;
      Post;
end

da napisem za ADOQuery?!

Someone's sitting in the shade today because someone planted a tree a long time ago.

Odgovor na temu

marcha
Nikola Marcic
Beograd/Leskovac

Član broj: 6454
Poruke: 108
*.232.eunet.yu.

ICQ: 156892888

+1 Profil

Re: Prevodjenje koda sa ADOTable u ADOQuery?

^{09.05.2006. u 21:41 - pre 218 meseci}

Code:

with Qry do
begin
Close;
SQL.Clear;
SQL.ADD('Insert into NEKA_TABELA (IME, PREZIME, ADRESA) VALUES (:IME, :PREZIME, :ADRESA)');
ParamByName('IME').Value := Edit1.Text;
ParamByName('PREZIME').Value := Edit2.Text;
ParamByName('ADRESA').Value := Edit3.Text;
ExecSQL;
end

Marcha
-----------------------------------
Pretpostavka je majka zajeba.

Odgovor na temu

Miloš Baić
Miloš Baić
ERP (Dynamics NAV) programer
Beograd

Član broj: 72468
Poruke: 1155
*.dialup.neobee.net.

Profil

Re: Prevodjenje koda sa ADOTable u ADOQuery?

^{09.05.2006. u 23:11 - pre 218 meseci}

Hvala na odgovoru, resio sam problem...
Sad se javlja drugi?!
O cemu se radi? Naime, na jednoj formi sam postavio DBGrid, ADOQuery, DataSource i povezao kako Bog propoveda?!
Na drugoj formi sam postavio Edite i Button na osnovu koga radim INSERT, kao u postu koji je marcha postavio. Kako bi jednostavno a ispravno odradio Editovanje, znaci, kad isfiltriram jedno lice i kliknem na Button - Izmene sa forme gde je DBGrid, da se podaci za to lice prikazu na formi sa koje sam vrsio INSERT, s tim, sto sad te podatke menjam i vrsim Edit - UPDATE?!
Dakle, meni to treba za ADOQuery, prvo da se podaci prikazu a zatim da ih editujem. Sa ADOTable sam to odradio ovako:

Code:

EditJMBG.Text:=Form1.ADOTable1JMBG.AsString;
EditIME.Text:=Form1.ADOTable1ME.AsString;
EditPREZIME.Text:=Form1.ADOTable1PREZIME.AsString;

Radi lakseg razumevanja, EditJMBG, EditIME, EditPREZIME su mi na Form2?!!!

_{[Ovu poruku je menjao loshmiscg dana 10.05.2006. u 00:26 GMT+1]}

Someone's sitting in the shade today because someone planted a tree a long time ago.

Odgovor na temu