Newsgroup: it.comp.lang.vo-clipper
Titolo: errore ?

quel che vi propongo non è certamente un errore, ma è un quyalcosa che disturba il mio senso dell'ordine perchè vo non esegue quanto io dico di fare.
in una data dialogo di colore giallo come sfondo inserisco delle caselle di testo e delle single line edit.
In una delle caselle di testo non inserisco nulla.
come ben sapete il terrore di chi crea programmi sta sempre nell'operatore che pensando ad un guasto interrompe una procedura.
Quindi nella casella vuota inserisco 'Attendere prego...Operazione in corso 1 di....."
il testo è di colore nero, lo sfondo dovrebbe essere di colore giallo, invece è 9 volte su dieci di colore bianco. E non capisco perchè.
Non che questo disturbi, perchè attira meglio l'attenzione dell'operatore, ma disturba in mio senso dell'ordine e il mettere in dubbio chi comanda ( io o vo) ?
Grazie per l'aiuto.
aurora baccio

Buona sera,
 
probabilmente succede quando il controllo ha il focus.
 
Come viene impostato il colore di sfondo?
 
Personalmente uso lo sfondo giallo solo quando un controllo ha il
focus, e fino addesso ha sempre funzionato.
 
Nel mio controllo setto il colore di background nell'evento
FocusChange(), e	 anche nel Disable()/Enable().
 
Saluti
 
Wolfgang

-- 
 


buon giorno, 
so i approfittare della sua cortesia, ma potrebbe per favore farmi un esempio di utilizzo di focuschange() per settare il colore di sfondo della finestra ?
        IF lGotFocus
	oControl:BackGround := Brush{Color{coloryellow}}
	ELSE
	oControl:BackGround := Brush{Color{COLORyellow}}
	ENDIF	
 
utilizzando quanto sopra mi viene segnalato un errore di variabile che non esiste. Ed al solito l'Help non aiuta più di tanto
grazie
aurora baccio

 aurora baccio
 
 
Da dove arriva oControl? E per cambiare lo sfondo della finestra o del
controllo?
 
Solo per capire di che oggetti si tratta.
 
Nel evento FocusChange() della finestra (classe FocusChangeEvent come
dice anche il help) non esiste una variable oControl.
 
Questo codice funziona - appena provato:
 
method FocusChange( oEv ) class NewWindow1
	local oEvent			as FocusChangeEvent
 
	oEvent			:= oEv
	super:FocusChange( oEvent )
	if oEvent:GotFocus
		self:Background		:= Brush{ Color{ COLORYELLOW } }
	else
		self:Background		:= Brush{ Color{ COLORBLUE } }
	endif
 
	return nil
 
Saluti
 
Wolfgang
 
 
 
 
 
-- 
 


buon pomeriggio,
infatti si è trattato di uno strampalato errore. Ho cercato di incollare quanto utilizzo con EditFocusChange. Le chiedo Scusa.
In ogni caso ho dubitato solo una volta per quanto da lei suggerito, e le posso assicurare che non ripeto mai due volte lo stesso errore.
Per quanto riguarda il suo suggerimento, c'ero arrivata dopo aver verificato l'errore di cui sopra, ma la finestra continua ad avere lo stesso irritante difetto.
Ovvero : finestra iniziale, sfondo giallo e testo nero.
parte l'attività evento su fixedtext2 (attendere prego...sto costruendo la riga N° ) lo sfondo diventa bianco ed il testo nero.
Fine costruzione righe, lo sfondo è giallo ed il testo nero.
FixedText2 è settata nelle proprietà con sfondo giallo, testo nero.
Questa procedura mi crea le righe di codice xml necessarie per l'invio dei dati ai fini del modello 730. (cosiddetto modello 730 precompilato).
È irritante.
Aurora Baccio

 modello 730 precompilato).  È irritante.  Aurora Baccio
 
 
 
--