xBrowse simple Leftclick

[UD previous posts]

how can i add action in a xbrowse for a single Left click ?

Tx uwe D aus E

[demont frank]

In TxbrwColumn :

DATA bLClickHeader,; // codeblock to be evaluated when left clicking on the header
bLClickFooter,; // codeblock to be evaluated when left clicking on the footer

Maybe you mean that bLClickData not exist. I suppose this can only be used to select a row or column

Frank

[UD previous posts]

Yes u are right i dont notice it

Another Idea i want a detailed view of this row

how can i do that like tooltip which was shown after a few seconds

[Otto]

Hello Frank,

have you seen my private email about the-booking platform?
Regards,
Otto

[demont frank]

Otto,

I have no idea , have you sent a private e-mail ?

If so , it is not arrived.

Frank

[demont frank]

Yes u are right i dont notice it

Another Idea i want a detailed view of this row

how can i do that like tooltip which was shown after a few seconds

Uwe


This can be done , as

oBrwB:bChange := {|Self,lUpDown| ShowLine(Self,lUpDown, @ShowDlg,oDlg) , SetActiveWindow(oDlg:hWnd) , oBrwb:SetFocus() )}

The second parameter (lUpDownn) is .T. when the row is changed (.F. changing columns)


When .T. , a Dialog (NOWAIT) can be build

Code: Select all  Expand view  RUN

PROC ShowLine(oBrw,lUpDown,ShowDlg,oDlg)
**********************************
IF lUpDown
  IF ShowDlg<>nil
    ShowDlg:end()
  END
  DEFINE DIALOG ShowDlg OF oDlg ...
      .....
  ACTIVATE DIALOG ShowDlg NOWAIT
END



[Otto]

Frank, I sent on your fototeam address.
Regards,
Otto

[demont frank]

Frank, I sent on your fototeam address.
Regards,
Otto

Sorry otto , i don't know anything from a fototeam address

[Otto]

Excuse me . Maybe I mix up something.
Aren’t you Robert Frank?
Regards,
Otto