Ir para conteúdo
Fórum Script Brasil

Everson Novka

Membros
  • Total de itens

    6
  • Registro em

  • Última visita

Tudo que Everson Novka postou

  1. Apenas uma nota sobre forms transparentes: Apartir do delphi 7 tem as propriedades AlphaBlend e AlphaBlendValue na classe TForm AlphaBlend := True {Habilita transparecia do form} AlphaBlendValue := Range entre 0 e 255, sendo q 0 o form fica 100% invisível. []'s Everson Novka http://www.eversonnovka.com O componente ListView não tem a propriedade de transparencia... para conseguir o que está querendo tem 2 sugestões 1 - deixar o seu form transparente ... dessa maneira o seu listview tambem ficará transparente exemplo: procedure TForm1.FormCreate(Sender: TObject); const WS_EX_LAYERED = $00080000; LMA_COLORKEY = $00000001; LMA_ALPHA = $00000002; type TLayerFunc = function(hwnd : HWND; crKey : COLORREF; bAlpha : BYTE; dwFlags : DWORD) : boolean; stdcall; var ExtStyle : LongInt; LayerFunc : TLayerFunc; LibHandle : HModule; begin LibHandle := LoadLibrary(user32); if LibHandle > 0 then begin LayerFunc := GetProcAddress(LibHandle, 'SetLayeredWindowAttributes'); if Assigned(LayerFunc) then begin ExtStyle := GetWindowLong(Handle, GWL_EXSTYLE); SetWindowLong(Handle, GWL_EXSTYLE, ExtStyle or WS_EX_LAYERED); LayerFunc(Handle, rgb(255,0,0), 120, LMA_ALPHA or LMA_COLORKEY); end; FreeLibrary(LibHandle); end; end; 2 - usar um componente devirado da classe (TListView) http://www.delphifaq.com/faq/delphi/windows_GUI/f670.shtml abraço
  2. Mesmo assim, você deverá ter uma chave primária. Se você precisar dar um update em uma única linha? você tem q ter a chave desse registro senão, você fará o update em N linhas. Chaves, sempre! []'s Everson Novka http://www.eversonnovka.com
  3. Olá... você terá q criar os campos dos dias em um ClientDataSet em memória e fazer um lopping nos seus registros inserindo-os nas respectivas colunas criadas. Não tem nada mágico para realizar o que você precisa. Realmente tem q ser no braço. []'s Everson Novka http://www.eversonnovka.com
  4. Olá... Pense assim, imagine um cadastro de clientes, 10 pessoas cadastradas como João Silva, a amarração das tabelas detalhes vão ser feita por q campo? Pelo nome? Ou mesmo q você tenha um campo código, quem vai garantir q o código também não será duplicado... Sua aplicação pode garantir isso? Pode, mas e se você tiver um outro sistema q acesse a mesma base de dados, você vai duplicar a verificação do código??? Outra coisa, você criando um campo inteiro como PK e indexado, suas buscas vão ser muito mais rápidas, se fizer a busca pela chave. As PK's e FK's é a garantia da amarração das suas tabelas, elas q vão garantir a consistência das suas informações. []'s Everson Novka http://www.eversonnovka.com
  5. Everson Novka

    Novo blog de Delphi

    Olá pessoal! Essa semana criei um blog sobre Delphi, nele estarei postando artigos, dicas, exemplos, etc.. Ontem escrevi um artigo de como travalhar com arquivos JSON em delphi. Segue link: http://www.eversonnovka.com []'s Everson Novka Xiiiii.. postei no tópico errado... alguém muda pra mim??? rsrsrs []'s Everson Novka
  6. Olá... Algumas coisas q eu descobri com meus sistemas compilados em Delphi rodando no Microsoft 64bits: Esse emulador q Jhonas comentou realmente existe, as bibliotecas de compatibilidade ficam na pasta Windows\SysWoW Se você precisar acessar o registro do windows via regedit, entre na pasta q eu citei e execute ele por lá, aí estará acessando a instancia do registro para 32bits Se você usa alguma dll compilada pra 32bits e estiver tendo problemas para registro, coloque ela dentro da pasta SysWoW e tente fazer o registro novamente. No mais, não tive problemas na execução dos aplicativos. Outra coisa q o Vista 32 ou 64 tem é o lance de permissões de escrita, se seu aplicativo faz criação de pastas, exclusão de arquivos, etc.. você deve clicar com o botão direito em cima do aplicativo e mandar ele rodar como administrador. Bem, acho q é isso! []'s Everson Novka http://www.eversonnovka.com http://www.twitter.com/eversonnovka
×
×
  • Criar Novo...