| dbase 2005-11-11, 11:23 am |
| The way combo boxes display and accept data in dbase plus ver 2.6 has
changed and is causing me problems
The combobox now seems to right align the field contents and if the Field
lenght is longer than the maximum number of chars the first chars if the
field are hidden.
The combobox from the commandwindow (duflp) limits the number of character
that can be entered to 20 which is less than a quarter of the available
width of the combobox. (see attached code)
begin 666 COMMAND.WFM
M+RH-"B @($$@0V]M;6%N9"!W:6YD;W<@=&AA="!C86X@8F4@=7-E9"!F<F]M
M('EO=7(@;W=N(&1I<W1R:6)U=&5D#0H@("!E>&5C=71A8FQE<R!T;R!I<W-U
M92!C;VUM86YD<R N+BX@#0H-"B @($Y/ 5$4Z(%1H:7,@8W)E871E
<R!I=',@
M;W=N("Y)3DD@9FEL92 N+BX-"@T*(" @0V]D92!B>2!2;VUA:6X_($)O=V5N
M/PT**B\-"B-I;F- L=61E(%9D0F%S92Y(#0H
J*B!%3D0@2$5!1$52("TM(&1O
M(&YO="!R96UO=F4@=&AI< R!L:6YE#0HO+PT*+R\@1
V5N97)A=&5D(&]N(#$R
M+S S+S$Y.3<-" B\O#0IP87)A;65T97(@8
DUO9&%L#0IL;V-A;"!F#0IF(#T@
M;F5W(&-O;6UA;F17:6YD;W=&;W)M*"D-"FEF("AB36]D86PI#0H@("!F+FUD
M:2 ](&9A;'-E("\O(&5N< W5R92!N;W0@341)#0H@(
"!F+G)E861-;V1A;"@I
M#0IE;'-E#0H@(" !F+F]P96XH*0T*96YD:6
8-"@T*8VQA<W,@8V]M;6%N9%=I
M;F1O=T9O<FT@;V8@1D]230T*(" @=VET:" H=&AI<RD-"B @(" @(&]N1V]T
M1F]C=7,@/2!C;&%S<SHZ3TY'3U1&3T-54PT*(" @(" @;VY,;W-T1F]C=7,@
M/2!C;&%S<SHZ3TY,3U-41D]#55,-"B @(" @(&]N4VEZ92 ](&-L87-S.CI/
M3E-)6D4-"B @(" @(&]N3W!E;B ]('L& #91;9F]R;2YO;D=O=$9O
8W5S*"D[9F]R
M;2YC;VUB;V)O>#$N<V5T9F]C=7,H*7T-"B @(" @(&]N0VQO<V4@/2!C;&%S
M<SHZ3TY#3$]310T*(" @(" @;W!E;B ](&-L87-S.CI/4$5.#0H@(" @("!R
M96%D36]D86P@/2!C;&%S<SHZ4D5!1$U/1$%,#0H@(" @("!S8V%L949O;G1"
M;VQD(#T@9F%L<V4-"B @(" @(&AE:6=H=" ](#$V#0H@(" @("!L969T(#T@
M.2XX-3<Q#0H@(" @("!T;W @/2 S+C0P.3$-"B @(" @('=I9'1H(#T@.3$N
M,30R.0T*(" @(" @=&5X=" ](" )#;VUM86YD(%=I;F1O=R
(-"B @(" @(&%U
M=&]#96YT97(@/2!T<G5E#0H@(" @("!M9&D@/2!F86QS90T*(" @(" @:6-O
M;B ](")R97-O=7)C92 C,3(Q(@T*(" @(" @<F5F<F5S:$%L=V%Y<R ](&9A
M;'-E#0H@("!E;F1W:71H#0H-"@T*(" @=&AI<RY#3TU"3T)/6#$@/2!N97<@
M0T]-0D]"3U@H=&AI<RD-"B @('=I=&@@*'1H:7,N0T]-0D]"3U@Q*0T*(" @
M(" @:&5I9VAT(#T@,"XY-30U#0H@(" @("!L969T(#T@- T*(" @(" @=&]P
M(#T@,"XQ.#$X#0H@(" @("!W:61T:" ](#@W#0H@(" @("!M971R:6,@/2 P
M"2\O($-H87)S#0H@(" @("!S<&5E9%1I<" ](")%;G1E<B!C;VUM86YD(@T*
M(" @(" @9F]N=$YA;64@/2 B35,@4V%N<R!397)I9B(-"B @(" @(&9O;G13
M:7IE(#T@. T*(" @(" @<W1Y;&4@/2 Q" 2\O($1R;W!$;W=N#0H@(
"!E;F1W
M:71H#0H-"@T*(" @=&AI< RY%1$E43U(Q(#T@;F5W(
$5$251/4BAT:&ES*0T*
M(" @=VET:" H=&AI<RY%1$E43U(Q*0T*(" @(" @:&5I9VAT(#T@,30N-C@Q
M. T*(" @(" @;&5F=" ](# -"B @(" @('1O<" ](#$N,C<R-PT*(" @(" @
M=VED=&@@/2 Y,0T*(" @(" @;65T<FEC(#T@, DO+R!#:&%R<PT*(" @(" @
M=F%L=64@/2 B(" @(" @(@T*(" @(" @;6]D:69Y(#T@9F%L<V4-"B @(" @
M('=R87 @/2!F86QS90T*(" @(" @9F]N=$YA;64@/2 B0V]U<FEE<B!.97<B
M#0H@(" @("!F;VYT4VEZ92 ](#@-"B @(" @(&-U851A8B ]('1R=64-"B @
M(" @(&)O<F1E<E-T>6QE(#T@-PDO+R!#;&EE;G0-"B @(&5N9'=I=&@-"@T*
M#0H@("!T:&ES+E!54TA" 55143TXQ(#T@;F5W(%!5
4TA"55143TXH=&AI<RD-
M"B @('=I=& @@*'1H:7,N4%532$)55%
1/3C$I#0H@(" @("!O;D-L:6-K(#T@
M8VQA<W,Z.E)53D-/34U!3D0-"B @(" @(&AE:6=H=" ](#$-"B @(" @(&QE
M9G0@/2 P+C(X-3<-"B @(" @('1O<" ](# N,3@Q. T*(" @(" @=VED=&@@
M/2 S+C,-"B @(" @('1E>'0@/2 B(@T*(" @(" @;65T<FEC(#T@, DO+R!#
M:&%R<PT*(" @(" @<W!E961"87(@/2!T<G5E#0H@(" @("!U<$)I=&UA<" ]
M(")215-/ 55)#12!44U]254XB#0H@
(" @("!S<&5E9%1I<" ](")%>&5C=71E
M(&-O;6UA;F0B#0H@(" @("!G<F]U<" ](&9A;'-E#0H@(" @("!V86QU92 ]
M(&9A;'-E#0H@("!E;F1W:71H#0H-"@T*(" @1E5.0U1)3TX@3W!E;@T*(" @
M(" @8VQA<W,Z.DEN:70H*0T*(" @(" @4D5455).('-U<&5R.CIO<&5N*"D-
M"@T*(" @1E5.0U1)3TX@4F5A9$UO9&%L#0H@(" @("!C;&%S<SHZ26YI="@I
M#0H@(" @("!215154DX@<W5P97(Z.G)E861-;V1A;"@I#0H-"B @($953D-4
M24].($EN:70-"B @(" @('-E="!P<F]C961U<F4@=&\@0W5R<V]R+D-C(&%D
M9&ET:79E#0H@(" @("!T:&ES+D-U<G-O<B ](&YE=R!#=7)S;W(H*0T*(" @
M(" @=&AI<RY486QK(#T@<V5T*")T86QK(BD-"B @(" @('1H:7,N4V%F971Y
M(#T@<V5T*")S869E='DB*0T*(" @(" @<V5T('-A9F5T>2!O9F8-"B @(" @
M('1H:7,N16UP='D@/2!F=6YI<75E*"DK(BYT>'0B#0H@(" @("!F8VQO<V4H
M9F-R96%T92AT:&ES+D5M<'1Y*2D-"B @(" @('1H:7,N4F5S=6QT<R ](&9U
M;FEQ=64H*2LB+G1X="(-"B @(" @(&9C;& ]S92AF8W)E871E*'1H:7
,N4F5S
M=6QT<RDI#0H@(" @("!F;W)M+F5D:71O<C$N9&%T86QI;FL@/2 B9FEL96YA
M;64@(BMF;W)M+D5M<'1Y#0H@(" @("!L;V-A;"!L1FQA9PT*(" @(" @;$9L
M86<@/2!T<G5E#0H@(" @("!I9B!F:6QE*")#;VUM86YD5VEN9&]W+DUE;2(I
M#0H@(" @(" @("!R97-T;W)E(& 9R;VT@0V]M;6%N9%=I;F
1O=RY-96T@861D
M:71I=F4-"B @(" @(" @(&EF(&%#;VUM86YD<RYS:7IE(#X@, T*(" @(" @
M(" @(" @=&AI<RY#;VUM86YD<R ](&%#;VUM86YD<PT*(" @(" @(" @96QS
M90T*(" @(" @(" @(" @=&AI<RY#;VUM86YD<R ](&YE=R!A<G)A>2@I#0H@
M(" @(" @(" @("!L1FQA9R ](&9A;'-E#0H@(" @(" @("!E;F1I9@T*(" @
M(" @96QS90T*(" @(" @(" @=&AI<RY#;VUM86YD<R ](&YE=R!A<G)A>2@I
M#0H@(" @(" @("!L1FQA9R ](&9A;'-E#0H@(" @("!E;F1I9@T*(" @(" @
M=&AI<RYC;VUB;V)O>#$N9&%T87-O=7)C92 ](")A<G)A>2!F;W)M+D-O;6UA
M;F1S(@T*(" @(" @:68@;$9L86<-"B @(" @(" @('1H:7,N8V]M8F]B;W@
Q
M+G9A;'5E(#T@=&AI<RY#;VUM86YD<UMT:&ES+D-O;6UA;F1S+G-I>F5=#0H@
M(" @("!E;F1I9@T*(" @(" @=&AI<RYC;VUB;V)O>#$N<V5T9F]C=7,H*0T*
M(" @(" @<F5T=7)N#0H@(" @(" -"@T*(" @1E5. 0U1)3TX@4G5N0V]M;6%N
M9 T*(" @(" @:68@:7-B;&%N:RAF;W)M+F- O;6)O8F]X,2YV86QU92D
-"B @
M(" @(" @(%)%5%523@T*(" @(" @96YD:68-"B @(" @(&9O<FTN0W5R<V]R
M+D)E9VEN5V%I="@I#0H@(" @(" !F;W)M+D9R965Z92@I#0
H@(" @("!P<FEV
M871E(&-#;VUM86YD#0H@(" @("!C0V]M;6%N9" ]('1R:6TH9F]R;2YC;VU
B
M;V)O>#$N=F%L=64I#0H@(" @("!F;W)M+F5D:71O<C$N9&%T86QI;FL@/2 B
M9FEL96YA;64@(BMF;W)
M+D5M<'1Y#0H@(" @(" !S970@86QT97)N871E('
1O
M("AF;W)M+E)E<W5L=',I("\O861D:71I=F4-"B @(" @('-E="!A;'1E<FYA
M=&4@;VX-"B @(" @('-E="!T86QK(&]N#0H@(" @(" _(")69$(^(BMC0V]M
M;6%N9 T*(" @(" @=')Y#0H@(" @(" @(" F8T-O;6UA;F0N#0H@(" @("!C
M871C:" H97AC97!T:6]N(&4I#0H@(" @(" @("!S970@=&%L:R!O9F8-"B @
M(" @(" @($%L97)T365S<V%G92AE+FUE<W-A9V4L(")%<G)O<B!#;V1E("(K
M;'1R:6TH<W1R*&4N8V]D92DI*0T*(" @(" @96YD=')Y#0H@(" @("!S970@
M=&%L:R!O9F8-"B @(" @('-E="!A;'1E<FYA=&4@;V9F#0H@(" @("!C;&]S
M92!A;'1E<FYA=&4-"B @(" @(&9O<FTN961I=&]R,2YD871A;&EN:R ](")F
M:6QE;F%M92 B*V9O<FTN4F5S=6QT<PT*(" @(" @9F]R;2YE9&ET;W(Q+FME
M>6)O87)D*")[8W1R;"UE;F1](BD-"B @(" @(&9O<FTN0V]M;6%N9',N861D
M*&-#;VUM86YD*0T*(" @(" @9F]R;2YC;VUB;V)O>#$N9&%T87-O=7)C92 ]
M(")A<G)A>2!F;W)M+D-O;6UA;F1S(@T*(" @(" @9F]R;2YC;VUB;V)O>#$N
M=F%L=64@/2!C0V]M;6%N9 T*(" @(" @9F]R;2Y#=7)S;W(N16Y
D5V%I="@I
M#0H@(" @("!F;W)M+E5N1G)E97IE*"D-"B @(" @(')E='5R;@T*#0H@("!&
M54Y#5$E/ 3B!O;D=O=$9O8W5S#0H@
(" @("!?87!P+D-O;6UA;F17:6YD;W=&
M;W)M(#T@=&AI<PT*(" @(" @;VX@:V5Y(&QA8F5L('1A8B!?87!P+D-O;6UA
M;F17:6YD;W=&;W)M+E-H:69T1F]C=7,H*0T*(" @(" @<F5T=7)N#0H-"B @
M($953D-424].(&]N3&]S=$9O8W5S#0H@(" @("!?87!P+D-O;6UA;F17:6YD
M;W=&;W)M(#T@;G5L; T*(" @(" @;VX@:V5Y(&QA8F5L('1A8@T*(" @(" @
M<F5T=7)N#0H-"B @($953D-424].(&]N4V5L96-T:6]N#0H@(" @("!F;W)M
M+E)U;D-O;6UA;F0H*0T*(" @(" @<F5T=7)N#0H-"B @($953D-424].(%-H
M:69T1F]C=7,-"B @(" @(&EF(&9O<FTN86-T:79E0V]N=')O;"YN86UE(#T]
M(")%1$E43U(Q(@T*(" @(" @(" @9F]R;2YC;VUB;V)O>#$N<V5T9F]C=7,H
M*0T*(" @(" @96QS90T*(" @(" @(" @9F]R;2YE9&ET;W(Q+G-E=&9O8W5S
M*"D-"B @(" @(&5N9&EF#0H@(" @("!R971U<FX-"@T*(" @1E5.0U1)3TX@
M;VY#;&]S90T*(" @(" @;&]C86P@:2P@;E-T87)T26YD97@L(&Y#;VUM86YD
M<PT*(" @(" @< ')I=F%T92!A0V]M;6%N9
',-"B @(" @(&Y3=&%R=$EN9&5X
M(#T@;6%X*&9O<FTN0V]M;6%N9',N<VEZ92TY+#$I#0H@(" @("!N0V]M;6%N
M9',@/2!F;W)M+D-O;6UA;F1S+G-I>F4K,2UN4W1A<G1);F1E> T*(" @(" @
M84-O;6UA;F1S(#T@;F5W(&%R<F%Y*"D-"B @(" @(&9O<B!I(#T@,"!T;R!N
M0V]M;6%N9',M,0T*(" @(" @(" @84-O;6UA;F1S+F%D9"AF;W)M+D-O;6UA
M;F1S6VDK;E-T87)T26YD97A=*0T*(" @(" @;F5X="!I#0H@(" @("!S879E
M(&%L;"!L:6ME(&%#;VUM86YD< R!T;R!#;VUM86YD5VEN9
&]W+DUE;0T*(" @
M(" @9F]R;2YE9&ET;W(Q+F1A=&%L:6YK(#T@;G5L; T*(" @(" @9F]R;2YE
M9&ET;W(Q+G)E;&5A<V4H*0T*(" @(" @:68@9FEL92AT:&ES+E)E<W5L=',I
M#0H@(" @(" @("!T<GD-"B @(" @(" @(" @(&5R87-E("AT:&ES+E)E<W5L
M=',I#0H@(" @(" @("!C871C:" H97AC97!T:6]N(&4I#0H@(" @(" @("!E
M;F1T<GD-"B @(" @(&5N9&EF#0H@(" @(" !I9B!F:6QE*'1H:7,N16
UP='DI
M#0H@(" @(" @("!T<GD-"B @(" @(" @(" @(&5R87-E("AT:&ES+D5M<'1Y
M*0T*(" @(" @(" @8V%T8V@@*&5X8V5P=&EO;B!E*0T*(" @(" @(" @96YD
M=')Y#0H@(" @("!E;F1I9@T*(" @(" @8U1A;&L@/2!T:&ES+E1A;&L-"B @
M(" @('-E="!T86QK("9C5&%L:RX-"B @(" @(&-3869E='D@/2!T:&ES+E-A
M9F5T>0T*(" @(" @<V5T('-A9F5T>2 F8U-A9F5T>2X-"B @(" @("-I9F1E
M9B!$14)51PT*(" @(" @(" @<VAE;&PH=')U92D-"B @(" @("-E;F1I9@T*
M#0H@("!&54Y#5$E/3B!/;E-I>F4H(& Y3:7IE5'EP92P@;E=I9'
1H+"!N2&5I
M9VAT("D-"B @(" @(&EF(&Y3:7IE5'EP92 ](# @;W(@;E-I>F54>7!E(#T@
M,@T*(" @(" @(" @9F]R;2YC;VUB;V)O>#$N=VED=&@@/2!N=VED=&@@+2!F
M;W)M+F- O;6)O8F]X,2YL969T#0H
@(" @(" @("!F;W)M+F5D:71O<C$N:&5I
M9VAT(#T@;FAE:6=H=" M(&9O<FTN961I=&]R,2YT;W -"B @(" @(" @(&9O
M<FTN961I=&]R,2YW:61T:" ](&YW:61T:" M(&9O<FTN961I=&]R,2YL969T
M( T*(" @(" @96YD:68-"B @(" @(')E='5R;@T*#0H@("!&54Y#5$E/3B!&
M<F5E>F4-"B @(" @(&EF('1Y<&4H("),;V-K5VEN9&]W57!D871E(B I(",@
M(D90(@T*(" @(" @(" @97AT97)N($- ,3T=)0T%,($QO8VM7:6Y
D;W=5<&1A
M=&4H($-(04Y$3$4@*2!5<V5R,S(-"B @(" @(&5N9&EF#0H@(" @("!I9B!T
M:&ES+FA7;F0@/B P#0H@(" @(" @("!,;V-K5VEN9&]W57!D871E*"!T:&ES
M+FA7;F0@*0T*(" @(" @96YD:68-"B @(" @(')E='5R;@T*#0H@("!&54Y#
M5$E/3B!5;D9R965Z90T*(" @(" @:68@='EP92@@(DQO8VM
7:6YD;W=5<&1A
M=&4B("D@(R B1E B#0H@(" @(" @("!E>'1E<FX@0TQ/1TE#04P@3&]C:U=I
M;F1O=U5P9&%T92@@0TA!3D1,12 I(%5S97(S,@T*(" @(" @96YD:68-"B @
M(" @($QO8VM7:6YD;W=5<&1A=&4H(# @*0T*(" @(" @<F5T=7)N#0IE;F1C
&;&%S<PT*
`
end
|