n° 219
Novembre 2017
Dicembre 13, 2017, 09:19:08 *
Benvenuto! Accedi o registrati.
Hai dimenticato l'e-mail di attivazione?

Accesso con nome utente, password e durata della sessione
Notizia:
 
   Indice   Linux Windows Techassistance Gameassistance videogame hardware Aiuto Ricerca Agenda Downloads Accedi Registrati  


* Messaggi recenti
Messaggi recenti
Pagine: [1]   Vai giù
  Stampa  
Autore Discussione: (Delphi 7) Formula  (Letto 4882 volte)
0 utenti e 1 Utente non registrato stanno visualizzando questa discussione.
camaleonteplus
Jr. Member
**

Karma: +0/-0
Scollegato Scollegato

Messaggi: 149


Bello Delphi!

mrcamarium@yahoo.it mrcamarium@yahoo.it
Mostra profilo WWW
« inserita:: Marzo 19, 2012, 11:23:50 »

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);
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?
Registrato
Roberto Allegra
Global Moderator
Hero Member
*****

Karma: +50/-1
Scollegato Scollegato

Messaggi: 2102



Mostra profilo WWW
« Risposta #1 inserita:: Marzo 19, 2012, 09:45:28 »

Mi pare che il compilatore te lo dica nel modo più chiaro possibile: "guarda che mi aspettavo che chiudessi la parentesi che hai aperto, mentre ho trovato un ';', che marca la fine dell'istruzione. Non è che hai dimenticato di chiuderla?".
Registrato

I moderatori invitano tutti gli utenti a prendere visione del REGOLAMENTO e a rispettarlo.
gigisoft
Newbie
*

Karma: +0/-0
Scollegato Scollegato

Messaggi: 4


Mostra profilo
« Risposta #2 inserita:: Ottobre 19, 2012, 03:48:37 »


Codice:
procedure TTriOnOff1.Button2Click(Sender: TObject);
  nDouble := (nDouble - 0.7) / (X / (Y / 3);

(5-0.7) / (30 / (20 / 3)

dove sbaglio?

Conta le parentesi, ti accorgerai che alla fine dell'espressione hai dimenticato di chiuderne una Occhiolino

Ciao
Registrato
Pagine: [1]   Vai su
  Stampa  
 
Vai a:  

Copyright © 2017 Edizioni Master SpA. p.iva : 02105820787

Tutti i diritti di proprietà letteraria e artistica riservati. - Privacy



powered by Simple Machines