Ir para conteúdo
Fórum Script Brasil

s3c

Membros
  • Total de itens

    817
  • Registro em

  • Última visita

Tudo que s3c postou

  1. s3c

    Procurar Por Arquivo

    Acredito que você terá que fazer uma função recursiva p/ varrer as sub-pastas. Veja as funções FindFirst, FindNext, FindClose e a estrutura TSearchRec.
  2. s3c

    Mudança De Cor

    Olá colega, você pode fazer isso no próprio TPopupMenu. 1-Ative a propriedade OwnerDraw. 2-No evento onDrawItem dos TMenuItem coloque: ACanvas.Brush.Color := {cor de fundo}; ACanvas.Font.Color := {cor da fonte}; ACanvas.TextRect(ARect, 3, 2, 'Descrição do ítem');
  3. Faz o seguinte: Vá em Project/View Source; poste os comandos do .dpr. Depois poste os comandos do FormCreate.
  4. Olá, deve ser porque seu dm está = nil nesse momento. Tente colocar o Application.CreateForm do dm antes do seu formulário.
  5. Não não não, gênio não; talvez aqueles que escreveram essas funções, assim como tantas outras funções de apis possam ser considerados gênios.
  6. Assim não deve funcionar mesmo. Faltou você informar year, month e day. Se você não quiser informá-los, chame GetLocalTime(st) e depois sete somente a hora.
  7. Olá, poste o código do SetLocalTime.
  8. Creio que seu MainForm é o Form de login. Se for isso você tem que mudar seu Form de login p/ um Form secundário. Para que os MDIChild possam ser exibidos, o Application.MainForm deve ser um MDIForm.
  9. No evento onKeyDown, você consegue interceptá-las.
  10. Na verdade SystemTime é uma estrutura: var st:SYSTEMTIME; begin st.wYear := 2004; st.wMonth := 11; st.wDay := 3; st.wHour := 10; st.wMinute := 57; st.wSecond := 10; st.wMilliseconds := 123; SetLocalTime(st); end;
  11. Realmente quando você abre uma query e o database está fechado, automaticamente ele é aberto. Uma forma de contornar isso seria você forçar um erro antes da abertura da query no evento onBeforeOpen: procedure TForm1.Query1BeforeOpen(DataSet: TDataSet); begin if not Database1.Connected then TQuery(DataSet).DatabaseName := '' else TQuery(DataSet).DatabaseName := 'Nome do database'; end;
  12. você pode utilizar a função SetLocalTime: var st:SYSTEMTIME; begin // alimente a estrutura st e depois: SetLocalTime(st); end;
  13. Olá, bom quando você chama o taskmgr, o programa sempre aparece lá. Tirá-lo de lá por enquanto eu não sei e ficaria muito grato se alguém soubesse e postasse a solução neste tópico.
  14. Olá colegas ! 1-Bom parece que ele só quer o programa visível nos programas em execução. 2-RegisterServiceProcess só funciona em Windows 9x/ME, em NT/XP não funciona.
  15. s3c

    Grids

    Olá Zolhos, você pode fazer assim também: grdProdIngredientes.options := grdProdIngredientes.options + [goEditing,goTabs,go...]; grdProdIngredientes.options := grdProdIngredientes.options - [goEditing,goTabs,go...];
  16. s3c

    Outro Problema

    Olá Arlon, bom pelo que ví, você instancia duas vezes a tela de Splash: FormSplash := TFormSplash.Create(Application); // primeira vez Application.CreateForm(TFormSplash, FormSplash); // segunda vez Tente retirar o CreateForm e ShowModal do TFrmAcesso e no evento onShow do seu FrmPrincipal coloque: FrmAcesso := TFrmAcesso.Create(Application); FrmAcesso.ShowModal; Veja também se no onClose do FrmAcesso você o libera.
  17. s3c

    Outro Problema

    Olá Arlon, tente tirar o CreateForm do FrmAcesso, bem como seu ShowModal e colocá-los no onClick do botão.
  18. s3c

    Outro Problema

    Olá Arlon, veja se você tem algum código no onClose e/ou onDestroy do Form.
  19. s3c

    Tabela Paradox

    Bom, faz muito tempo que não mexo com Paradox. O Database Desktop tem uma opção de reestruturar a tabela. você já tentou isso?
  20. Agora você me pegou. A causa disso realmente desconheço, mas era quase certo porque ddp significa Delphi Diagram Portfolio.
  21. Neste tipo de erro, acho que é o .ddp mesmo. Os arquivos .~ são o backup anterior às últimas alterações antes do salvamento.
  22. s3c

    Tabela Paradox

    Já ví muitos casos de perda e/ou ocorrupção de índices no Paradox. Uma solução definitiva seria você trocar de banco.
  23. s3c

    Trava Teclas Xp

    Olá pessoal, se vocês conseguirem bloquear o ctrl+alt+del no NT ou XP, gostaria que vocês postassem a solução. Obrigado !!!
  24. Acredito que não, de qualquer forma salve-o antes.
×
×
  • Criar Novo...