🚀 go-pugleaf

Koriolan pisze:
> Jak zmusić SQLQuery do zmian ? Update, Insert itp.
> Szukałem po necie ale przykłady mi nie działąją.
> Nie chcę tu opisywać co mi się nie udało ale np.
> ......[CIACH]
> Nie działa :-(
> Generalnie czepia się, że nie ma SQL (jest Update) ExecSQL zamiast Open
> też nie chodzi :-(

Poradziłem sobie ..

Operowanie SQLQuery przy operacjach innych niż 'SELECT' wychodzi mi tak :

--------------------------

procedure TModyfik1.ButtDoCennikaClick(Sender: TObject);
begin
   // Dodaj Lek do Cennika
   WITH DataModule1 DO BEGIN
     if SQLTransaction3.Active then SQLTransaction3.Commit;
     SQLQuery3.close;
     SQLQuery3.SQL.clear;
     SQLQuery3.SQL.Add('INSERT INTO pit_zm ( data_zm) VALUES ( 
''2010-01-01'');');
     SQLTransaction3.StartTransaction;
     SQLQuery3.ExecSQL;
     SQLTransaction3.Commit;
    END;
end;

---------------------------

Działa :-)

Koriolan