Pass array elements of a form into a flexGrid

[Stroumfs]

Hello !

I have a form called frmAutoTest where i created an arry

Public Step_Result(44) As String

This array holds the pass or fail from a test.
When i set the breakpoints i see that the array from 1-44 is filled with passed or fail.
I also design a second form called frmResult which it has a flexGrid and a print button.
What i want is to pass the data of the array which is in the form frmAutoTest into the flexGrid which is in the frmResult.
Can anyone help me?
Thanks

[vijaydiwakar]

Hello !

I have a form called frmAutoTest where i created an arry

Public Step_Result(44) As String

This array holds the pass or fail from a test.
When i set the breakpoints i see that the array from 1-44 is filled with passed or fail.
I also design a second form called frmResult which it has a flexGrid and a print button.
What i want is to pass the data of the array which is in the form frmAutoTest into the flexGrid which is in the frmResult.
Can anyone help me?
Thanks

as this is a public array u can use it by creating object of it
drive a loop and assign it to perticular cell with the help of textmatrix property

[Stroumfs]

I didn't presented it very well. Actually the array is private . I changed it to public because i couldn't have access to it.

Is the following what you mean?
Public Sub passresult(ByVal passfail() As String)
Dim i As Integer
For i = 1 To 44
Me.flgPrintingResults.set_TextMatrix(1, 1, passfail(i))
Next

End Sub

[pureenhanoi]

Hello !

I have a form called frmAutoTest where i created an arry

Public Step_Result(44) As String

This array holds the pass or fail from a test.
When i set the breakpoints i see that the array from 1-44 is filled with passed or fail.
I also design a second form called frmResult which it has a flexGrid and a print button.
What i want is to pass the data of the array which is in the form frmAutoTest into the flexGrid which is in the frmResult.
Can anyone help me?
Thanks

insert this code into frmResult

private sub form_load()
dim i as integer
flexGrid.rows = 1
flexGrid.cols = 1
flexGrid.TextMatrix(0,0) = "Pass or fail"
for i=1 to 44
     flexGrid.AddItem Step_Result(i)
next i
end sub
 

[vijaydiwakar]

I didn't presented it very well. Actually the array is private . I changed it to public because i couldn't have access to it.

Is the following what you mean?
Public Sub passresult(ByVal passfail() As String)
Dim i As Integer
For i = 1 To 44
Me.flgPrintingResults.set_TextMatrix(1, 1, passfail(i))
Next

End Sub

ya some what like that

[Stroumfs]

Thanks for the help.
It doesn't work exactly like this but you gave me an idea.

[vijaydiwakar]

Thanks for the help.
It doesn't work exactly like this but you gave me an idea.

try it
if it is not up to the mark then i'll guide u