DELPHI I Kopiranje podataka iz tabele firebird baze
Prikazujem rezultate 1 do 2 od 2

Tema: DELPHI I Kopiranje podataka iz tabele firebird baze

  1. #1
    Nov član
    Učlanjen
    16.06.2008.
    Poruke
    2
    Reputaciona moć
    0

    Podrazumevano DELPHI I Kopiranje podataka iz tabele firebird baze

    Posto nisam nasao odgovor za moje pitnje na ranijim temama postavicu jos jednu u nizu mojih glupih tema...
    Napravio sam bazu koja ima strukturu kao employee.gdb baza koja se isporucuje uz \Delphi...Interesuje me kako mogu putem koda da kopiram podatke iz jedne od tabela baze emloyee u istu tabelu moje baze?
    Extra dodatak sam mislio da napravim ...napunim combo svim tabelama baze i klikom na neku od tabela podaci se pojavljuju u gridu,klikom na dugme kopiraju se....?
    Kako?pomocu kojih komponenti?kod?Nista ne znam samo znam sta zelim da uradim?
    Svaka pomoc imi je dobro dosla!
    HVALAsbvvim buducim instruktorima
    eVo i nekakve verzije koda procedure koju sam napravio za kopiranje podataka medju tabelama.Ne pokazuje gresku,ali ne radi nista.ne znam gde gresim?

    Code:

    procedure TForm1.Button1Click(Sender: TObject);
    var
    i:integer;
    begin
    //SqlTable 1 je izvorna tabela,a SqlTable 2 je odredisna tabela
    for i:=0 to SQLTable1.FieldCount-1 do
    begin
    SQLTable2.Fields[i]:=SQLTable1.Fields[i];
    SQLTable1.Next;
    end;
    end;



  2. #2
    Nov član
    Učlanjen
    15.07.2008.
    Pol
    muški
    Poruke
    3
    Reputaciona moć
    0

    Podrazumevano Re: DELPHI I Kopiranje podataka iz tabele firebird baze

    nedostaje ti dodavanje slogova.

    primer: dodavanje slogova

    procedure TForm1.Button1Click(Sender: TObject);
    begin
    Table1.Append;
    Table1.FieldValues['ALPHANUMERIC'] := Edit1.text;
    Table1.FieldValues['INTEGER'] := StrToInt(Edit2.text);
    Table1.Post;
    end;

    ili umetanje slogova


    procedure TForm1.Button1Click(Sender: TObject);
    begin
    Table1.Insert;
    Table1.FieldByName('QUANTITY').AsInteger := StrToInt(Edit1.Text);
    Table1.Post;

    end;

    pravilo:
    1. dodaj ili umetni slog,
    2. dodeli vrednosti poljima novog sloga
    3. potvrdi upis. (post)

    ako radis azuriranje

    umesto dodavanja
    slog moras da prbacis u editstate 'dsedit'

    a posle azuriranje uradi post ili se jednostavno skloni sa tog sloga (table1.next)

Slične teme

  1. DELPHI I Kopiranje podataka iz tabele firebird baze
    Autor izivanovic u forumu Programiranje
    Odgovora: 0
    Poslednja poruka: 16.06.2008., 21:33
  2. baze podataka
    Autor baza u forumu Programiranje
    Odgovora: 4
    Poslednja poruka: 29.09.2004., 17:19
  3. Delphi - Baze podataka
    Autor Freestyler u forumu Programiranje
    Odgovora: 0
    Poslednja poruka: 22.09.2004., 22:49
  4. Delphi - Baze podataka
    Autor Freestyler u forumu Programiranje
    Odgovora: 0
    Poslednja poruka: 22.09.2004., 22:48
  5. BAZE PODATAKA
    Autor NO PROBLEM u forumu Programiranje
    Odgovora: 6
    Poslednja poruka: 13.07.2004., 18:17

Pravila za slanje poruka

  • Ne možete kreirati novu temu
  • Ne možete poslati odgovor
  • Ne možete dodati priloge
  • Ne možete prepraviti svoju poruku
  •