Excel de hesapladığım bir karekök formülünü delphi 7 de nasıl kodlarım:
Delphi 7 ve paradoks kullanıyorum.
Excel de yaptığım hesaplamayı Delphide nasıl yaparım.
Kod: Tümünü seç
Excel de bu şekilde hesaplama yapıyorom
B SÜTUNU Sonuç Table1 Field
1 =315 {Sabit Sayı} 315 kab
2 18 {Sabit Sayı} 18 Del
3 4,186 {Sabit Sayı} 4,186 He
4 = (B1 / (B2*B3)) {Formül} 4,18 Su
5 0,9 {Sabit Sayı} 0,9 Ma
6 =((B4*1000)/B5) {Formül} 4645 Sur
7 =(KAREKÖK(B6/0,785))/B5 {Formül} 85 D2 {0,785 Bu sayı Sabit}
Ancak delphi de nasıl bir kodlama yapmalıyım ki 7 cİ satırdaki 85 sonucunu elde edeyim.
Birçok kodlama denedim bulamadım En son aşağıdaki kodu yazdım sonuca varamadım.
procedure TForm1.Table1BeforePost(DataSet: TDataSet);
begin
Table1D2.AsFloat:=sqrt(Table1Sur.AsFloat/0.785)/(Table1Ma.AsFloat);
// 0.785 (.)kullandığımda kod çalışıyor sonuç vermiyor (,) kulandığımda ise
//[Error] Unit1.pas(60): ')' expected but ',' found hatası veriyor
end;