TOPIC:

Ide Bug...Don't Recognize me.. If ...then... 9 years 4 weeks ago #8428

lestroso
Topic Author
Offline
Junior Member
Posts: 50
Thank you received: 0

The problem is with if.. then statement....it seems that like doesn't exist.them...any idea??? WHERE i'm wrong... or it's a bug???
The variables works well....

  procedure myprog.AnalisiClick(Sender: TObject);

   begin

                   risultato:=NUMERO1+NUMERO2;

            IF(risultato>36) then risultato:=risultato-36 ;   // here the program go ok!


/// but when arrive here it seems that the.... if.. then   does not exist.....or better the Tsoldi1 is visible and tmanoqui not..why??but i must see nothing appear...But in theory if risultato is 22  i  must see  Tmanoqui2 and   Tsoldi2...

    IF (risultato < 19) then
                 Tmanoqui1.Visible:=True;
                 Tsoldi1.Visible:=True;
                 messaggi.Caption :='Time: '+TimeToStr(Time)+ ' Please ok1!!!';
                        exit;

                 IF  (risultato >18) then
		   Tmanoqui2.Visible := True;
                 Tsoldi2.Visible := True;
                 messaggi.Caption :=  'Time: '+TimeToStr(Time)+ ' Please ok2!!!';


     end;  
end.

Thanks Lestroso,

Please Log in or Create an account to join the conversation.

Ide Bug...Don't Recognize me.. If ...then... 9 years 4 weeks ago #8429

universe Offline Junior Member Posts: 122 Thank you received: 8	This is not a bug, you need to know Pascal basics you have to add "begin end"; if (risultato < 19) then begin Tmanoqui1.Visible:=True; Tsoldi1.Visible:=True; messaggi.Caption :='Time: '+TimeToStr(Time)+ ' Please ok1!!!'; end; More info here www.delphibasics.co.uk/RTL.asp?Name=If The following user(s) said Thank You: lestroso
	Please Log in or Create an account to join the conversation. Last edit: by universe.

Ide Bug...Don't Recognize me.. If ...then... 9 years 4 weeks ago #8430

lestroso Topic Author Offline Junior Member Posts: 50 Thank you received: 0	Dear Universe, I'm so sorry.....You're right! I'm a Pascal Beginner...but you have solved again.. my problem..... Thank You Again.... Lestroso
	Please Log in or Create an account to join the conversation.

Forum

CodeTyphon Studio

Using CT on MS Windows

Ide Bug...Don't Recognize me.. If ...then...