XBROWSE : METHOD DataRow() -> TDataRow()

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Fri May 05, 2023 08:20 AM

hi,

when using METHOD EditSource() it will use METHOD Edit() which use CLASS TDataRow

CLASS TDataRow have a METHOD Edit() which is use a DIALOG
can i "color" this DIALOG :idea:

"inside" DIALOG it use TScrollPanel() and use "fix" Color CLR_BLACK

Code (fw): Select all Collapse

   oPanel:SetColor( CLR_BLACK, oDlg:nClrPane )

can i change Color of Panel :idea:

it is all for "Dark-Mode"

greeting,

Jimmy

Marc Venken

Posts: 1487

Joined: Tue Jun 14, 2016 07:51 AM

Re: XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Fri May 05, 2023 11:56 AM

WITH OBJECT oBrw

  :nEditTypes    := EDIT_GET

  :bLDClickDatas := { || oBrw:EditSource() } // or { || youreditfunction() }

  :CreateFromCode()

END

You can always make your own editdialog in all style you like.

Marc Venken

Using: FWH 23.08 with Harbour

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Sat May 06, 2023 01:50 PM

Marc Venken wrote:WITH OBJECT oBrw
:nEditTypes := EDIT_GET
:bLDClickDatas := { || oBrw:EditSource() } // or { || youreditfunction() }
:CreateFromCode()
END

You can always make your own editdialog in all style you like.

We recommend

Code (fw): Select all Collapse

oBrw:bEdit := { |oRec| OurEditFunction( oRec )

oRec is TDataRow object

Code (fw): Select all Collapse

function OurEditFunction( oRec )

   local lAppending := ( oRec:RecNo == 0 )

   @ r,c GET oRec:fieldName .... <other clauses>

// buttons for
// oRec:Save(), oRec:Undo()
// even oRec:GoTop() etc, navigation

Regards

G. N. Rao.

Hyderabad, India

nageswaragunupudi

Posts: 10733

Joined: Sun Nov 19, 2006 05:22 AM

Re: XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Sat May 06, 2023 01:53 PM

can i change Color of Panel :idea:

it is all for "Dark-Mode"

At present, it is not possible without modifying the source code of TDataRow class.
But soon we will provide a way to do it from the Application code and let you know.
If you like, we will share the revised program with you too.

Regards

G. N. Rao.

Hyderabad, India

Jimmy

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

Re: XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Mon May 08, 2023 12:19 PM

hi Marc,

Marc Venken wrote:You can always make your own editdialog in all style you like.

you are right, but i like to use what already exist

greeting,

Jimmy

Jimmy

Posts: 1772

Joined: Thu Sep 05, 2019 05:32 AM

Re: XBROWSE : METHOD DataRow() -> TDataRow()
Posted: Mon May 08, 2023 12:20 PM

hi,

nageswaragunupudi wrote:If you like, we will share the revised program with you too.

YES, please

greeting,

Jimmy

FiveTech Support Forums

Continue the discussion