Oppure

Loading
19/03/12 9:33
camaleonteplus
procedure TTriOnOff1.Button2Click(Sender: TObject);
var
X,Y,Z:INTEGER;
S:STRING[10];
nDouble: Double;
begin
  VAL(corrente.text,X,Z);
  VAL(hfe.text,Y,Z);
  nDouble := StrToFloatDef(Volt.text, 0);
  nDouble := (nDouble - 0.7) / (X / (Y / 3);
  STR(X,S);
  Label1.Caption := FloatToStr(Round(nDouble));
  VAL(corrente.text,X,Z);
  nDouble := StrToFloatDef(Volt.text, 0);
  nDouble := nDouble * ( X / 1000 );
  STR(X,S);
  Label22.Caption := FormatFloat('#0.##', nDouble);
end;
end.


Con questa riga:
nDouble := (nDouble - 0.7) / (X / (Y / 3);

dovrei eseguire questa formula matematica:
(5-0.7) / (30 / (20 / 3)
ma mi da questo errore:
[Error] TriOnOff.pas(45): ')' expected but ';' found
dove sbaglio?
aaa
19/03/12 10:13
manca una parentesi in
nDouble := (nDouble - 0.7) / (X / (Y / 3);