
Kikonanet
Veteranos-
Total de itens
472 -
Registro em
-
Última visita
Tudo que Kikonanet postou
-
Consulta Sql Entre Duas Tabelas
pergunta respondeu ao Vivendo&Aprendendo de Kikonanet em Delphi, Kylix
Olá alexandre, Posta aí as estruturas das tabelas. Como o Micheus disse, acho que é um campo da tabela que não existe ou o nome seja diferente.. abs. -
Olá pirambu, Se eu entendi direito quando você filtrar os dados você já pode inserir direto na outra tabela... você pode usar uma Query para isso... E com outra query você insere no banco. Ex: With Query1 do Begin Close; SQL.Clear; SQL.Add('Select * From Tabela'); SQL.Add('Where A = :varA'); Parameters.ParamByName('varA').Value := 'AAA'; Open; While not(EOF) do With Query2 do Begin Close; SQL.Clear; SQL.Add('Insert into Tabela'); ... End; Acho que é +- isso... Estou sem Delphi aqui para testar... Abs.
-
Erso, Se eu não me engano, no MySQL, você consegue criar um campo auto incremento. Não seria isso que você queria?? abs.
-
Consulta Sql Entre Duas Tabelas
pergunta respondeu ao Vivendo&Aprendendo de Kikonanet em Delphi, Kylix
Olá, Tente fazer a Query assim: Select Alunos.codigo, Alunos.nome, Historico.codigo From Alunos, Historico Where (Alunos.Codigo = Historico.CodAluno) and Alunos.Nome... abs. -
Olá, Faz um select na tabela trazendo o max código. ex: select max(id) from tabelaA; abs.
-
Olá, Eu não lembro se tem no Delphi 5, mas tenta usar os componentes da palheta Interbase. []'s Kiko
-
você quer fazer subselects? Ex: "Select Campo1 from tabela1 where Campo2 = (select CampoX from TabelaX where CampoD = 1)"; []'s Kiko
-
Parabéns Progr'amador! É isso aí Churc []'s kiko
-
(Resolvido) Como Criar Um Relatório No Delphi 7?
pergunta respondeu ao phdorocha de Kikonanet em Delphi, Kylix
Olá, Dê uma olhada neste link. Acho que pode te ajudar... http://scriptbrasil.com.br/forum/index.php...mp;#entry266338 abs. -
Olá, Dê uma olhada neste link http://scriptbrasil.com.br/forum/index.php...l=imprimir+memo []'s
-
Olá, Tente isso no Mask: 99/99/99;1;_ abs.
-
Olá, O resultado da query será o que você quer! Use um TQuery... Ex: with Query do begin close; SQL.Clear; SQL.Add(''); // --> Coloque aqui o comando SQL SQL.Add(''); // open; end abs.
-
Olá, Troque os 9 por 0... 00/00/0000... Não me lembro de cabeça, mas tem um desses digitos (0 ou 9) que deixa entrar valores incompletos ou em branco... Testa ai Abs.
-
Sistema Acessar Banco No Servidor
pergunta respondeu ao Escarpas do Lago de Kikonanet em Delphi, Kylix
Olá, Como o V&A disse, instale seu programa no servidor... Acho que nem precise instalar o Access no servidor, copie apenaso banco (faça um teste)... Em cada máquina, você cria um atalho do seu programa... qualquer coisa posta aí. abs. -
Olá, Olha esse link: http://scriptbrasil.com.br/forum/index.php?showtopic=52652 Procure no google tmb... abs.
-
Olá, Tenta usar o UNION na select! Select id, nome from a.dbf UNION Select id, nome from b.dbf Abs.
-
Olá, Como você percebeu você está com uma versão DEMO do VCLSkin... Tinha uma versão do mesmo que não aparecia essa mensagem DEMO... Para resolver o seu problema tente procurar com alguém que tenha uma das versões que era free... Abs. Kiko
-
Olá, tenta assim: Este ex está com ADO ... SQL.Add('SELECT * FROM TABELA'); SQL.Add('WHERE DATA BETWEEN :DataINI AND :DataFIM'); Parameters.ParamByName('DataINI').Value:=MaskEditDataIni.Text; Parameters.ParamByName('DataFIM').Value:=MaskEditDataFinal.Text; ... Abs.
-
Olá, Posta sua dúvida! Abs. Kiko
-
Olá, Se o código estiver certo, tente assim: if Query.FieldByName('CAMPO').AsString = 'Flavia' ... Abs. Kiko
-
Olá, Tenta isso: with Query do begin close; SQL.Clear; SQL.Add('SELECT * FROM TABELA WHERE CAMPO ='+QuotedStr(Edit1.text)); Open; end; Abs. Kiko
-
Veja se você tem essa biblioteca na pasta System ou System32 Abs.
-
Olá, Dê uma olhada no eventlog (Visualizar eventos) do windows e verifique se não é o próprio windows q está encerrando o programa! Abs. Kiko
-
Olá, você pode usar um Edit mesmo... Na propriedade PasswordChar você coloca o símbolo * Abs. Kiko
-
Olá, Tenta assim: if Application.Messagebox('Confirmar Exclusão?','Atenção!', MB_IconQuestion + Mb_YesNo + MB_DefButton2) = IDYes then ... Abs. Kiko