--------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00009 Date: 12/09/94 From: TOM DARRAGH Time: 04:20pm \/To: ALL (Read 15 times) Subj: Date Calculations My problem is :::::: I would like to know an ObjectPal routine that will automatically fill in a "due date" field on a table that I have already built and entered data. The "due date" value is the last Friday of each month. The records that I have entered start in January 1981. My old method of entering the due date is obsolete. So, I need to automatically enter into each record the date that corresponds with the last Friday of each month. Now...after I update the "due date" field for each record I want to modify the routine (or write completely new one) that will automatically calculate the next due date starting with "today". Is this a problem that can be handled by ObjectPal??? If so I would like to hear from someone that is CHALLANGED by this (or anyone who thinks it's easy for that matter...) I really need the help!!! Thanks in advance!!! --- RBBSMail 17.3A * Origin: PCUG BBS - San Francisco HST/V.32 415-621-2609 (RBBS 1:125/41.0) --------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00010 Date: 12/12/94 From: ALFRED W. BRAZIE Time: 12:23pm \/To: ALL (Read 14 times) Subj: Label merge I have been using the first version of Paradox for Windows and it gives me problems with printing labels. I set up the report and it will print out the first page of the merge in beautiful form, but the second pages is compressed to the left and won't line up on the labels properly. I have been able to diddle things so that the 2nd. and up are OK but the firt page won't line up. Any ideas about what I am doing wrong, or is this a program bug? I've been exporting to a wp to beat the problem, but it is a pain and would like to be able to print labels directly from Paradox. Wayne * Wave Rider 1.20 [NR] * ... UNREGISTERED EVALUATION COPY --- Blue Wave/RA * Origin: PipeLine! - People Online * Palm Bay Fl 407-728-7386 (1:374/147) --------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00011 Date: 12/11/94 From: KENNETH ULLMAN Time: 10:49am \/To: ALL (Read 17 times) Subj: GETTING ZERO TO BE ZERO sometimes when I sum two columns and then take the difference between the two, the answer should be zero is not! I shows up and prints as zero (0.00) but when I do a query and ask for all records that have <0 in this field I get these records. How do I make sure that zero is zero. thanking you in advance, kenneth Ullman --- FLAME v1.1 * Origin: HAL-PC - The New Generation - (713)963-4100 (1:106/4100) --------------- ** A related thread FOLLOWS this message. FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGKB2876 Date: 12/16/94 From: STEVE BOOTH Time: 07:47am \/To: KENNETH ULLMAN (Read 12 times) Subj: R: GETTING ZERO TO BE ZERO Re: getting quick answers to a variety of records in a script in Paradox for DOS... I'd use a Query and the Calc Count option to get the number of records... Regards, STeve... (Exec-PC Netmail: 1:154/280) --------------- >>>>>>>>>>>>>>>>>>>>>> LAST Message In Thread <<<<<<<<<<<<<<<<<<<<<< FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00012 Date: 12/12/94 From: LANCE LEONARD Time: 09:59pm \/To: DAVID SHERMAN (Read 14 times) Subj: Pdox win question David, A couple of days ago, I promised to see if I couldn't put together a code sample for calling the messageBox() function from the Windows API. Well, I've managed to do so and here's the results, which I'm going to post in two messages (just in case some of our collegues are calling from BBS's with limited message sizes.) The posts are broken down into the two methods that I've devised. The sample is implemented from the point of view of a button (and should go into corresponding methods, or similar ones within the scope of the button). First, you'll want to declare some constants for calling the function. What follows is my declaration, which include the constants from the WINDOWS.H include file distributed with Borland C++ v4.02: ;|BeginMethod|#Page2.#Button3|Const| Const ; Constant definitions adapted from the WINDOWS.H provided with ; Borland C++ v4.02. ; ; int WINAPI MessageBox(HWND, LPCSTR, LPCSTR, UINT); ; void WINAPI MessageBeep(UINT); MB_OK = 0 MB_OKCANCEL = 1 MB_ABORTRETRYIGNORE = 2 MB_YESNOCANCEL = 3 MB_YESNO = 4 MB_RETRYCANCEL = 5 MB_TYPEMASK = 15 MB_ICONHAND = 16 MB_ICONQUESTION = 32 MB_ICONEXCLAMATION = 48 MB_ICONASTERISK = 64 MB_ICONMASK = 240 MB_ICONINFORMATION = 64 ; MB_ICONASTERISK MB_ICONSTOP = 16 ; MB_ICONHAND MB_DEFBUTTON1 = 0 MB_DEFBUTTON2 = 256 MB_DEFBUTTON3 = 512 MB_DEFMASK = 3840 MB_APPLMODAL = 0 MB_SYSTEMMODAL = 4096 MB_TASKMODAL = 8192 MB_NOFOCUS = 32768 ; End of constants declared for the messageBox Windows API function. ; Declare the return values, again based on the WINDOWS.H file ; provided with Borland C++, v4.02. ; ; /* Standard dialog button IDs */ IDOK = 1 IDCANCEL = 2 IDABORT = 3 IDRETRY = 4 IDIGNORE = 5 IDYES = 6 IDNO = 7 endConst ;|EndMethod|#Page2.#Button3|Const| ; End of listing 1; message continues in the next posting... --- Maximus 2.02 * Origin: Mountain Retreat (1:216/506) --------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00013 Date: 12/12/94 From: LANCE LEONARD Time: 10:04pm \/To: DAVID SHERMAN (Read 14 times) Subj: Pdox win question David, Here's part 2 of 2, the pushButton method that uses the constants that I declared in the previous post. ; code begins... ;|BeginMethod|#Page2.#Button3|pushButton| uses USER messageBox( hwOwner CWORD, ; Handle of the owner box_Text CPTR, ; Text of the message boxTitle CPTR, ; Text in the title boxStyle CWORD ) CWORD ; Style of the box. endUses method pushButton(var eventInfo Event) var msgTitle String msg_Text String msgStyle SmallInt pxHandle SmallInt this_App Application retValue SmallInt Response String endVar ; Begin by getting Paradox's handle pxHandle = this_App.windowHandle() ; Initialize the text strings. msgTitle = "Windows API MessageBox()" msg_Text = "This dialog was created using the messageBox()\n" + "function that's available from the Windows API." ; Setup the style of the dialog. msgStyle = mb_iconInformation + mb_OK ; show the dialog box. retValue = messageBox( pxHandle, msg_Text, msgTitle, msgStyle ) ; Evaluate the results of the dialog switch case retvalue = IDOK : Response = "OK Button" case retvalue = IDCANCEL : Response = "Cancel Button" case retvalue = IDABORT : Response = "Abort Button" case retvalue = IDRETRY : Response = "Retry Button" case retvalue = IDIGNORE : Response = "Ignore Button" case retvalue = IDYES : Response = "Yes Button" case retvalue = IDNO : Response = "No Button" endSwitch Message( "You chose the " + Response + "..." ) endmethod ;|EndMethod|#Page2.#Button3|pushButton| ; end of the second code listing of two. As you can see, it's not a difficult task. When you use this in Paradox 5.0, curiously enough, the dialog appears in the Windows-3D style, which is similar to the look of the PAradox dialogs and most current versions of MS's application offerings. This stems from Paradox's used of CTL3DV2.DLL, which provides that look for the current Borland apps. Now, to customize this for your own use, e.g. to choose different buttons, icons, and behavior, change the constants used to define msgStyle. For example, setting msgStyle to: msgStyle = mb_iconHand + mb_abortRetryIgnore results in something similar to the msgAbortRetryIgnore() built-in procedure of the Paradox 5.0 System type. Hope this helps... -- Lance --- Maximus 2.02 * Origin: Mountain Retreat (1:216/506) --------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGI00014 Date: 12/12/94 From: PETER READER Time: 04:52pm \/To: KENNETH ULLMAN (Read 16 times) Subj: PDOX 4.0 DOS KU>is there a quick way to get a count of number os records which meets a KU>criteria ,using a script? I would try using the SCAN command, setting a counter inside the scan loop and describing your criteria in the FOR option of SCAN. --- * SLMR 2.1a * We all live in a yellow subroutine. --- WILDMAIL!/WC v4.11b * Origin: NWCS Online (1:105/362.0) --------------- FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGKB2877 Date: 12/14/94 From: ALFRED W. BRAZIE Time: 11:51am \/To: ALL (Read 13 times) Subj: Print merge labels I can set up a report for labels to be print merge with a data base and the first page of 30 print perfectly, but all succeeding pages are compressed to the left and don't line of on the labels. Anybody got any ideas as to what is wrong. I am using the first version of Paradox for windows. Thanks in advance for any help. Wayne * Wave Rider 1.20 [NR] * ... UNREGISTERED EVALUATION COPY --- Blue Wave/RA * Origin: PipeLine! - People Online * Palm Bay Fl 407-728-7386 (1:374/147) --------------- ** A related thread FOLLOWS this message. FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGKJ1677 Date: 12/16/94 From: STEVE BOOTH Time: 03:27pm \/To: ALFRED W. BRAZIE (Read 13 times) Subj: R: Print merge labels Wayne, AW> I can set up a report for labels to be print merge with a data base AW>and the first page of 30 print perfectly, but all succeeding pages are AW>compressed to the left and don't line of on the labels. Anybody got any AW>ideas as to what is wrong. I am using the first version of Paradox for AW>windows. I believe that there were some problems with Paradox for Windows report printing in the first version (typical of your problem). I urge you to upgrade... In version 5.0 that type of thing is preset for you... Regards, STeve... (Exec-PC Netmail: 1:154/280) --------------- >>>>>>>>>>>>>>>>>>>>>> LAST Message In Thread <<<<<<<<<<<<<<<<<<<<<< FIDO MESSAGE AREA==> TOPIC: 119 PARADOX Ref: BGL00000 Date: 12/14/94 From: LANCE LEONARD Time: 11:49am \/To: RHEZA JINA (Read 13 times) Subj: Delphi Rheza, RJ> What is Delphi ? I know it is a Borland product, RJ> something like a development tool... Delphi is a code name for an unreleased application development environment to be released by Borland, according to the trades, sometime early next year. It's received a lot of press over the last couple of months and even won the "Best New Technology" Award at COMDEX, not bad for a product that hasn't even been released. Specific details are still sketchy, though there do appear to be some consistent tidbits appearing in the magazines. It's a Windows-hosted, visual application development environment whose programming language is based on (or is) ObjectPascal. Now, that me be off-putting at first, but (again, according to press reports) the underlying language isn't as crucial as you might think. apparently, Delphi redefines the visual programming metaphor into such an easy to use package that (reportedly) supports VBX's and OCX's, that the underlying language isn't as important as one might think. I've seen a lot of reports on what Delphi is supposed to do, ranging from killing Visual Basic (by producing small .EXE's, rather than requiring a runtime module) to killing PowerBuilder, by providing BDE and OCX/VBX controls for data access to any local, remote, or OBDC data type. Who knows, really, save the folks working on it at Borland. I'd suggest spending a couple of hours going through some recent weekly trade press and a few of the latest monthlies. Almost everyone has mentioned something about Delphi, so its existence isn't much of a secret. But, the details still are. Still, if you compare and contrast the info everyone talks about, you'll probably get a fairly good picture. Hope this helps... -- Lance --- Maximus 2.02 * Origin: Mountain Retreat (1:216/506)