![]() |
|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
![]() Добрый день, подскажите, почему в db файл (через Tdbf) ложатся "0", вместо данных. Вот код:
Код:
procedure TForm1.Timer3Timer(Sender: TObject); var l2,l3: string; begin l2:= Form1.Label2.Caption; l3:= Form1.Label3.Caption; form1.DBF1.Exclusive := True; form1.DBF1.Open; form1.DBF1.Append; form1.DBF1.SetFieldData(2,l2); form1.DBF1.Close; end; Вот описание метода procedure SetFieldData(FieldNo: Integer; Data: String); Описание: В текущей записи замещает содержимое поля с номером FieldNo данными Data и устанавливает свойство Modified в True. Данные - это строка, полученная преобразованием данных соответствующего типа в текстовое представление. Логические значения должны представляться строками вида 'True', 'Yes', 'False' или 'No', в противном случае значение считается неопределенным. Дата - строка вида 'ДД.ММ.ГГ'. Ребята, кто работал с Tdbf, отзовитесь. Спасибо. |