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!

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

Search results for query: *

  1. neculai

    Destroy event and Do while

    Thank you all for your valuable ideas. I've done the code working, and as you pointed out, it's better to avoid Do While loops at all costs. Here is the code I've used in the NodeClick event. Lparameters Node Thisform.B1.Enabled = .F. * --- Be sure we select a Child, not a Parent node ...
  2. neculai

    Destroy event and Do while

    Actually, I used this code in the Click and DblClick events of a TreeView ACtiveX object: *** ActiveX Control Event *** * --- Be sure we enable the button only if we select a Child, not a Parent node ThisForm.B1.Enabled = .F. * --- Be sure we select a Child, not a Parent node q = .T. Do While...
  3. neculai

    Destroy event and Do while

    I have a Do while loop in a form. This loop is running, waiting for a logical variable to exit (stop). When I try to close the form clicking on [X] (and firing this way the Destroy event), the form is not closing, because the loop is still running. How can I do this? Thanks. Neculai
  4. neculai

    TreeView behaviour

    Thanks, Olaf For i = 1 To This.List1.Nodes.Count This.List1.Nodes(i).BackColor = RGB(255,255,255) This.List1.Nodes(i).ForeColor = RGB(0,0,128) Next oFont = This.List1.Font With oFont .Name = 'Arial' .Size = '8' Endwith It works perfectly. All the best, Neculai
  5. neculai

    TreeView behaviour

    Thank you all, I finally made The TreeView work. My mistake was that I was trying to delete nodes in a For-Next loop, and the initial counter was not dynamically decreased automatically. So I used the For-Next in a Do while-Enddo loop with few more variables. One more question. I try to change...
  6. neculai

    TreeView behaviour

    Thank you, Vilhelm. Actually, my code is more lengthy and complex and I did some tricks like counting how many children I have before the actual deleting. Indeed, I thought first that the nCount is dynamical changed, but it's not. Still, I have the same problem, when I do these steps: 1. I...
  7. neculai

    TreeView behaviour

    Hi, experts I want to use TreeView dynamically. I did these steps (code below is simplified): 1. Built one TreeView (code in Form's Init) with 2 parents This.List1.Nodes.Add(, 1, 'TX', 'Taxonomy', 0) This.List1.Nodes.Add(, 1, 'ID', 'Identifiers', 0) This.List1.Nodes.Add('TX', 4...
  8. neculai

    Grid color banding

    Thanks, Mike and Olaf. I've followed your advises and here it's my code in the Init of the Grid. *--- curColor Create Cursor curColor(iColor I) *--- Set the relationship Select (This.RecordSource) Go Top Set Relation To Recno() Into curColor *--- Populate curColor Select (This.RecordSource)...
  9. neculai

    Grid color banding

    Hi, experts I've tried to achieve the alternate coloring, and something is obviously wrong for me. Here is my code in the Init of the Grid. *--- Create the index for sorting on columns Select (This.RecordSource) Index on accenumb tag accenumb of (This.RecordSource) Index on genus tag genus...
  10. neculai

    TreeView in a ListBox

    Thank you, Mike and Dan. I've used a ListBox with few items, and I did the TreeView Like behaviour (expanding from a node), but I couldn't do the reverse (once expanded, I couldn't do the return to the initial state). The graphics is not exactly like in TreeView node expanding, but the function...
  11. neculai

    TreeView in a ListBox

    I would like to know if it is possible to use TreeView control inside a ListBox. I have populated a ListBox with few items, using AddItem(), and one of the Items I would like to have the same behaviour like a TreeView. I don't have experience with TreeView at all, but I want to know if this...
  12. neculai

    Replacing the System Menu with a Custom Menu

    Thanks, Olaf and Mike. Following your advice, I've fixed my menu, and now it works great, I've used Mike's approach. I would have liked to use different fonts and sizes for the menu characters, but it seems it's not recommendable because these are Windows settings. Tried DEFINE PAD PadOne OF...
  13. neculai

    Replacing the System Menu with a Custom Menu

    When I try to replace the System Menu with a Custom Menu, I have difficulties: - if I click anywhere outside the Custom Menu, the Menu just disappears and I am stuck in Visual FoxPro9, not being able to close it, so I need to call Task Manager to force closing. - if I click on an Item, the Form...

Part and Inventory Search

Back
Top