Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

DBGRID!

R@id © (2002-06-17 22:10:00)
Помогите плиззз!! Я создала отдельно таблицу в FoxPro, с помощью мастера занесла ее в Form3. Вопрос заключается в том как вывести значения (типа Float) в таблицу BDGrid или может я чего-то не допонимаю, может просто в Table1 выводить.
Поля таблицы:
Table1Y: TFloatField;
Table1X1: TFloatField;
Table1X2: TFloatField;
Table1X3: TFloatField;
Table1X4: TFloatField;

procedure TForm1.N2Click(Sender: TObject);
var q,i,j:integer;
x1: array [1..5,1..21] of real;
begin
// вычисляется х1
.......
//Вывод в Form3.Table1
q:=Form3.Table1.FieldCount;
Form3.table1.first;
for i:=1 to q-1 do
for j:=1 to 21 do begin
Form3.table1.edit;
//Что здесь делать без понятия!
Form3.Table1Y.Text:=foattostr(x1[i,j]);
Form3.Table1.next;
Form3.table1.post;
end;
form3.show;
end;

Леша (2002-07-02 06:32:00) [1]
А что трудно сделать таблицу редактируемой. Связать для простоты с навигатором, и делай, что хочешь.

kaif (2002-07-02 01:26:00) [2]
А в таблицу нужно добавлять строки или все время заменять те же самые?

ASM (2002-07-01 23:31:00) [3]
>John Kayfolom
Form3.Table1.FieldByName("Y").asFloat:=foattostr(x1[i,j]); ????
тогда уж без asFloat:=FloatToStr(X1[i,j])
Form3.Table1.FieldByName("Y").asFloat:=(x1[i,j]);
Честно говоря я тоже ничего не понял.

John Kayfolom (2002-07-01 17:28:00) [4]
Form3.table1.edit;
//Что здесь делать без понятия!
// Form3.Table1Y.Text:=foattostr(x1[i,j]);
//----------------------------
//--- Видимо вот это тебе нужно
Form3.Table1.FieldByName("Y").asFloat:=foattostr(x1[i,j]);
//----------------------------
Form3.table1.post;
// Сначала Post, затем Next
Form3.Table1.next;

А лучше задачу целиком намыль - этот код если что и делает, то это науке неизвестно ;)

Anatoly Podgoretsky (2002-06-17 22:17:00) [5]
Размести на форме 5 компонент TDbEdit и свяжи их с таблицей

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »