PlanetSquires Forums

Please login or register.

Login with username, password and session length
Advanced search  
Pages: 1 [2] 3 4 ... 10
 11 
 on: April 24, 2019, 11:22:19 PM 
Started by James Klutho - Last post by Paul Squires
The application that I just wrote used the libharu pdf library to output my reports to. I then shellexecute to open the pdf using whatever default pdf reader is installed on the system. Looking at your code and documentation I now realize that in the long run I may have been better off adapting your code to my application as I would then have total control over the whole report generation, displaying, and printing process. I will take a closer look at your code and see if I can adapt it for my use and at the same time provide any code upgrades that I may notice.

 12 
 on: April 24, 2019, 09:25:25 PM 
Started by Paul Squires - Last post by Paul Squires
Although the Status Bar Editor is functional, it does not generate any code yet. I will implement the code generation before I upload a final 1.9.2 version.

 13 
 on: April 24, 2019, 09:19:12 PM 
Started by Patrick Beyltjens - Last post by Paul Squires
Lol, the stars all aligned correctly tonight. :-)

 14 
 on: April 24, 2019, 08:58:06 PM 
Started by Patrick Beyltjens - Last post by raymw
Busy day, Paul? Less than an hour or so to answer a couple of questions with example code.That's pretty impressive!

 15 
 on: April 24, 2019, 06:53:43 PM 
Started by Paul Squires - Last post by Paul Squires
https://github.com/PaulSquires/WinFBE/releases

Beta version featuring major internal changes to the visual designer code generation and underlying engine. This beta is intended for testing of these visual designer features. No changes to the core WinFBE editor itself - only the visual designer has changed.

(Note: The documentation for the visual designer has yet to be updated)


 16 
 on: April 24, 2019, 06:23:21 PM 
Started by Patrick Beyltjens - Last post by Patrick Beyltjens
Thanks a lot for the examples Paul.

I just used the modified timer example. It works perfect now.

My problem was in the first parameter from the set_timer function.




 17 
 on: April 24, 2019, 06:01:39 PM 
Started by Patrick Beyltjens - Last post by Paul Squires
Here is the AfxAddTooltip definition:
' ========================================================================================
' Creates a tooltip for a control.
' Parameters:
' - hwnd      = Handle of the window or control
' - wszText   = Tooltip text
' - bBalloon  = Ballon tip (TRUE or FALSE)
' - bCentered = Centered (TRUE or FALSE)
' Return Value:
'   The handle of the tooltip control
' ========================================================================================
PRIVATE FUNCTION AfxAddTooltip (BYVAL hwnd AS HWND, BYREF wszText AS CONST WSTRING = "", BYVAL bBalloon AS BOOLEAN = FALSE, BYVAL bCentered AS BOOLEAN = FALSE) AS HWND


 18 
 on: April 24, 2019, 05:59:48 PM 
Started by Patrick Beyltjens - Last post by Paul Squires
Oh, yes, you also asked about Tooltips. Those are easier. Just look at Jose's AfxCtrl.inc file in the \Inc\Afx folder of your WinFBE Suite compiler install. There is a whole section of functions in that file that handle Tooltips. Here is code for adding a simple tooltip to the Start button in my previous example. I did it in the frmMain Load event.

Code: [Select]
''
''
Function frmMain_Load( ByRef sender As wfxForm, ByRef e As EventArgs ) As LRESULT

   ' Create tooptip
   dim as HWND hToolTip = AfxAddTooltip( frmMain.cmdStart.hWindow, "This is the Start button.", false, false )
 
   Function = 0
End Function

 19 
 on: April 24, 2019, 05:44:55 PM 
Started by Patrick Beyltjens - Last post by Paul Squires
This is what the Timer code will look like.
Form is named frmMain
Start button is named cmdStart
Stop button is named cmdStop

Code: [Select]

const IDT_TIMER = WM_USER + 100

 
''
'' 
sub TimerProc( byval hwnd    as HWND, _
               byval uMsg    as UINT, _
               byval TimerID as UINT ptr, _
               byval dwTime  as DWORD _
               )
               
   frmMain.txtResults.Text = wstr( val(frmMain.txtResults.text) + 1 )
     
end sub


''
''
Function frmMain_cmdStart_Click( ByRef sender As wfxButton, ByRef e As EventArgs ) As LRESULT

   ' Reset the textbox counter
   frmMain.txtResults.Text = "0"

   ' Create a timer that fires every second (1000 ms).
   SetTimer( frmMain.hWindow, _              ' handle to main window
             IDT_TIMER, _                    ' timer identifier
             1000, _                         ' 1-second interval
             cast( TIMERPROC, @TimerProc) )  ' timer callback   
             
   Function = 0
End Function


''
''
Function frmMain_cmdStop_Click( ByRef sender As wfxButton, ByRef e As EventArgs ) As LRESULT
   
   ' Kill the timer that was previously created.
   KillTimer( frmMain.hWindow, IDT_TIMER )
   
   Function = 0
End Function


''
''  Remove the following Application.Run code if it used elsewhere in your application.
Application.Run(frmMain)

 20 
 on: April 24, 2019, 05:22:00 PM 
Started by Patrick Beyltjens - Last post by Paul Squires
No problem... I am working on an example project for you. There is no built in Timer control but I will use Win32 api calls to create one. I will post the results here later.

Pages: 1 [2] 3 4 ... 10