![]() |
| ||
|
|
Новости |
Поиск |
FAQ |
Статьи |
Книги |
Новости VCL
| | Форумы ЧАТ |
Орешник |
|
| |||
| |||
« предыдущая ветвь | форум | следующая ветвь »
SetField, AppendRecord [D6, access]
Ирина © (2005-07-14 14:40:00)Как с помощью функций SetField и AppendRecord переносить поля из DataSet, т.е. что надо писать в скобках??
ANB (2005-07-14 16:46:00) [1]procedure TForm2.Button1Click(Sender: TObject);
var i, n;
begin
// Не забыть, что DataSetTo должен быть открыт (Open) или открыть его здесь
n := DataSetTo.FieldCount - 1;
DataSetFrom.First; // Или Open, если он закрыт.
while (not DataSetFrom.Eof) do begin
DataSetTo.Append;
for i := 0 to n do begin
DataSetTo.FieldByName(DataSetFrom.Fields[i].FieldName).AsString
:= DataSetFrom.Fields[i].AsString;
end;
DataSetTo.Post;
DataSetFrom.Next;
end;
// Здесь можно заклозить все дейтасеты, если надо
end;
Ирина (2005-07-14 15:45:00) [2]>запись из нескольких полей
...состоящая из нескольких полей
Ирина (2005-07-14 15:44:00) [3]> ANB © (14.07.05 15:23) [5]
Необходимо из одного DataSet в другую перенести запись из нескольких полей
ANB (2005-07-14 15:23:00) [4]
> Ирина (14.07.05 15:22) [4]
- уточни задачу. А кусок хелпа запостить недолго.
Ирина (2005-07-14 15:22:00) [5]Спасибо за помощь!
Johnmen (2005-07-14 14:58:00) [6]>Val © (14.07.05 14:55) [2]
:)
Я тоже заметил...
Val (2005-07-14 14:55:00) [7]>[1] Johnmen © (14.07.05 14:42)
тсс. сейчас модно ставить делфи без хелпа ;)
Johnmen (2005-07-14 14:42:00) [8]Ну если нет букварей, то хотя бы F1 работает?