Projeto Gerenciador de Tabelas DBF Free

[Cassiano de Oliveira]

Senhores estou fazendo um projeto para disponibilizar para todos q irá ser tipo um DBU mas for Windows via Xailer, e disponibilizarei os fontes para estudo depois... já esta bem adiantado...
Ele poderá ser mais uma fonte de estudos para quem esta começando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
Porém estou tendo uma dificuldade q ao abrir uma tabela se a mesma possuir registros deletados gostaria de mostrar eles em uma cor de texto e fundo diferentes do grid q já esta bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar o StatusBar dizendo se o registro esta deletado ou não através do ::oDBFDataSet:Deleted(), tentei usar a mesma lógica para colorir somente a linha, mas ele troca toda a cor do DBBrowse.
Alguém pode ajudar?
[]´s

Attached files

[XeviCOMAS]

Cassiano,
prueba con OnDrawRow, que es la encargada de "pintar" la lí­nea del registro
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[emeasoft]

Cassiano, bom dia:
í‰ possí­vel usar imagens nas colunas também, se preferir, usando o evendo
OnGetData da coluna;

IF Value$"+" //ENTRADA
nImage:=2
ELSEIF Value$"-" //SAíDA
nImage:=3
ELSEIF Value$"*" //CANCELADO
nImage:=4
ENDIF
Value:=""



Attached files

[Cassiano de Oliveira]

Vou testar as dicas...
Gracias...
"www[dot]eMeAsOfT[dot]com" wrote in message
news:515c06d9$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano, bom dia:
íƒâ€° possíƒÂ­vel usar imagens nas colunas tambíƒÂ©m, se preferir,
usando o evendo
OnGetData da coluna;
IF Value$"+" //ENTRADA
nImage:=2
ELSEIF Value$"-" //SAíƒÂDA
nImage:=3
ELSEIF Value$"*" //CANCELADO
nImage:=4
ENDIF
Value:=""
--
http://www.eMeAsOfT.com
http://emeasoft.blogspot.com/
http://twitter.com/emeasoft
http://www.facebook.com/emeasoft
https://plus.google.com/102999253031532804222
http://g.co/maps/26gey

[Cassiano de Oliveira]

Obrigado Xevi e Mário ambas as dicas funcionaram... assim q eu terminar o
projeto disponibilizarei...
Vocíªs sabem como faço para disponibilizar sob uma licença q o pessoal possa
usar e alterar mas citar a fonte ou algo do tipo?
[]´s
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[Cassiano de Oliveira]

Outra dúvida, eu coloquei 1 StatusBar com 5 Painéis e em alguns deles tem
funçíµes especificas, por exemplo ao abrir 1 tabela na Status bar vai
aparecer se esta deletado ou não o registro, se ele estiver Ok e eu quiser
deletar ao clicar o Painel Deletado ele pergunta se quer Deletar ou Não e
faz o procedimento.
O q eu queria saber é o seguinte: Tem como mudar o í­cone do mouse ao passar
sobre o painel para indicar que tem uma função ali que pode ser chamada ao
clicar? Mas vejam bem, não é em todo Statusbar .... í‰ em alguns painéis
apenas.
Gracias
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[emeasoft]

Cassiano,
Usamos o xaDbu, que funciona muito bem aqui:
http://www.xailer.com/download/?en&cat=6
Abraços.
Mário

[XeviCOMAS]

Cassiano,
Puedes cambiar el icono al pasar por encima del mouse, utilizando el evento
OnMouseMove del objeto. Todos los controles disponen de ese evento.
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:[email=515c2878@svctag-j7w3v3j....]515c2878@svctag-j7w3v3j....[/email]
Outra dúvida, eu coloquei 1 StatusBar com 5 Painéis e em alguns deles tem
funçíµes especificas, por exemplo ao abrir 1 tabela na Status bar vai
aparecer se esta deletado ou não o registro, se ele estiver Ok e eu quiser
deletar ao clicar o Painel Deletado ele pergunta se quer Deletar ou Não e
faz o procedimento.
O q eu queria saber é o seguinte: Tem como mudar o í­cone do mouse ao passar
sobre o painel para indicar que tem uma função ali que pode ser chamada ao
clicar? Mas vejam bem, não é em todo Statusbar .... í‰ em alguns painéis
apenas.
Gracias
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[Cassiano de Oliveira]

