rozumiem ze p0, p1 ,p2 itd to sa zmienne jezlei tak to blad tkwi w formie zapisu tego, nie mozesz do zapytaniaSQL dodawac zmiennych w ten sposób
mozna to robic na 2 sposoby( przynajmniej ja tak robie)
Query1.SQL.Add('UPDATE "Baza_ram.db" SET Nazwa ='+s+p0+s+', Rozmiar ='+s'+p1+s+', Typ ='+s+p2+s+ 'WHERE KOD_Id ='+s+p2+s);
przy czym s to jest srednik w deklaracjach dajesz
s:=char(39); ( chyba 39)
Zapis troche skomplikowany ale działa bez problemu, przynajmniej u mnie na MySQL, ale z nazwy pliku wnioskuje ze to chyba baza Paradox
a drugi sposób
fragment wyciety zywcem z mojego programu
procedure TKomputery_edit.Button1Click(Sender: TObject);
begin
Data.qrKomputery.RequestLive:= true;
Button1.Enabled:=false;
Button2.Enabled:=true;
Button3.Enabled:=true;
Button4.Enabled:=false;
Button5.Enabled:=false;
DBNAvigator1.BtnClick(nbEdit);
StatusBar1.Panels[0].Text:='Edycja danych komputera.';
DBLookupComboBox1.KeyValue:=Data.qrKomputery.FieldByName('komp_os').AsInteger;
DBLookupComboBox2.KeyValue:=Data.qrKomputery.FieldByName('komp_dzial').AsInteger;
DBLookupComboBox1.ReadOnly:=false;
DBLookupComboBox2.ReadOnly:=false;
end;
procedure TKomputery_edit.Button2Click(Sender: TObject);
begin
Button1.Enabled:=true;
Button2.Enabled:=false;
Button3.Enabled:=false;
Button4.Enabled:=true;
Button5.Enabled:=true;
Data.qrKomputery.FieldByName ('komp_os').AsInteger:=DBLookupComboBox1.KeyValue;
Data.qrKomputery.FieldByName('komp_dzial').AsInteger:=DBLookupComboBox2.KeyValue;
DBNAvigator1.BtnClick(nbPost);
Data.qrKomputery.RequestLive:= false;
DBLookupComboBox1.ReadOnly:=true;
DBLookupComboBox2.ReadOnly:=true;
StatusBar1.Panels[0].Text:='Pomyślnie zakończono edycje danych komputera.';
end;
i tez dziala tylko ze tutaj sie odwołuje bezposrednio do danego pola w bazie i zmieniam mu wartość, zauważ rowniesz ze właczam mozliwosc zapisu (RequestLive) tylko na czas edycji danych,a ty to mozesz zrobic tylko na ten krotki czas update, wiec w jednym zdarzeniu
Może z pewnoscia ktos ma lepsze promysly al e to sa moje wypłodziny i jak na razie wsztsko dziala bez zarzutu
pozdrawiam
genius23