Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations Chriss Miller on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

grid

Status
Not open for further replies.

jawadfrhad

Programmer
Joined
Sep 4, 2017
Messages
25
Location
IQ
I thank with all my heart everyone who helped me...
Now....
I created a (form.scx) Shows
Three columns in grid ..on of column content combo box ...
the problem

When I work with the mouse put the first (nameid) value that contains the combo box and move to the next line, I find that the first line changes the value
I have attached the form.



help me
 
 https://files.engineering.com/getfile.aspx?folder=6cc56981-aac9-4a70-beb4-17728abe4038&file=New_folder_(4).rar
Hi,

You did not define neither the ROWSOURCETYPE nor the ROWSOURCE of your combo. Furthermore you may want to set its STYLE to 2

hth

MarK
 
hi thank for answer me
i am define the code
thisform.grd1.Column3.combo1.Margin = 0
thisform.grd1.Column3.combo1.BorderStyle =0
thisform.grd1.Column3.combo1.BoundTo= 2
thisform.grd1.Column3.combo1.ColumnCount = 2
thisform.grd1.Column3.combo1.BoundColumn = 2
thisform.grd1.Column3.combo1.Columnwidths = "200,0"
thisform.grd1.Column3.combo1.RowSourceType = 3
thisform.grd1.Column3.combo1.RowSource = "Select Name, Id From crsShiftNames Where crsShiftDistribution.Shift == crsShiftNames.Shift Into cursor crsNames"
thisform.grd1.Column3.combo1.SpecialEffect = 1
thisform.grd1.Column3.combo1.Style = 2
did you see the form

With that, you can attach a form to me, of course, with the correction, and I will be grateful to you
 
Hi

thisform.grd1.Column3.combo1.RowSource = "Select Name, Id From crsShiftNames Where crsShiftDistribution.Shift == crsShiftNames.Shift Into cursor crsNames"

The result will be an endless loop since it will change asa the record pointer moves in crsShiftNames

You may want to try

Code:
thisform.grd1.Column3.combo1.RowSource = "Select Name, Id From crsShiftNames Into cursor crsNames"

or

*!* Define the variable lcVariable

thisform.grd1.Column3.combo1.RowSource = "Select Name, Id From crsShiftNames Where crsShiftDistribution.Shift == lcVariable Into cursor crsNames"

hth

MarK
 
Status
Not open for further replies.

Part and Inventory Search

Sponsor

Back
Top