MrCamarium
Utente Attivo
- Messaggi
- 24
- Reazioni
- 1
- Punteggio
- 25
Codice:
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:
Codice:
nDouble := (nDouble - 0.7) / (X / (Y / 3);
(5-0.7) / (30 / (20 / 3)
ma mi da questo errore:
[Error] TriOnOff.pas(45): ')' expected but ';' found
dove sbaglio?