Questo sito utilizza cookies solo per scopi di autenticazione sul sito e nient'altro. Nessuna informazione personale viene tracciata. Leggi l'informativa sui cookies.
Username: Password: oppure
Delphi - Rendere Visibile o invisibile Edit (Delphi7)
Forum - Delphi - Rendere Visibile o invisibile Edit (Delphi7)

Avatar
camaleonteplus (Normal User)
Pro


Messaggi: 95
Iscritto: 05/03/2009

Segnala al moderatore
Postato alle 18:53
Venerdì, 01/06/2012
Vorrei rendere Visibile un edit quando in combobox scelgo itemindex 1 e 2 invece quando si trova si trova su 0 diventa invisibile. So solo che posso usare questo comando:
Codice sorgente - presumibilmente Plain Text

  1. edit1.visible = true


come lo applico al caso mio?

PM Quote
Avatar
camaleonteplus (Normal User)
Pro


Messaggi: 95
Iscritto: 05/03/2009

Segnala al moderatore
Postato alle 19:31
Venerdì, 01/06/2012
per adesso ho fatto cosi è funziona:
Codice sorgente - presumibilmente Delphi

  1. procedure TForm6.TipoChange(Sender: TObject);
  2. begin
  3. Form6.Caption := Tipo.Items[Tipo.ItemIndex];
  4.   ValLed.Visible := True;
  5. end;


ma vorrei rendere visibile l'edit solo quando sta sulla linea 1 e 2 come ho fatto io lo rendo visibile anche quando sta sullo 0, come posso proseguire?

PM Quote
Avatar
nessuno (Normal User)
Guru^2


Messaggi: 6380
Iscritto: 03/01/2010

Segnala al moderatore
Postato alle 19:52
Venerdì, 01/06/2012


Ricorda che nessuno è obbligato a risponderti e che nessuno è perfetto ...
---
Il grande studioso italiano Bruno de Finetti (uno dei padri fondatori del moderno Calcolo delle probabilità) chiamava il gioco del Lotto Tassa sulla stupidità.
PM Quote
Avatar
()
Newbie


Messaggi:
Iscritto:

Segnala al moderatore
Postato alle 19:53
Venerdì, 01/06/2012
Nel ComboBox c'è la proprietà ItemIndex che ti permette di sapere l'elemento scelto e vale -1 se non ce ne sono selezionati quindi sull OnChange dell'ComboBox scrivi:
Codice sorgente - presumibilmente Delphi

  1. if(ComboBox1.ItemIndex < 1)then // Quando hai scelto il 1° elemento (0) o non ne hai scelti (-1)
  2.     Edit1.Visible := False // Nascondi Edit
  3.   else // Negli altri casi (2° e 3° elemento, rispettivamente 1 e 2)
  4.     Edit1.Visible := True; // Mostra Edit



Spero di averti aiutato :k:

EDIT: ho risposto contemporaneamente a nessuno :rotfl:

Ultima modifica effettuata da il 01/06/2012 alle 19:55
PM Quote
Avatar
Goblin (Member)
Expert


Messaggi: 375
Iscritto: 02/02/2011

Segnala al moderatore
Postato alle 0:13
Sabato, 02/06/2012
Il succo non cambia, ma personalmente preferisco la seguente sintassi:
Codice sorgente - presumibilmente Plain Text

  1. edit1.Visible := ComboBox1.ItemIndex >= 1;



Ibis redibis non morieris in bello
PM Quote
Avatar
camaleonteplus (Normal User)
Pro


Messaggi: 95
Iscritto: 05/03/2009

Segnala al moderatore
Postato alle 20:31
Sabato, 02/06/2012
in effetti ho fatto cosi.
Codice sorgente - presumibilmente Delphi

  1. procedure TForm6.TipoSelect(Sender: TObject);
  2. begin
  3.   Form6.Caption := Tipo.Items[Tipo.ItemIndex];
  4.   ValLed.Visible := ((Tipo.ItemIndex >= 1) and (Tipo.ItemIndex <= 2));
  5. end;


funziona anche cosi grazie del consiglio!

PM Quote
Avatar
Goblin (Member)
Expert


Messaggi: 375
Iscritto: 02/02/2011

Segnala al moderatore
Postato alle 22:00
Sabato, 02/06/2012
mmm io avrei fatto un 'or' ... la and è fuorviante ...spiegami come itemindex può essere contemporaneamente >1 e <2 dato che è un intero... ti va di lusso che hai messo '=' ma ciò vuol dire scrivere =1 or =2 che mi sembra più leggibile.
poi ... io sono nabbo ...


Ibis redibis non morieris in bello
PM Quote