Forum > Generale

Operazioni con due form

(1/3) > >>

bak:
Buona sera,

sto facendo il porting di un programmino fatto da me anni fa in ambiente Amiga ma nel cercare le soluzioni adeguate in Pascal sto incontrando alcuni problemi di comprensione... :-[

Sto lavorando con due form. Nel primo ci sono le caselle di input e i bottoni mentre nel secondo vengono mostrati i risultati derivati da quel che inserisco nel primo form.
Mettiamo che al lancio del programmino sia visibile il solo form1 e che nel form1 ci siano due caselle Tedit (es. Tedit1 e Tedit2) e un bottone.

Inserendo in Tedit1 il valore 10 e nel Tedit2 il valore 12 e premendo il bottone vorrei che il form1 venisse nascosto, che comparisse il form2 e il valore dato dalla moltiplicazione dei due valori inseriti (120) comparisse in una posizione ben precisa.

Sono riuscito a fare quasi tutto quello che volevo fare tranne che "stampare" il risultato nel form2.

Pensavo ad una casella Tmemo però non volevo vedere l'area del Tmemo...volevo solo vedere il numero risultante. Non riesco a trovare una soluzione.

Sperando di essermi spiegato, ringrazio si da ora chi mi darà una dritta... :)

Luca

mimmolazzaro:
Ciao.
Se ho capito bene, qualcosa del genere dovrebbe funzionare:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
  Form2.Label1.Caption := IntToStr(StrToInt(Edit1.Text) + StrToInt(Edit2.Text));
  Hide
end; 

Ricordati pero' di mettere sulla form2 anche un pulsante con questo codice:

procedure TForm2.Button1Click(Sender: TObject);
begin
  Form1.Close
end; 

xinyiman:

--- Citazione da: mimmolazzaro - Marzo 23, 2013, 06:54:04 am ---Ciao.
Se ho capito bene, qualcosa del genere dovrebbe funzionare:

procedure TForm1.Button1Click(Sender: TObject);
begin
  Form2.Show;
  Form2.Label1.Caption := IntToStr(StrToInt(Edit1.Text) + StrToInt(Edit2.Text));
  Hide
end; 

Ricordati pero' di mettere sulla form2 anche un pulsante con questo codice:

procedure TForm2.Button1Click(Sender: TObject);
begin
  Form1.Close
end;

--- Termina citazione ---

Quello che proponi funziona, ma per essere pignoli io al posto del

  Form2.Show;

metterei un

  Form2.ShowModal;

Così fino a che non chiude la seconda form non può riparametrizare la prima.

mimmolazzaro:

--- Citazione da: xinyiman - Marzo 23, 2013, 03:35:21 pm ---...io al posto del

  Form2.Show;

metterei un

  Form2.ShowModal;

--- Termina citazione ---

Se lo provi noterai dei problemi e comunque non hai il comportamento che richiedeva Luca.
Sempre per pignolare...  ;)

xinyiman:
Allora mi sa che non ho capito cosa vuole luca. Comunque mi a piacere trovare un nuovo pignolone sulla community come me  ;)

Navigazione

[0] Indice dei post

[#] Pagina successiva