×
INTELLIGENT WORK FORUMS
FOR COMPUTER PROFESSIONALS

Log In

Come Join Us!

Are you a
Computer / IT professional?
Join Tek-Tips Forums!
  • Talk With Other Members
  • Be Notified Of Responses
    To Your Posts
  • Keyword Search
  • One-Click Access To Your
    Favorite Forums
  • Automated Signatures
    On Your Posts
  • Best Of All, It's Free!
  • Students Click Here

*Tek-Tips's functionality depends on members receiving e-mail. By joining you are opting in to receive e-mail.

Posting Guidelines

Promoting, selling, recruiting, coursework and thesis posting is forbidden.

Students Click Here

Jobs

Open form from Table Frame view with mouse double click

Open form from Table Frame view with mouse double click

Open form from Table Frame view with mouse double click

(OP)
We would like to view our database in a table view form.  When we find a record of interest we'd like to double click on the row for the record that opens a form view of the record to get to all the memo fields and child table info as a table frame to the parent record.

i.e.   view customers in table frame view.  Double click customer of interest and new form with address, etc in a form view and on the same form is a tableview of that customers orders.

Thanks,
Bill

RE: Open form from Table Frame view with mouse double click


You can't attach code to a tableview.

Is that your question?

Or are you talking about a tableframe on a form?

Tony McGuire
"It's not about having enough time; we have the rest of our lives.  It's about priorities."

RE: Open form from Table Frame view with mouse double click

If you're talking about a tableframe, then this code may help. It is attached to "MouseDouble" in the object explorer for the 1st field in the tableframe. It takes the order number from that field and opens a new form with all the details of the order. Obviously you will need to change the names of your tables, fields and forms to suit but it does seem to work very nicely.

var
frm  form
orderNum number
tc Tcursor
endvar

orderNum=custorder.value

if isedit() then endedit() endif
tc.open("Temp1")
if orderNum.isBlank() = false  then
  if tc.locate("custorder",orderNum) then
  if tc.qlocate(orderNum) then ; use qlocate if client # is the primary key field, much faster.
  frm.open("orderentry")   
      frm.custorder.movetorecord(tc)
      ;frm.custorder.setRange(orderNum) ; use setrange to keep the user from moving off the record
  else
          MsgStop("Error",ordernum.string()+" "+"Is Not a Valid Number")
    endif
endif
 endif
tc.close()

Lewy

Red Flag This Post

Please let us know here why this post is inappropriate. Reasons such as off-topic, duplicates, flames, illegal, vulgar, or students posting their homework.

Red Flag Submitted

Thank you for helping keep Tek-Tips Forums free from inappropriate posts.
The Tek-Tips staff will check this out and take appropriate action.

Reply To This Thread

Posting in the Tek-Tips forums is a member-only feature.

Click Here to join Tek-Tips and talk with other members! Already a Member? Login

Close Box

Join Tek-Tips® Today!

Join your peers on the Internet's largest technical computer professional community.
It's easy to join and it's free.

Here's Why Members Love Tek-Tips Forums:

Register now while it's still free!

Already a member? Close this window and log in.

Join Us             Close