SQL

Måden som du gør det på er som følgende

Procedure RetData;
var
  Query : TADOQuery;
begin
  Query := TADOQuery.Create(Application);
  With Query do
  begin
    ConnectionString := 'Et eller andet connection string ';
    SQL.Add('Select * from medlemmer where medlemnr = 1');
    Open;
    if not EOF then
    begin
      Edit;
      FieldByName('Navn').AsString := 'Svend';
      Post;
    end;     
  end;
  Query.Free;
end;

Fandt du ud af det.

ikke rigtig men gider ikke bøvle med det for din kode passer ikke ind på den måde jeg går det på