Conheço o xaDbu, obrigado pela Dica Mário, meu intuito com esse projeto é
disponibilizar para comunidade uma ferramenta Open Source e q eu ao
desenvolve-la possa aprender mais recursos do Xailer e compartilhar essa
experiíªncia.
[]´s
"www[dot]eMeAsOfT[dot]com" wrote in message
news:515c39a8$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano,
Usamos o xaDbu, que funciona muito bem aqui:
http://www.xailer.com/download/?en&cat=6
Abraços.
Mário
--
http://www.eMeAsOfT.com
http://emeasoft.blogspot.com/
http://twitter.com/emeasoft
http://www.facebook.com/emeasoft
https://plus.google.com/102999253031532804222
http://g.co/maps/26gey

[Cassiano de Oliveira]

Xevi gracias por su respuesta, pero yo sólo deseo de que el panel de estado
Bar Segundo fue cambiado, ya que contendrá una función, otros no, o no
quiero que lo cambió todo el StatusBar. (by GoogleTranslator)
[]´s
"Xevi" wrote in message news:515c5de8$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano,
Puedes cambiar el icono al pasar por encima del mouse, utilizando el evento
OnMouseMove del objeto. Todos los controles disponen de ese evento.
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:[email=515c2878@svctag-j7w3v3j....]515c2878@svctag-j7w3v3j....[/email]
Outra dúvida, eu coloquei 1 StatusBar com 5 Painéis e em alguns deles tem
funçíµes especificas, por exemplo ao abrir 1 tabela na Status bar vai
aparecer se esta deletado ou não o registro, se ele estiver Ok e eu quiser
deletar ao clicar o Painel Deletado ele pergunta se quer Deletar ou Não e
faz o procedimento.
O q eu queria saber é o seguinte: Tem como mudar o í­cone do mouse ao passar
sobre o painel para indicar que tem uma função ali que pode ser chamada ao
clicar? Mas vejam bem, não é em todo Statusbar .... í‰ em alguns painéis
apenas.
Gracias
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[Cassiano de Oliveira]

Consegui usando a dica do Xevi, como o primeiro painel é de largura 300 o
segundo Painel começa no 301, ou seja, no evento OnMouseMove do StatusBar eu
fiz com q ele analisasse se o nPosX >= 301 e nPosX <= 450 (pq a largura do
segundo painel é 150) mudava o í­cone do Painel...
Código:
METHOD StatusBar1MouseMove( oSender, nKeyFlags, nPosX, nPosY ) CLASS
frmBrowseTabela
IF nPosX >=301 .AND. nPosX <= 450
oSender:aItems[2]:nImage := 3
::oStatusBar1:oCursor := IDC_HAND
ELSE
oSender:aItems[2]:nImage := 0
::oStatusBar1:oCursor := IDC_ARROW
ENDIF
RETURN Nil
[]´s
"Cassiano de Oliveira" wrote in message news:515c6395$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Xevi gracias por su respuesta, pero yo sólo deseo de que el panel de estado
Bar Segundo fue cambiado, ya que contendrá una función, otros no, o no
quiero que lo cambió todo el StatusBar. (by GoogleTranslator)
[]´s
"Xevi" wrote in message news:515c5de8$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano,
Puedes cambiar el icono al pasar por encima del mouse, utilizando el evento
OnMouseMove del objeto. Todos los controles disponen de ese evento.
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:[email=515c2878@svctag-j7w3v3j....]515c2878@svctag-j7w3v3j....[/email]
Outra dúvida, eu coloquei 1 StatusBar com 5 Painéis e em alguns deles tem
funçíµes especificas, por exemplo ao abrir 1 tabela na Status bar vai
aparecer se esta deletado ou não o registro, se ele estiver Ok e eu quiser
deletar ao clicar o Painel Deletado ele pergunta se quer Deletar ou Não e
faz o procedimento.
O q eu queria saber é o seguinte: Tem como mudar o í­cone do mouse ao passar
sobre o painel para indicar que tem uma função ali que pode ser chamada ao
clicar? Mas vejam bem, não é em todo Statusbar .... í‰ em alguns painéis
apenas.
Gracias
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[XeviCOMAS]

