Dbgrid Математические Функции

  • Автор темы flouwjke
  • Дата начала
Статус
Закрыто для дальнейших ответов.
F

flouwjke

Гость
#1
:) создаю тблицу...
Код:
procedure TForm1.FormCreate(Sender: TObject);
begin

with Table1 do

begin

DatabaseName:='dbdemos';

TableName:='mytest';

TableType:=ttParadox;

{Создать поля}

with FieldDefs do

begin

Add('Диапозон частот, f (Гц)', ftFloat, 0, true);
Add('Опасный режим работы', ftString, 25, true);
Add('U(с+ш), дБ', ftFloat, 0, true);
Add('Uш, дБ', ftFloat, 0, true);
Add('Uc1, дБ', ftFloat, 0, false);
Add('U1изм, мкВ', ftFloat, 0, true);
Add('U2изм, мкВ', ftFloat, 0, true);
Add('L, м', ftFloat, 0, true);
Add('Kп, дБ/м', ftFloat, 0, false);
Add('R, м', ftFloat, 0, false);

end;


with IndexDefs do

begin

Add('I_Name', 'Диапозон частот, f (Гц);Опасный режим работы;U(с+ш), дБ;Uш, дБ;Uc1, дБ;U1изм, мкВ;U2изм, мкВ;L, м;Kп, дБ/м;R, м;',
[ixPrimary, ixUnique]);

end;

CreateTable;
Active:=true;

end;
end;
К примеру в 3 и 4 столбцах записаны значения, любые, необходимо их сложить и вывести к примеру в 5 столбец. И реализовать это необходимо для N строк. если не сложно покажите пример дальше сам по образу и подобию
 
Статус
Закрыто для дальнейших ответов.