topic-40614

Otto

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

MSGINFO with scrollbars
Posted: Wed Jul 07, 2021 06:30 AM

Hello friends,
Is there a ready to go MSGINFO with scrollbars available?
Best regards,
Otto

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: MSGINFO with scrollbars
Posted: Thu Jul 08, 2021 06:35 AM

Please try

Code (fw): Select all Collapse

#include "fivewin.ch"

function Main()

   local cText, oDlg, oGet, oBtn

   cText := MEMOREAD( "testmsg3.prg" )

   MsgInfo2( MEMOREAD( "testmsg3.prg" ), "testmsg3.prg" )

   ? "Done"

return nil

function MsgInfo2( cText, cTitle, nWidth, nHeight )

   local oDlg

   DEFAULT cTitle := "Attention", nWidth := 300, nHeight := 200

   DEFINE DIALOG oDlg SIZE nWidth, nHeight PIXEL TRUEPIXEL TITLE cTitle

   @  20, 20 GET oGet VAR cText MEMO SIZE nWidth - 40, nHeight - 90 PIXEL OF oDlg READONLY NOBORDER ;
      COLOR CLR_BLACK, oDlg:nClrPane

   @ nHeight - 40,( nWidth / 2 ) - 50 BUTTON "OK" SIZE 100,28 PIXEL OF oDlg ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

return nil

Regards

G. N. Rao.

Hyderabad, India

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: MSGINFO with scrollbars
Posted: Thu Jul 08, 2021 06:35 AM

Please try

Code (fw): Select all Collapse

#include "fivewin.ch"

function Main()

   local cText, oDlg, oGet, oBtn

   cText := MEMOREAD( "testmsg3.prg" )

   MsgInfo2( MEMOREAD( "testmsg3.prg" ), "testmsg3.prg" )

   ? "Done"

return nil

function MsgInfo2( cText, cTitle, nWidth, nHeight )

   local oDlg

   DEFAULT cTitle := "Attention", nWidth := 300, nHeight := 200

   DEFINE DIALOG oDlg SIZE nWidth, nHeight PIXEL TRUEPIXEL TITLE cTitle

   @  20, 20 GET oGet VAR cText MEMO SIZE nWidth - 40, nHeight - 90 PIXEL OF oDlg READONLY NOBORDER ;
      COLOR CLR_BLACK, oDlg:nClrPane

   @ nHeight - 40,( nWidth / 2 ) - 50 BUTTON "OK" SIZE 100,28 PIXEL OF oDlg ACTION oDlg:End()

   ACTIVATE DIALOG oDlg CENTERED

return nil

Regards

G. N. Rao.

Hyderabad, India

Otto

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

Re: MSGINFO with scrollbars
Posted: Thu Jul 08, 2021 07:24 AM

Dear Mr. Rao,
Thank you. It is working fine.
Font is small, and I think we need also horizontal scrolling.
Do you add this to FW.

Best regards,
Otto

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: MSGINFO with scrollbars
Posted: Thu Jul 08, 2021 07:56 AM

We can provide an option to specify a font.
If you think it would be useful, we can include in FWH after further refining it.
Horizontal scrolling may be not necessary because the text is wrapped to fit the width of the dialog.

Regards

G. N. Rao.

Hyderabad, India

Otto

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

Re: MSGINFO with scrollbars
Posted: Thu Jul 08, 2021 01:22 PM

Dear Mr. Rao,

I think it would be very useful.
At the same time, we should have a modal box with the same syntax for mod harbor. Maybe MsgInfo in mod is working this way, I test it.

Fwlog would also be great if it were adapted for mod harbour.

And it doesn't quite fit here, but a quick output of ARRAYs in mod harbour like xbrowser () would be helpful.

Best regards,
Otto

Silvio.Falconi

Posts: 7317

Joined: Thu Oct 18, 2012 07:17 PM

Re: MSGINFO with scrollbars
Posted: Sat Aug 21, 2021 06:57 PM

Nages,Otto,
is it possible to make a horizontal scroll with obviously small bitmaps (jpg, png) and alternate with text?
In the past I tried to do a small class but then I couldn't

sample png

Since from 1991/1992 ( fw for clipper Rel. 14.4 - Momos)

I use : FiveWin for Harbour March-April 2024 - Harbour 3.2.0dev (harbour_bcc770_32_20240309) - Bcc7.70 - xMate ver. 1.15.3 - PellesC - mail: silvio[dot]falconi[at]gmail[dot]com

FiveWiDi

Posts: 1445

Joined: Mon Oct 10, 2005 02:38 PM

Re: MSGINFO with scrollbars
Posted: Sat Aug 21, 2021 08:22 PM

Otto wrote:Dear Mr. Rao,

I think it would be very useful.

+1

Un Saludo

Carlos G.

FiveWin 25.12 + Harbour 3.2.0dev (r2502110321), BCC 7.7 Windows 11 Home

Otto

Posts: 6983

Joined: Fri Oct 07, 2005 07:07 PM

Re: MSGINFO with scrollbars
Posted: Mon Sep 06, 2021 08:49 AM

Dear Mr. Rao,
can we have a parameter to tell msginfo that it should be centered in the calling window/dialog or screen?
Thank you in advance
Otto

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: MSGINFO with scrollbars
Posted: Mon Sep 06, 2021 04:49 PM

Yes.
We will provide and inform.

Regards

G. N. Rao.

Hyderabad, India

FiveTech Support Forums

Continue the discussion