Как исправить ошибку?
Пишу программу БД в Делфи надо в ней кое-что подсчитать... формула такова
DBEdit1.Text:=floattostr((1.1*(DataModule3.Kod_DTa ble1.FieldByName('D_Ёмкости').AsFloat*3.14*DataMod ule3.Kod_BTable1.FieldByName('B_Стенки').AsFloat*D ataModule3.Kod_HTable1.FieldByName('H_Ёмкости').As Float+2*(3.14*DataModule3.Kod_DTable1.FieldByName( 'D_Ёмкости').AsFloat*DataModule3.Kod_DTable1.Field ByName('D_Ёмкости').AsFloat)/4*DataModule3.Kod_BTable1.FieldByName('B_Стенки'). AsFloat)*1.6*DataModule3.Kod_STable1.FieldByName(' S_Стеклопластика').AsFloat))+(floattostr(Edit2.Tex t*2))+(floattostr(Edit4.Text)};
Формула работала пока не вставила последние слогаемые +(floattostr(Edit2.Text*2))+(floattostr(Edit4.Text )};
При компл. выдается ошибка
1.[Error] Unit11.pas(71): Incompatible types: 'String' and 'Integer'
[2.Error] Unit11.pas(71): There is no overloaded version of 'FloatToStr' that can be called with these arguments
3.[Fatal Error] Project1.dpr(15): Could not compile used unit 'Unit11.pas'
Как исправить эту ошибку?
|