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 strongm 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. Eugen Fintina

    ListBox & RowSource

    The old application that I previously reminded was written in FPD 2.6. And I learned FPD from Help and from a borrowed book (I don't remind title or author). At that moment the internet was very, very expensive, I had few incomes and surely, I couldn't pay for it. So, if I read somewhere, I...
  2. Eugen Fintina

    ListBox & RowSource

    The form where I must use this ListBox is a complex one (it has, maybe, more then 150 controls, a lot of custom methods and properties, tables, cursors and so on). I can't divide it into more forms because of client's express requirement. After a lot of optimizations, it works smoothness and...
  3. Eugen Fintina

    ListBox & RowSource

    Unfortunately, I can't get the code that I spoke about because now it belongs to the client and it is too complicate to get it from him, but I managed to reconstruct something similar. Please, take a look. PUBLIC oform1 oform1 = NEWOBJECT("form1") oform1.Show RETURN DEFINE CLASS form1 AS form...
  4. Eugen Fintina

    ListBox & RowSource

    Thank you Mike, Chris! I'm sure that you are right. Meanwhile I found a workaround that solved my problem. But, if my memory didn't lie me, I'm pretty sure that in the past I populated ListBox with a complex expression (even with values from different tables) without using SQL. Maybe, I'm wrong...
  5. Eugen Fintina

    ListBox & RowSource

    I have a ListBox with RowSourceType = 6 (Fields) and tried two ways to set RowSource for it: [ol 1] lcRowSource1 = "MyTable.MyFirstField,id" lcRowSource2 = "alltrim(alltrim(MyTable.MyFirstField) + ' ' + alltrim(MyTable.MySecondField)),id" [/ol] If I use lcRowSource1 to initialize ListBox, all...
  6. Eugen Fintina

    Strange behavior

    Sorry, Mike. I think that I was not clear. I have two forms (Form 1 and Form 2). Both have properties sets like: AlwaysOnTop = .T. WindowType = 1 – Modal Desired behavior: 1. Form 1 was opened and is visible 2. Call the method that belong to Form 1 2.1. Form 1 is hidden 2.2. Form 2 is open...
  7. Eugen Fintina

    Strange behavior

    I have two forms (Form_01 and Form_02). Both have properties sets like: AlwaysOnTop = .T. WindowType = 1 – Modal In a custom method of Form_01 I have the following code: Local lnParam lnParam = 2 With Thisform .Visible = .F. Do Form Form_02 With lnParam .Visible = .T. Endwith When I call...
  8. Eugen Fintina

    Populate a web form from vfp

    I need to populate a web form from vfp. I know that it is possible but I'm not sure what is the best approach. I do not want to pass the data through URL because it's possible to have a lot of character and I'm afraid that I'll reach the limit.
  9. Eugen Fintina

    How to Implement Role Based Access Control

    Dear friends, Thank you all for your detailed suggestions. Certainly they will help me implement a robust permission control system. Now I just have to start working! All the best, Eugen
  10. Eugen Fintina

    How to Implement Role Based Access Control

    I’m trying to find a method to implement Role Based Access Control. Initially, I’ve defined some fixed roles (SuperAdmin, Admin, SuperUser, User, Visitor) and assigned each of them its access rights. Each role has all rights as lower one level plus some specific rights. All was Ok and worked...
  11. Eugen Fintina

    Enable / disable "Save" button

    Dear friends, First off all I want to ask you all to excuse me about my silence into last two days. I had a specially event into family (actually was my niece's christening) so I must keep away from my computer. Second I must tell you that english is not my native language so I am afraid that...
  12. Eugen Fintina

    Enable / disable "Save" button

    I have a grid based on a cursor. I want to enable/disable the "Save" button if the user modified or revert to the modifications regards to any cursor's records. I tried to use SYS(2017) function but without any success.
  13. Eugen Fintina

    Reports. Can Summary Band be made optional at runtime?

    Even if you set, for all contents in summary band, the properties "Print when" -> "Remove line if blank" to "check"? Dear Griff, I am only a newby regards to you so I ask you to not mind, but may be... All the best, Eugen
  14. Eugen Fintina

    Report with multiple details bands and summary issue

    After days of trying to find a solution, finally I found one. Thank's to Cathy Pountney for it!!! I reproduce it because nowadays Foxpro's resources are all less and less , but you can find original hint here: http://cathypountney.blogspot.ro/2008/04/how-do-i-total-fields-for-one-detail.html...
  15. Eugen Fintina

    Report with multiple details bands and summary issue

    ...grouping: invoices.id 2. Detail 1 2.1. Target alias expression: "Items" 2.2. Detail band: items.quantity, items.price and value (items.quantity * items.price) 2.3. Detail footer: Total of values 2. Detail 2 2.1. Target alias expression: "Payments" 2.2. Detail band: payments.date and...
  16. Eugen Fintina

    Report with multiple details bands and summary issue

    Hello everybody, I have a report with multiple details bands. Everything is Ok less the summary values. I don't understand why, but I get values multiplied 2 or even 3 times. The totals that I made in detailes footer and group footer are corects. I must mention that I tried sum fields values...
  17. Eugen Fintina

    KeyPress method and nKeyCode = 22

    Actually I don't have any enabled textbox on my form. My client want to use Ins key as a shortcut for a button that open a form for inserting a new record. Like a replacement to the classic "ALT + KEY". That means that it is not a "must have", but I am confused about this strange behavior. May...
  18. Eugen Fintina

    KeyPress method and nKeyCode = 22

    Hello, Mike! 1. If I create a new form with NO CONTROLS and put the code in the form's KeyPress, all it's OK. 2. If I create a new form with SINGLE TEXTBOX CONTROL and put the code in the form's KeyPress, I've got the behavior that I described. Eugen
  19. Eugen Fintina

    KeyPress method and nKeyCode = 22

    Hello, Olaf! If I set form.keypreview = .T. I have the following behavior: Do Case Case nKeyCode = 22 && ALL IT'S OK Wait Window '"INS" key was pressed!' Case nKeyCode = 162 && NOTHING HAPPENED Wait Window '"ALT + INS" key was pressed!' Endcase Actually, it seems that I got reverse...
  20. Eugen Fintina

    KeyPress method and nKeyCode = 22

    Hello, my friends! I need to fire an action when user press "INS" key. I added the following code in KeyPress method of my form, but I got a strange behauvier. What's wrong in code? Do Case Case nKeyCode = 22 && NOTHING HAPPENED Wait Window '"INS" key was pressed!' Case nKeyCode = 162 &&...

Part and Inventory Search

Back
Top