Clipper On Line • Ver Tópico - Foco no item da coluna clicada ?

Foco no item da coluna clicada ?

Projeto MiniGui - Biblioteca visual para Harbour/xHarbour

Moderador: Moderadores

 

Foco no item da coluna clicada ?

Mensagempor Softwhouse » 01 Mar 2018 14:10

Na rotina abaixo, como poderia colocar o foco no primeiro item da coluna que recebeu o click? Não estou conseguindo com a propriedade ONHEADCLICK.


#include "minigui.ch"

Function Main
Local lInit:= .F.

private aRows [10] [2]

aRows  [1]   := {'Simpson'   , 'Homer'  }
aRows  [2]   := {'Mulder'    , 'Fox'   }
aRows  [3]   := {'Smart'     , 'Max'   }
aRows  [4]   := {'Grillo'    , 'Pepe'  }
aRows  [5]   := {'Kirk'      , 'James' }
aRows  [6]   := {'Barriga'   , 'Carlos' }
aRows  [7]   := {'Flanders'  , 'Ned'    }
aRows  [8]   := {'Smith'     , 'John'   }
aRows  [9]   := {'Pedemonti' , 'Flavio'  }
aRows [10]   := {'Gomez'     , 'Juan'   }
 
 
 
 
   DEFINE WINDOW Form_1 ;
       AT     0,0 ;
       WIDTH  568 ;
       HEIGHT 430 ;
       TITLE 'Grid Ordem' ;
       MAIN ;
       FONT 'Arial' ;
       SIZE 9 ;
       ON INIT FillGrid()         
       
       DEFINE GRID Grid_1
              ROW     10             
              COL     10
              WIDTH   420
              HEIGHT  330
              HEADERS { 'Sobrenome' , 'Nome' }
              WIDTHS  { 80, 180 }
              CELLNAVIGATION .T.
              ALLOWSORT .T.
              ONGOTFOCUS  iif( lInit, ,( HMG_SortColumn( 1 ), lInit := .T. ) )
              Value 1
       END GRID   
             
       
END WINDOW
   
CENTER WINDOW Form_1
ACTIVATE WINDOW Form_1

Return(Nil)


/*********************************************************/
Function FillGrid()
/*********************************************************/
Local i
For i := 1 To Len( aRows )
    Form_1.Grid_1.AddItem ( aRows [ i ] )
Next
Return(Nil)

Fernando
Softwhouse
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 300
Data de registro: 07 Dez 2011 17:44
Cidade/Estado: Porto Alegre/RS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Foco no item da coluna clicada ?

Mensagempor Claudio Soto » 01 Mar 2018 15:27

Sería algo así:

ONHEADCLICK { {|| This.Value := { 1, this.CellColFocused } }, {|| This.Value := { 1, this.CellColFocused } } }
Saludos.
Dr. Claudio Soto
(Uruguay)
http://srvet.blogspot.com
Avatar de usuário

Claudio Soto
Colaborador

Colaborador
 
Mensagens: 555
Data de registro: 27 Ago 2012 12:31
Cidade/Estado: Uruguay
Curtiu: 35 vezes
Mens.Curtidas: 166 vezes

Foco no item da coluna clicada ?

Mensagempor Softwhouse » 01 Mar 2018 17:27

Olá,

Apresentou erro de compilação, Minigui Extended.
Fernando
Softwhouse
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 300
Data de registro: 07 Dez 2011 17:44
Cidade/Estado: Porto Alegre/RS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes

Foco no item da coluna clicada ?

Mensagempor Claudio Soto » 01 Mar 2018 17:54

Claudio Soto escreveu:Sería algo así:

ONHEADCLICK { {|| This.Value := { 1, this.CellColFocused } }, {|| This.Value := { 1, this.CellColFocused } } }

Este código es para HMG oficial
Saludos.
Dr. Claudio Soto
(Uruguay)
http://srvet.blogspot.com
Avatar de usuário

Claudio Soto
Colaborador

Colaborador
 
Mensagens: 555
Data de registro: 27 Ago 2012 12:31
Cidade/Estado: Uruguay
Curtiu: 35 vezes
Mens.Curtidas: 166 vezes

Foco no item da coluna clicada ?

Mensagempor Softwhouse » 01 Mar 2018 18:18

Ok, muito obrigado.
Fernando
Softwhouse
Usuário Nível 3

Usuário Nível 3
 
Mensagens: 300
Data de registro: 07 Dez 2011 17:44
Cidade/Estado: Porto Alegre/RS
Curtiu: 0 vez
Mens.Curtidas: 12 vezes




Retornar para MiniGui

Quem está online

Usuários vendo este fórum: Google [Bot] e 5 visitantes


Ola Amigo, espero que meu site e forum tem lhe beneficiado, com exemplos e dicas de programacao.
Entao divulgue o link da Doacao abaixo para seus amigos e redes sociais ou faça uma doacao para o site forum...
MUITO OBRIGADO PELA SUA DOACAO!
Faça uma doação para o forum
cron
v
Olá visitante, seja bem-vindo ao Fórum Clipper On Line!
Efetue o seu login ou faça o seu Registro