1:

Query1.SQL.Add('DELETE FROM ort WHERE id='+DBText1.Field.Value);					

1:
2:
3:
4:
5:
6:
7:

meinstring := QuotedStr(DBEdit1.Text);

Query1.SQL.Clear; 
Query1.SQL.Add('DELETE FROM ort WHERE id = ' + meinstring);

oder für feste Werte:
Query1.SQL.Add('DELETE FROM ort WHERE id = "berlin"');					

1:
2:
3:
4:
5:
6:
7:
8:

// zuweisen der Datenbankfelder
MeinGrid.Columns[0].FieldName := 'feld1'; 
// und wenn du jetzt noch mehr Felder anzeigen willst, einfach
MeinGrid.Columns[1].FieldName := 'feld2';
MeinGrid.Columns[2].FieldName := 'feld5';

// eigenschaften ändern:
MeinGrid.Columns[0].Width := 40;					

1:

MeinGrid.DataSource := DatenbankSource;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:
22:
23:
24:
25:
26:
27:

on ButtonEditClick
begin
FormEdit.EditFeld1.Text := FormViewDBEditFeld1.Text;
[...]
end

on ButtonSaveClick
begin

// zuerst den Text der EditFelder in Variablen legen:
meinstring1 := QuotedStr(EditFeld1.Text);
// wichtig ist vielleicht, eine Variable zu benutzen, anhand welcher ich 
// meinen Datensatz nachher wiederfinde in der datenbank, z.B. die 
// Laufende Nr:
lfdnr := QuotedStr(EditFeld1.Text);
[...]

// dann in die DB schreiben
with QueryDB do begin
clear;
add('UPDATE meinedb SET feld1 = ' + meinstring1);
add(, feld2 = ' + meinstring2);
add(, feld3 = ' + meinstring3);
add(' WHERE lfdnr = ' + LfdNr);
[...]
end;
QueryDB.ExecSQL;					

1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
20:
21:

var kz:string;
    bs : string;
    px,py:integer;
begin
 kz := QuotedStr(Edit1.Text);
 bs := QuotedStr(Memo1.Text);
 px := StrToInt(Edit2.Text);
 py := StrToInt(Edit3.Text);

 with Query1.SQL do begin
  clear;
  add('UPDATE ort SET  kurzzeichen = ' + kz);
  add(',beschreibung = ' + bs);
  if Edit2.Text<>'' then
   add(',positionx = px');
  if Edit3.Text<>'' then
   add(',positiony = py');
  add(' WHERE id ='+id1);
 end;
  Query1.ExecSQL;
end;					

1:
2:
3:
4:
5:

if Edit2.Text<>'' then 
   add(',positionx = px'); 
  if Edit3.Text<>'' then 
   add(',positiony = py'); 
  add(' WHERE id ='+id1);					

1:
2:
3:

   add(',positionx = ' + px); 
   add(',positiony = ' + py'); 
   add(' WHERE id ='+id1);					

1:

Select * From p.Produkt,l.Lagerort,pl.Produkt_Lagerort Where pl.Produkt_ID=p.Produkt_ID AND pl.Lagerort_ID=l.Lagerort_ID