..

..

Postby MdaSolution » Tue Jan 18, 2011 8:34 am

I'm creating A new Calendar class like office outlook

But I have several problems If Antonio and Daniel Help me I think it can be ready soon ( I sent the test to Antonio)


this is a preview beta

Image
Last edited by MdaSolution on Thu Jan 27, 2011 10:13 pm, edited 1 time in total.
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby driessen » Tue Jan 18, 2011 9:15 am

It looks great.

I'm very interested to see the evolution.
Regards,

Michel D.
Genk (Belgium)
_____________________________________________________________________________________________
I use : FiveWin for (x)Harbour v. 24.07 - Harbour 3.2.0 (February 2024) - xHarbour Builder (January 2020) - Bcc773
User avatar
driessen
 
Posts: 1422
Joined: Mon Oct 10, 2005 11:26 am
Location: Genk, Belgium

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Tue Jan 18, 2011 9:27 am

when I move the mouse it draw a box recdotted but then not draw a rect
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby mgsoft » Tue Jan 18, 2011 6:47 pm

Thanks.

Very good!!!.

How we can test it?
Saludos,

Eduardo
User avatar
mgsoft
 
Posts: 422
Joined: Mon Aug 17, 2009 12:18 pm
Location: España

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Tue Jan 18, 2011 7:35 pm

it is a beta test...
I have several problems , I am working to use mousemove method to create the graphics to create appointments
the hours you see are array , now I am working to insert xbrowse at left to show hours
How I can make to show a xbrowse with different timeline ?
have you an idea ?
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby Otto » Tue Jan 18, 2011 8:57 pm

If there is some interest I can publish my planning class.
Best regards,
Otto
Image
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6330
Joined: Fri Oct 07, 2005 7:07 pm

Re: FW Office 2007 Calendar - beta preview

Postby toninhofwi » Tue Jan 18, 2011 9:51 pm

Otto,

I'm interested in our class.

TIA and best regards,

Toninho.

toninho@fwi.com.br
toninhofwi
 
Posts: 172
Joined: Tue Oct 18, 2005 10:01 am

Re: FW Office 2007 Calendar - beta preview

Postby Otto » Tue Jan 18, 2011 11:18 pm

I uploaded the sourcecode to:

http://www.atzwanger-software.com/fw/planning.zip

Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6330
Joined: Fri Oct 07, 2005 7:07 pm

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Wed Jan 19, 2011 1:59 am

WHAT MEANS WITH RAUM1,RAUM2...
THEN WE NOT HAVE TDATA
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Wed Jan 19, 2011 8:40 am

Dear Otto,
I saw your files but they are difficult to understand, for sample when I click with mouse a raum1 I cannot go also to raum2 ( from 080:00 raum1 to 12:00 of raum2)

I 'm thinking someting different from your source as the outlook office or google agenda, where the user with mouse can draw the box vertical

Now I sent my class source prototype to Antonio and daniel I hope they help me .
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby toninhofwi » Wed Jan 19, 2011 4:27 pm

Otto,

Thank you for share your code.

Best Regards,

Toninho.
toninhofwi
 
Posts: 172
Joined: Tue Oct 18, 2005 10:01 am

Re: FW Office 2007 Calendar - beta preview

Postby Otto » Wed Jan 19, 2011 8:02 pm

>'m thinking someting different from your source as the outlook office or google agenda, where the user with mouse can draw the box vertical

You have to press the mouse button and kept it pressed while moving down like in outlook.
This way you select the time of the appointment.
Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6330
Joined: Fri Oct 07, 2005 7:07 pm

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Wed Jan 19, 2011 8:42 pm

Sorry now I saw..
I wanted make the same but I wanted create this :
When the user click on a row the mouse must create a rectoddet box then the user can select the type of appoint and then it must create the box ( rectangule) on row ( from row to row)
I made on my prototype
Code: Select all  Expand view
//----------------------------------------------------------------------------//

METHOD LButtonDown( nRow, nCol, nFlags ) CLASS TCalendarOffice

   if ::bLClicked != nil
      Eval( ::bLClicked, nRow, nCol, nFlags )
   else
      ::lBoxDraw   = .t.
      ::nBoxTop    = nRow
      ::nBoxLeft   = nCol
      ::nBoxBottom = nRow
      ::nBoxRight  = nCol
      ::Capture()
      ::DrawBox()
   endif


return nil


//----------------------------------------------------------------------------//

METHOD MouseMove( nRow, nCol, nFlags ) CLASS TCalendarOffice

   if ::lBoxDraw
      ::DrawBox()
      ::nBoxBottom = nRow
      ::nBoxRight  = nCol



      ::DrawBox()


   endif

return Super:MouseMove( nRow, nCol, nFlags )

//----------------------------------------------------------------------------//

METHOD LButtonUp( nRow, nCol, nFlags ) CLASS TCalendarOffice

   if ::lBoxDraw
      ::DrawBox()
      ::lBoxDraw = .f.
      ReleaseCapture()

 // ::nWidth := ::nBoxRight - ::nBoxLeft
 //  ::nHeight := ::nBoxBottom - ::nBoxTop

  // Super:ScrollAdjust()
  // Super:refresh( .t. )


endif



drawbox is METHOD DrawBox() INLINE RectDotted( ::hWnd, ::nBoxTop, ::nBoxLeft, ::nBoxBottom, ::nBoxRight )
but it create the rect dotted but then not create the box , can you write how make it pls
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby MdaSolution » Wed Jan 19, 2011 8:48 pm

Otto wrote:>'m thinking someting different from your source as the outlook office or google agenda, where the user with mouse can draw the box vertical

You have to press the mouse button and kept it pressed while moving down like in outlook.
This way you select the time of the appointment.
Best regards,
Otto


Otto sorry another...I m trying your class
on your planning How I can to show a week for sample from 17.1.2011 to 23.01.11 instead of RAum1/2/3/4/5 and go to next days with a click ?
FWH .. BC582.. xharbour
User avatar
MdaSolution
 
Posts: 401
Joined: Tue Jan 05, 2010 2:33 pm

Re: FW Office 2007 Calendar - beta preview

Postby Otto » Wed Jan 19, 2011 9:30 pm

I don’t have this ready. But I think you could do it in a similar mode.
Instead of raum you could use Monday to Sunday.
Best regards,
Otto
********************************************************************
mod harbour - Vamos a la conquista de la Web
modharbour.org
https://www.facebook.com/groups/modharbour.club
********************************************************************
User avatar
Otto
 
Posts: 6330
Joined: Fri Oct 07, 2005 7:07 pm

Next

Return to FiveWin for Harbour/xHarbour

Who is online

Users browsing this forum: No registered users and 78 guests