Cassiano,
me alegro que te funcione.
En el evento OnMouseMove le puedes hacer que cambie el icono, las medidas,
el color... pos eso, que le haces lo que necesites.
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:[email=515c6772@svctag-j7w3v3j....]515c6772@svctag-j7w3v3j....[/email]
Consegui usando a dica do Xevi, como o primeiro painel é de largura 300 o
segundo Painel começa no 301, ou seja, no evento OnMouseMove do StatusBar eu
fiz com q ele analisasse se o nPosX >= 301 e nPosX <= 450 (pq a largura do
segundo painel é 150) mudava o í­cone do Painel...
Código:
METHOD StatusBar1MouseMove( oSender, nKeyFlags, nPosX, nPosY ) CLASS
frmBrowseTabela
IF nPosX >=301 .AND. nPosX <= 450
oSender:aItems[2]:nImage := 3
::oStatusBar1:oCursor := IDC_HAND
ELSE
oSender:aItems[2]:nImage := 0
::oStatusBar1:oCursor := IDC_ARROW
ENDIF
RETURN Nil
[]´s
"Cassiano de Oliveira" wrote in message news:515c6395$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Xevi gracias por su respuesta, pero yo sólo deseo de que el panel de estado
Bar Segundo fue cambiado, ya que contendrá una función, otros no, o no
quiero que lo cambió todo el StatusBar. (by GoogleTranslator)
[]´s
"Xevi" wrote in message news:515c5de8$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Cassiano,
Puedes cambiar el icono al pasar por encima del mouse, utilizando el evento
OnMouseMove del objeto. Todos los controles disponen de ese evento.
Un Saludo,
Xevi.
"Cassiano de Oliveira" ha escrit al missatge:[email=515c2878@svctag-j7w3v3j....]515c2878@svctag-j7w3v3j....[/email]
Outra dúvida, eu coloquei 1 StatusBar com 5 Painéis e em alguns deles tem
funçíµes especificas, por exemplo ao abrir 1 tabela na Status bar vai
aparecer se esta deletado ou não o registro, se ele estiver Ok e eu quiser
deletar ao clicar o Painel Deletado ele pergunta se quer Deletar ou Não e
faz o procedimento.
O q eu queria saber é o seguinte: Tem como mudar o í­cone do mouse ao passar
sobre o painel para indicar que tem uma função ali que pode ser chamada ao
clicar? Mas vejam bem, não é em todo Statusbar .... í‰ em alguns painéis
apenas.
Gracias
"Cassiano de Oliveira" wrote in message news:515b9bf1$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Senhores estou fazendo um projeto para disponibilizar para
todos q ir탡 ser tipo um DBU mas for Windows via Xailer, e
disponibilizarei os fontes para estudo depois... j탡 esta
bem adiantado...
Ele poder탡 ser mais uma fonte de estudos para quem esta
comeíƒÂ§ando, tem Menus, ToolBar, StatusBar, Popup Menu, MDI
Form, DBF Datasets, DBBrowse, OpenFileDialog, etc.
PoríƒÂ©m estou tendo uma dificuldade q ao abrir uma tabela se
a mesma possuir registros deletados gostaria de mostrar eles
em uma cor de texto e fundo diferentes do grid q j탡 esta
bmHIGHLROWMS somente na linha do registro deletado.
Eu coloquei no evento onchange do Browse para ele atualizar
o StatusBar dizendo se o registro esta deletado ou níƒÂ£o
atravíƒÂ©s do ::oDBFDataSet:Deleted(), tentei usar a mesma
líƒÂ³gica para colorir somente a linha, mas ele troca toda a
cor do DBBrowse.
AlguíƒÂ©m pode ajudar?
[]í‚´s

[emeasoft]

Conheço o xaDbu, obrigado pela Dica Mário, meu intuito com esse projeto é
disponibilizar para comunidade uma ferramenta Open Source e q eu ao
desenvolve-la possa aprender mais recursos do Xailer e compartilhar essa
experiíªncia.
Cassiano,

Parabéns pela iniciativa.
Além de ajudar a comunidade ainda serve de aprendizado.
Muito bom.
OBS: aquele seu projeto para converter SQL para DBF está sendo muito útil.
Mário

[Cassiano de Oliveira]

Legal, q bom q esta sendo útil, unindo forças e trocando conhecimentos
conseguimos avançar...
[]´s
"www[dot]eMeAsOfT[dot]com" wrote in message
news:515c6f6c$[email=1@svctag-j7w3v3j....]1@svctag-j7w3v3j....[/email]
Conheço o xaDbu, obrigado pela Dica Mário, meu intuito com
esse projeto é
disponibilizar para comunidade uma ferramenta Open Source e
q eu ao
desenvolve-la possa aprender mais recursos do Xailer e
compartilhar essa
experiíªncia.
Cassiano,
Parabéns pela iniciativa.
Além de ajudar a comunidade ainda serve de aprendizado.
Muito bom.
OBS: aquele seu projeto para converter SQL para DBF está
sendo muito útil.
Mário
--
http://www.eMeAsOfT.com
http://emeasoft.blogspot.com/
http://twitter.com/emeasoft
http://www.facebook.com/emeasoft
https://plus.google.com/102999253031532804222
http://g.co/maps/26gey