This program exibits the following behaviour :
if I shrink orizontally the window so that an editcontrol is no more visible,
as I enlarge it to the point where the editcontrol should reappear, it makes
disappear even the adjacent text control.
This happens only If I remove all the attributes spacing, hmargin or vmargin
of the CompoundControl, or if the attributes have the indicated values.
Having one or more of them, with values greater than the indicated values, it
makes the Compound control work correctly.
This does't happens with LayoutControls.
Best regards.
Maurizio.
module test
import StdEnv , StdIO
Start world
= startIO SDI Void initialize [ProcessClose closeProcess] world
initialize = snd o openWindow Void mywin
mywin = Window "Test" controls [ WindowClose (noLS closeProcess),
WindowOuterSize {w=600, h=300}, WindowPos (Fix, OffsetVector {vx=400,vy=300}) ]
where
controls =
CompoundControl (
TextControl "First name" [ControlWidth lw]
:+:
EditControl "" ew 1 []
) [ControlPos (Fix,OffsetVector {vx=30,vy=30}), hmargin ] // it works with
at least one valid attribute
:+:
CompoundControl (
TextControl "Last name" [ControlWidth lw]
:+:
EditControl "" ew 1 []
) [ControlPos (BelowPrev,zero) , vmargin ] // it works with at least one
valid attribute
lw = PixelWidth 200
ew = PixelWidth 300
spacing = ControlItemSpace 1 1 // does not works with 0 0 or 0 1, works with
1 0 or greater values
hmargin = ControlHMargin 1 1 // does not works with 0 0, 0 1 or 1 0, works
with 1 1 or greater values
vmargin = ControlVMargin 1 1 // does not works with 0 0, 0 1 or 1 0, works
with 1 1 or greater values
-----------------------------------------------------------------------------
Il presente messaggio, corredato dei relativi allegati, contiene informazioni
da considerarsi strettamente riservate ed è destinato esclusivamente al
destinatario sopra indicato, il quale è l'unico autorizzato ad usarlo, copiarlo
e, sotto la propria responsabilità, diffonderlo. Chiunque ricevesse questo
messaggio per errore o comunque lo leggesse senza esserne legittimato è
avvertito che trattenerlo, copiarlo, divulgarlo, distribuirlo a persone diverse
dal destinatario è severamente proibito, ed è pregato di rinviarlo
immediatamente al mittente distruggendone l'originale.
This message, together with its annex(es), contains information to be deemed
strictly confidential and is destined only to the addressee(s) identified above
who only may use, copy and, under his/their responsibility, further disseminate
it. If anyone received this message by mistake or reads it without entitlement
is forewarned that keeping, copying, disseminating or distributing this message
to persons other than the addressee(s) is strictly forbidden and is asked to
transmit it immediately to the sender and to erase the original message
received.
_______________________________________________
clean-list mailing list
[email protected]
http://mailman.science.ru.nl/mailman/listinfo/clean-list
