Ir para conteúdo
Fórum Script Brasil

Kikonanet

Veteranos
  • Total de itens

    472
  • Registro em

  • Última visita

Tudo que Kikonanet postou

  1. Olá, Para você pegar o valor pode usar: Varivael:=ZQueryBusca.FieldByName('CAMPO').AsString; Peguei no Help do Delphi loCaseInsensitive: Key fields and key values are matched without regard to case. loPartialKey: Key values can include only part of the matching key field value; for example, 'HAM' would match both 'HAMM' and 'HAMMER.' Abs. Kiko
  2. Kikonanet

    Problema

    Não seja radical! Ninguém sabe td! O Fórum é uma comunidade onde todos aprendem, inclusive os moderadores! Nunca menospreze os outros, afinal se você é tão boa assim quanto as suas palavras, você certamente não precisa de Fóruns! Abs. Kiko
  3. Olá, Dê uma olhada neste site http://www.ibexpert.com/ Abs. Kiko
  4. Desculpe, mas não entendi o q você quer fazer! Abs. Kiko
  5. Kikonanet

    Ajuda Nos Códigos

    Valeu Decio, Vou dar uma olhada! Abs. Kiko
  6. Kikonanet

    Usando C Em Rede

    Olá, Se puderem enviar pra mim! kikonanet@terra.com.br Abs. Kiko
  7. Olá Galera do C++! Estou tentando migrar para C++, mas estou encontrando certas dificuldades! Exemplo de um código q uso em Delphi with DM.IBQuery1 do begin Close; SQL.Clear; SQL.Add('SELECT * FROM TABELA'); SQL.Add('WHERE CAMPO=:DataAniv'); ParamByName('DataAniv').AsDate:='23/06/1982'; Open; end; Estou tentando fazer algo semelhante em C++ DM->Qry->Close(); DM->Qry->SQL->Clear(); DM->Qry->SQL->Add("SELECT * FROM TblItemCaixa"); DM->Qry->SQL->Add("WHERE NCaixa=:Caixa"); DM->Qry->Parameters->ParamByName("Caixa")->Value = EditBusca->Text; DM->Qry->Open(); Uso ADO. Alguém pode me dar uma ajuda? Abs. Kiko
  8. Qual a dúvida? Pra cada opção você coloca um DBCheckBox! Abs. Kiko
  9. Olá, Qual erro q está dando? Abs. Kiko
  10. Kikonanet

    Vclskin

    Olá, Eu uso D7 com VCLSKin e nunca tive problemas com o QuickReport! Abs. Kiko
  11. Olá, Na opção DataSource do DBGrid você coloca o DataSource1 e na Opcao DataSet do DataSource1 você coloca a Query! Abs. Kiko
  12. Olá, É só você ligar um DataSource no seu DBGrid e sua Query no DataSource! Abs. Kiko
  13. Olá, Tente assim: with IBQuery do begin Close; SQL.Clear; SQL.Add('SELECT * FROM TABELA'); SQL.Add('WHERE CAMPO ='+ Quotedstr(Edit1.Text)); Open; end; Abs. Kiko
  14. Olá, Use o Componente OpenDialog da palheta Dialogs ex: if OpenDialog1.Execute then ShowMessage(OpenDialog1.FileName); Abs. Kiko
  15. Olá, Eu uso esse código num Edit, mas é só adaptá-lo. var Aux : integer; begin // Estou copiando somente o conteudo até a posição do cursor. // Note os parametros do locate. if Query.Locate('Fornecedor',copy(EditFornecedor.Text,1,EditFornecedor.SelStart),[loCaseInsensitive,loPartialKey]) then begin EditFornecedor.OnChange := nil; // Não queremos ativar o evento agora. Aux := EditFornecedor.SelStart; // Posição do cursor no editFornecedor EditFornecedor.Text := Query.FieldByName('Fornecedor').AsString; // Foi o que encontramos pois o codigo só passa por aqui se existe a informação EditFornecedor.SelStart := Aux; // Atualizamos a posição do cursor. EditFornecedor.OnChange := EditFornecedorChange; // Agora podemos chamar novamente. end; Query.Close; end; Abs. Kiko
  16. Kikonanet

    Modelagem

    Olá, A própria Borland tem uma ferramenta CASE... É q eu não lembro o nome, vou pesquisar e depois coloco aki! Abs. Kiko
  17. Olá, Na verdade você terá q enviar pelo e-mail da pessoa... Acho q o q você quer é enviar pelo 'apelido'. Ex: você digita o 'apelido' Joao... mas quando for enviar o e-mail, ele busca no banco o e-mail daquele respectivo apelido. Abs. Kiko
  18. Olá, IncMonth() acrescenta um determinado número mês a uma data... ex: IncMonth('28/06/2005',2) // Soma 2 meses a uma data Fiz um teste superficial e não achei problemas. A melhor forma é você testar. Abs. Kiko
  19. Olá, Dê uma olhada neste link: http://www.imasters.com.br/artigo.php?cn=1201&cc=49 Abs. Kiko
  20. Olá, Veja se a propriedade do SQLConnection LoginPrompt está como True... Se estiver coloque como False. Abs. Kiko
  21. Olá, Pelo q entendi você pode usar a função do Delphi IncMonth() para somar um mês em uma determinada data. você terá q criar um Banco de Dados (Access, Paradox,Interbase...) e nele sua tabela por exemplo Contratos, q conterá os campos do contrato. Ex: número,Data de vencimento...etc qualquer coisa posta ae. Abs. Kiko
  22. Olá, O VCLSkin é um componente em q você coloca na sua aplicação. Com ele você pode usar os skins para dar uma nova cara em suas aplicações. Se você procurar pela net você encontra! Abs. Kiko
  23. Olá, Dá uma olhada no componente VCLSkin! Abs. Kiko
  24. Kikonanet

    Datas

    Olá, você pode usar a função IncMonth() para incrementar meses em uma data. Abs. Kiko
×
×
  • Criar Novo...