Autore Topic: InputBox (troppo piccoli)  (Letto 1255 volte)

Offline Raffa50

  • Grande Gambero
  • ***
  • Post: 101
    • Mostra profilo
InputBox (troppo piccoli)
« il: 27 Agosto 2011, 19:28:56 »
gli injput box di gambas 3 sono troppo piccoli! come faccio a farli come in gambas2??

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: InputBox (troppo piccoli)
« Risposta #1 il: 28 Agosto 2011, 12:00:16 »
gli injput box di gambas 3 sono troppo piccoli! come faccio a farli come in gambas2??

??? Setta altezza e larghezza

Offline Raffa50

  • Grande Gambero
  • ***
  • Post: 101
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #2 il: 28 Agosto 2011, 13:47:03 »
e come???

Offline Raffa50

  • Grande Gambero
  • ***
  • Post: 101
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #3 il: 01 Settembre 2011, 15:28:40 »
uhu come faccio???

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: InputBox (troppo piccoli)
« Risposta #4 il: 01 Settembre 2011, 15:33:07 »
e come???

Non prendertela ma prima di addentrarti in un linguaggio dovresti conoscerne almeno le basi.

Codice: gambas [Seleziona]
nome_inputbox.h = altezza
nome_inputbox.w = larghezza

Offline Raffa50

  • Grande Gambero
  • ***
  • Post: 101
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #5 il: 01 Settembre 2011, 18:20:31 »
no nn ci riesco...  :hard:

Codice: [Seleziona]
ifcond = "(" & InputBox("If:", "Condition", "true") & ")"

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: InputBox (troppo piccoli)
« Risposta #6 il: 01 Settembre 2011, 18:27:38 »
no nn ci riesco...  :hard:

Codice: [Seleziona]
ifcond = "(" & InputBox("If:", "Condition", "true") & ")"

:rolleyes: Che roba è? Mi diresti cosa devi fare così ti aiutiamo meglio?

Offline milio

  • Senatore Gambero
  • ******
  • Post: 1.273
  • Chi parla poco dice tanto...
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #7 il: 01 Settembre 2011, 20:05:52 »
@Chesko

Penso che il nostro amico intenda dire che un InputBox non ha proprietà .H e .W ...

Offline Ceskho

  • Amministratore
  • Senatore Gambero
  • *****
  • Post: 3.778
  • Vi Veri Veniversum Vivus Vici
    • Mostra profilo
    • Pagina Personale
Re: InputBox (troppo piccoli)
« Risposta #8 il: 01 Settembre 2011, 20:18:55 »
@Chesko

Penso che il nostro amico intenda dire che un InputBox non ha proprietà .H e .W ...

Credevo sel al fosse creata lui e non sapesse come settarla. Ecco perchè non capivo.

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.719
  • Ne mors quidem nos iunget
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #9 il: 04 Settembre 2011, 05:56:40 »
Purtroppo, ponendo degli spazi non si ottiene l'allargamento della finestrina dell'InputBox

Però ho sperimentato che puoi allargare la finestra dell'Inputbox aggiungendo al primo elemento il codice chr(9) prima della virgola divisoria. Il codice chr(9) corrisponde al TAB nel codice ASCII.

Esempio pratico.

comparare la "larghezza" del seguente Inputbox:

Codice: [Seleziona]
ifcond = InputBox("If:", "Condicion", "true")

con la "larghezza" di quest'altro:

Codice: [Seleziona]
ifcond = InputBox("If:" & Chr(9) & Chr(9) & Chr(9) & Chr(9) & Chr(9) & Chr(9) & Chr(9) & Chr(9), "Condition", "true")

più ce ne metti di chr(9) e più... ti si allarga...

...provare per credere !  :-[

1) al posto di tanti chr(9) puoi utilizzare anche un codice più breve con la funzione: String$(nn, "xxxx").
Esempio pratico:
     
Codice: [Seleziona]
fcond = InputBox("If:" & String$(10, Chr(9)))


Non ho ancora trovato, invece, una soluzione analoga per aumentare la sua "altezza".   :-\



AGGIORNAMENTO:
segnalo che allo stato attuale la possiblità di allargare l'aspetto dell'oggetto InputBox mediante la suddetta modalità, non è più funzionante !
« Ultima modifica: 14 Agosto 2014, 13:39:37 da vuott »
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »

Offline Raffa50

  • Grande Gambero
  • ***
  • Post: 101
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #10 il: 05 Settembre 2011, 15:55:19 »
grazie funziona

Offline vuott

  • Moderatore globale
  • Senatore Gambero
  • *****
  • Post: 11.719
  • Ne mors quidem nos iunget
    • Mostra profilo
Re: InputBox (troppo piccoli)
« Risposta #11 il: 05 Settembre 2011, 20:26:45 »
In modo analogo t'ho trovato anche il metodo per aumentare l'altezza della finestrina di InputBox. Si fa tramite chr(13), che nel codice ASCII corrisponde a: \r = ritorno a capo.

Esempio pratico per allargare ed aumentare l'altezza della finestrina:

Codice: [Seleziona]
fcond = InputBox("If:" & String$(10, Chr(9)) & String$(20, Chr(13)))

Devo però far presente che, se nel programma è impostato il componente gb.qt4 (anziché gb.gui oppure gb.gtk), le soluzioni sopra esposte non sono utili: la finestra dell'inputbox non si modifica.


Ho scritto al riguardo la seguente pagina nella nostra WIKI:
http://www.gambas-it.org/wiki/index.php/Impostare_le_dimensioni_di_un_InputBox
« Ultima modifica: 14 Agosto 2014, 14:02:17 da vuott »
« Chiunque, non ricorrendo lo stato di necessità, nel proprio progetto Gambas fa uso delle istruzioni Shell o Exec, è punito con la sanzione pecuniaria da euro 20,00 a euro 60,00. »