Ir para conteúdo
Fórum Script Brasil

tiagojacomini

Membros
  • Total de itens

    36
  • Registro em

  • Última visita

Posts postados por tiagojacomini

  1. Boa tarde pessoal,

    estou começando a usar MySQL e não faço idéia de como criar um banco de dados

    baixar o MySQL Server 5.0 e as ferramentas que tinha no site deles,

    uso Firebird há muito tempo, administro ele com o IBExpert

    sei onde ficam os arquivos *.FDB (banco de dados Firebird)

    gostaria de saber o seguinte, qual ferramenta seria parecida com o IbExpert mas para o MySQL???

    onde fica os arquivos de banco de dados do MySQL ???

    Aguardo URGENTE uma ajudinha,

    Muito Obrigado desde já

  2. olá erso

    coloque na opção "InitialDir"

    "OpenDialog1.InitialDir := 'C:\TESTE\TESTE1;"

    para você travar no diretorio você tem que ir nas propriedades do OpenDialog tem uma guia "Option"

    dentro dela tem "ofNoChangeDir" você seta pra TRUE, mas isso acho que num funciona muito bem não...

    falou

  3. não a Tabela ali seria o AdoQuery, AdoDataSet, AdoTable

    esse é somente o nome que eu dei para a tabela em questão

    mas já que você não usa SQL você pode passar LOCATE

    vamos supor que eu esteja usando uma AdoTable

    AdoTable.Locate('NOMEDOCAMPO', Edit1.Text, [loPartialKey, loCaseInsensitive]);

    essa função "Locate" localiza os registros na tabela de acordo com o "Edit1.Text" .

    já as opções de Locate, aquelas que estão dentro das chaves [], são para pesquisa incremental (loPartialKey) ou seja cada tecla que você pressionar ele vai filtrando, e para pesquisa em ambos CharCase (loCaseInsensitive), você pesquisa tanto letras minusculas quanto maíusculas ele trata de uma maneira só...

    abraços

  4. na sua query você deve colocar o campo que você quer pesquisar

    ex.

    "

    SELECT CLIENTES.NOME

    , CLIENTES.ENDERECO

    FROM CLIENTES

    WHERE CLIENTES.NOME LIKE :PESQUISA

    "

    depois no onChange do Edit você faz

    Tabela.Close;

    Tabela.ParamByName('PESQUISA').AsString := Edit1.Text + '%';

    Tabela.Open;

    ou ao invés de fechar e abrir a tabela você pode usar o Locate

    Tabela.Locate('NOME', Edit1.Text [loPartialKey, loCaseInsensitive]);

    e por ai vai....

    espero ter ajudado.

  5. Boa tarde...

    Já fiz várias aplicações com forms Master Details, porém ultilizando componentes IBO, mas recentemente precisei usar o IBX para criar uma aplicação pequena com alguns cadastros simples, e 2 master-detail.

    Não consegui em hipótese alguma fazer um form master-detail. porque acontece o seguinte o IBX trata as operações de uma maneira muito diferente do IBO, ele habilita as lookup´s somente em modo Inserção ou Edição.

    Não sei se estou fazendo certo, uso 2 componentes IBDataSet.

    Na Master é - Vendas

    e Detail é - VendasItens

    Como devo fazer para conseguir fazer esse master detail????

    starta as transações no form show??? colocar a tabela itens em append somente quando incluir um item, postanto ela na sequencia??? seria melhor usar uma tabela de memória? como uso no IBO...

    enfim, esta é a minha grande dúvida.

    Espero ter sido claro...

    Obrigado

  6. já consegui !!! ehehehe

    foi só declarar 2 variaveis globais para receber o

    Screen.Height

    Screen.Width

    no FormCreate

    dae usando o mesmo código no FormCloseQuery

    faco os valores que estao 800x600 receber as variaveis

    cara muito bom esse código!!! perfeito!!!

    valeu

  7. O Gmail tem a seguinte peculiaridade: o acesso ao mesmo via POP3 utiliza encriptação SSL e portas não padronizadas. Esta dica, explica resumidamente como fazer conexões POP3 service do GMail, através de componentes Indy.

    Precisamos colocar estes componentes em um formulário:

    • Um TidPop3 (idPop31) (Indy Aba Clients)

    • Um TidMessage (idMessage1) (Indy Aba Misc)

    • Um TIdSSLIOHandlerSocket (IdSSLIOHandlerSocket1) (Indy Aba I/O handlers)

    • Um TMemo (Memo1)

    • Um TButton (Button1)

    Para que o SSL funcione, o Indy usa a biblioteca OpenSSL, que é GPL e foi implementada por terceiros, por isso, temos que fazer o download de forma que o TIdSSLIOHandlerSocket possa usá-la.

    Para este teste, fizemos o download de: http://indy.fulgan.com/SSL e utilizamos o arquivo indy_openssl096.zip. Descomprimimos o ZIP e colocamos os dois DLLs no diretório do projeto.

    Agora, fazemos com que o aquidPop31 utilize o IdSSLIOHandlerSocket1, configurando-o na propriedade IOHandler.

    Colocamos o nome do servidor pop na propriedade Host de idPop31 - que no caso do Gmail é pop.gmail.com - designamos a porta - que para este caso em especial é a porta 995 - e atribuímos o username e senha no componente idPop31.

    Isto feito, para testar a implementação, inserimos este trecho de código no evento OnCLick de Button1:

    procedure TForm1.Button1Click(Sender: TObject);

    var

    n, nummsgs: integer;

    begin

    Memo1.Lines.Clear;

    //Conectamos!

    idpop31.Connect(0);

    //Obtemos o numero de emails que há na fila

    NumMsgs := idpop31.CheckMessages;

    Memo1.lines.add('Emails:' +IntToStr(NumMsgs));

    for n:=1 to NumMsgs do

    begin

    idpop31.RetrieveHeader(n,idMessage1);

    Memo1.Lines.Add('Email Nº:'+IntToStr(n)+

    ' De:'+idMessage1.From.Text+

    ' Tema:'+idMessage1.Subject);

    idMessage1.Clear;

    end;

    idpop31.Disconnect;

    end;

    E teremos um exemplo que obterá os cabeçalhos dos e-mails da conta de GMail.

    Nota: precisamos de uma versão atualizada da biblioteca Indy. Se o seu Delphi não a tiver, não se preocupe, pode fazer o download no site oficial: http://www.indyproject.org

  8. nossa!!!! era exatamente disso que eu estava falando!!!

    eu coloquei no FormShow pra ele mudar... pra mim restaura a resolucao anterior..

    dexa eu te explicar melhor

    esse procedure é pra uma tela de venda de supermercado eu to desenvolvendo ela em cima de 800x600 mas pode haver variações entre uma maquina e outra, uma pode trabalhar com 1024x768

    eu poderia antes de forçar o 800x600, pegar a resolução atual

    jogar em variavel e quando fechar a tela de venda ele restaurar a resolução!???

    cara muito obrigado mesmo!!! que código lindo!!!

    Obrigado

  9. Boa tarde galera.

    alguém saberia me dizer como que faço pra colocar a resolução da tela em 800x600 direto

    sem passar pelo procedimento que todos conhecem de encher uma ListBox com os modos de resolução e escolher o desejado...

    algo do tipo que num clicar de um botão a tela muda a resolução.

    Obrigado.

  10. bom dia pessoal,

    gostaria de saber onde poderia achar um material de referencia, pesquisa... sobre interface, talvez este seja uma das partes mais difívocês na hora de programar!!!! estou com sérias dificuldades para montar uma tela de vendas para um supermercado... se alguém tiver link, telas, sei la algum tipo de material que pudesse me ajudar estaria muito grato!!!

    desde já muitoíssimo obrigado a todos

    Tiago Jacomini

  11. Boa tarde galera.... alguém aí já viu, ou sabe como fazer pra dividir a paleta de componentes do Delphi 7??? eu comprei um livro do Marco Cantu que tinha esta opção numa ferramenta, mas o próprio Marco disse que não funcionava direito... enfim...

    alguém sabe de alguma coisa a respeito... estou com sérios problemas para achar componentes ..

    Obrigado desde já

  12. interessante, eu uso a propriedade TAG de um TAction para definir níveis de acesso no programa, tipo, quando cadastra um usuario, defino o nivel de acesso dele, ae nas chamadas de forms, no Action eu defino as tags se o usuário tiver acesso entra beleza, se a tag for diferende já manda um showmessage que ele não tem acesso nessa area...

    p**** vivendo e aprendendo, algum tempo eu achava q tags não era nada..

    hauahua

    falou

  13. olá natalie, você poderia usar um TMaskEdit e mudar a mascara dele para:

    "99:99;1;_" - se você quiser salvar a formatação no banco, e,

    "99:99;0;_" - se você não quiser salvar a formatação...

    mas... eu diria pra você procurar por um componente q faça isso, o JEDI tem um DateTimePicker, que funciona como um calendário, mas você muda uma propriedade dele para Time, ele fica como um edit para horas e tem os botões para subir e descer as horas....

    abraços

  14. coloca na propriedade "ActiveControl" do form, você seta para o botao q você quer q recebe o foco....

    ex:

    ActiveControl=BitButton1

    essa propriedade simula um SetFocus em tempo de projeto, fica como se você digitasse o codigo pro botao receber o foco.

    eu estou usando set focus somente quando preciso passar o foco pra outro componente.. no caso do usuario deixar de preencher algum campo, e mostro uma mensagem e mando o foco pro componente...

×
×
  • Criar Novo...