sillier
-
Total de itens
54 -
Registro em
-
Última visita
Tudo que sillier postou
-
Boa Noite, A pergunta que vou fazer pode parecer meio idiota, mas sinceramente, não achei uma resposta satisfatória a respeito. Eu trabalhava com Delphi 7 e a pouco tempo resolvi migrar para o Delphi 8, estava indo tudo bem até que tive a necessidade de fazer um relatório, contudo não localizei nenhum componente para fazer relatórios (Quick Report, Rave Report.... ) ou então um componente pra baxar na net que seja compativel com a versão 8 do Delphi. O delphi 8 não possui algum componente de relatório nativo? ou algum que possa instalar? Desde já agradeço...
-
Amigo, Consultas SQL só é possível fazer em componentes Querys e seus descendentes (semelhantes). No seu caso, como está usando table e quer fazer uma consulta no mesmo estilo do SQL você deve aplicar um FILTRO no table, que ele deixará só os registros que estiverem relacionados com o filtro. Eu só não me lembro agora como se faz, pois já abandonei a muito tempo os componentes TTable, mas dá uma procurada aqui no forum ou no google que você acha bastante coisa. Espero ter lhe ajudado... Abraços.
-
Você pode criar um trigger para fazer automaticamente o autoincremento, caso esteja usando FB/IB. Para fazer um incremento "manual" depende muito dos componentes que está usando para conexão com o banco de dados, mas vou tentar explicar: query.LAST // vai para o ultimo registro // var ultimo, proximo: integer; ultimo:= query.fieldbyname('Nome_campo').AsValue; proximo:= ultimo+1; //agora é só jogar o valor da variavel próximo no banco. É mais ou menos isso.. Qualquer coisa posta aew.
-
Daew Hawker, Cara... entendi a sua colocação, mas acho que não resolverá muito bem o meu problema. Tipow, se salvar no banco só o caminho da imagem eu vou ter que mandar essa imagem por FTP, pois ela ficará em um servidor remoto e haverá um página em PHP que apenas exibirá essa imagem juntamente com outros dados a partir dos registros do banco de dados, mas o único que deu problema foi na imagem, que assim como outros dados são enviados ao banco através de um aplicativo feito em Delphi 7. Obrigado a todos que tentaram ajudar, agradeço se tiverem mais alguma alternativa!? Obrigado.
-
Eaew cara.. Bah, pior que eu já tentei!, mas não funcionou... Se alguém tiver alguma outra ideia agradeço. Abraços.
-
Olá amigos, Eu tenho um banco de dados nos quais existem alguns campos do tipo Blob que possuem imagens (bmp) inseridas, e eu consigo visualizar as imagens apartir de um aplicativo que fiz em delphi, mas não consigo exibir numaa página em PHP. A página é exibida, mas quando a imagem é exibida fica estranho... como se estive sendo aberta com o bloco de notas... toda codificada ou sei lá o quê!?. Caso alguém possa me ajudar a exibir essa imagem corretamente, fico grato. Obrigado.
-
Olá Amigos, Eu sou novato no mundo do PHP, e mal conhecia essa poderosa ferramenta até surgir a necessidade de interagi-la com um sistema que fiz. Eu tenho um banco de MySQl que possui uma tabela com imagens, arquivos txt e caracteres e preciso exibir as informações em uma página Web, mas esta dando apenas esse erro: No database selected. Se alguém puder ajudar essa é o script que utilizo: <?php // conexão com o banco de dados $hostname_teste = "localhost"; $database_teste = "db_news"; $username_teste = "root"; $password_teste = ""; $teste = mysql_pconnect($hostname_teste, $username_teste, $password_teste) or die(mysql_error()); //seleção da tabela $table = "tbl_news"; $tabela = mysql_select_db ($table); //selecionamento dos dados mysql_select_db($tabela, $teste); $query_teste = "SELECT * FROM `tbl_news` ORDER BY `id` ASC LIMIT 0, 30"; $teste1 = mysql_query($query_teste, $teste) or die(mysql_error()); //calculo da quantidade de linhas e colunas $row_teste1 = mysql_fetch_assoc($teste1); $totalRows_teste1 = mysql_num_rows($teste1); ?> E logo abaixo, dentro do <html> estou exibindo os dados assim: <?php echo $row_teste1['id']; ?> Obrigado a atenção de todos. []'s
-
Preciso fixar a dimensão de uma tabela para evitar evitar que o conteudo aumente suas proporções e modifique a estrutura da tabela. Preciso de ajuda com um pouco de urgência. Agradeço a atenção até o momento.
-
Olá Eder, Cara, não sei exatamente o que você quer fazer mas tenta usar os comandos First (primeiro) e Last (último). Tipo, pra exibir o primeiro: Bem... espero ter te ajudado. Quaquer coisa posta aew. Até mais...
-
Eaew bastard2003, beleza? Cara, se tu vai definir um campo como sendo varchar de 400 não seia mais fácil definir esse campo como sendo do tipo Memo (Blob)? Eu não me lembro se tem algum limite o tipo varchar, mas acredito que tenha. Não sei se ajudei, espero que sim. Até mais....
-
Olá Amigos. Após inumeras tentativas na elaboração da query de consulta com operadores lógicos eu consegui resolve-la. Ficando assim: Ela ficou meio grandinha, mas funciona. O ideal seria faze-la com parametros que fica mais organizado a query, mas pra mim deu erro. Espero que seja útil pra mais alguém... Abraços. Até mais
-
Eaew.. Qual componente está tentando instalar? Por acaso não tem um end; a mais ou a menos no fonte??? Eu não cheguei a testar nada aqui. Portanto dá uma olhada aí, caso não for por favor me corrijam! Até mais.
-
Olá amigo, //adicione a uses COMobj procedure TfrmMain.Gerar; var excel :variant; try Excel := CreateOleObject('excel.application'); If not Excel.Application.Visible then Excel.Application.Visible := true; Excel.WorkBooks.Add; Excel.Cells[1,1] := 'meu valor 1'; Excel.Cells[1,2] := 'meu valor 2'; Excel.Cells[1,3] := 'meu valor 3'; Excel.Cells[1,4] := 'meu valor 4'; except Showmessage('Ocorreu erro ao executar a transferência.') end; Esse exemplo utiliza a biblioteca COMobj, é a maneira mais simples de se exportar dados para o excel, mas existem outras formas. Apartir disso você pode simplesmente gerar um loop pra exportar toda a query ou apenas partes dela. Essa dica foi retirada do site www.delphi.eti.br. Até mais...
-
Olá, Dê uma olhada nesse link. » LINK « Até mais...
-
Olá Eder, Bem, eu estou com um problema mais ou menos parecido com o seu em relação aquela consulta com operadores lógicos e matemáticos, outro dia eu estava pesquisando na internet e encontrei algo que possivelmente pode te ajudar, contudo não me ajudou muito. É um exemplo que o usuário pode montar a query como quiser. -»» DOWNLOAD ««- Espero ter ajudado... Abraços.
-
Valeu. Desse recurso eu ainda não sabia, vou testar aqui e ver o que tá errado. É vivendo e aprendendo com o pessoal aqui. Obrigado Amigo, Abraços.....
-
Eaew meu velho, tranquilo? Seguinte, testei como me disseste mas não deu certo e também testei assim: dm.Query.sql.add('select * from [tabela] where campo1 like '+Edit1.Text+'%'' and campo2 = '+combobox1.text+''); O curioso é que ele tá compilando normal agora, contudo está dando um erro de sintaxe do MySQL quando tento realizar a consulta, estou usando componentes Zeos para fazer a interação com o MySQL 4.1.14. Se tiver mais alguma idéia agradeço, vou continuar fazendo testes aqui e se obtiver êxito posto o resultado. Vlw pela ajuda. Abraços.
-
Olá Amigos, Já faz muito tempo que estou procurando uma instrução SQL na net, contudo não a encontro. Tipo.. eu quero fazer um consulta que busque uma combinação com o operador lógico AND, mas os argumentos serão definidos pelo usuário. Em SQL, seria mais ou menos isso: Select * from [tabela] where nome like 'edit1.text' and idade = 'combobox1.text' Eu tentei da seguinte maneira: DM.Query.close; DM.Query.sql.clear; DM.Query.sql.add('select * from [tabela] where campo1 like'+#39+Edit1.Text+ '%' and 'campo2='combobox1.text''); DM.Query.open; Mas ele retornou um erro: -Operator not applicable to this operand type. Eu baxei o exemplo postado pelo amigo bastard2003, porém acho que não é bem isso... Se alguém puder ajudar, agradeço. Obrigado.
-
Olá amigo, Tente o seguinte: adoquery1.close; adoquery1.sql.clear; adoquery1.sql.add ('Select * from [nome_tabela] where Dta_nasc = +#39+Edit1.Text+#39'); adoquery1.open;
-
Olá Amigo, Dá uma olhada nesse link, pode responder todas as suas perguntas e muitas outras... » LINK « []s
-
Bem... Como você mencionou o nome do componente TIBQuery, prezumo que esteja usando interbase. Posta aew todo o seu select... pra mim poder entender o objetivo da sua consulta e tentar te ajudar...! Abraços!
-
Bem raphael.sx, Eu acho que entendi o seu problema.... você já tentou usar o campo ID como string? Já que ele irá apenas fazer referencia a uma opção..!? Não sei... pode ser uma alternativa. Qualquer coisa posta aew...! []`s
-
Olá Curinga, Não sei se entendi bem o que você quer, mas veja se é isso: DM.Tabela.Edit; DM.Tabela.Insert; DM.Tablela.FieldbyName('Campo1').AsString := Edit1.Text; DM.Tablela.FieldbyName('Campo2').AsString := Edit2.Text; DM.Tablela.FieldbyName('Campo3').AsString := Edit3.Text; DM.Tablela.FieldbyName('Campo4').AsString := Edit4.Text; DM.Tablela.FieldbyName('Campo5').AsString := Edit5.Text; DM.Tablela.FieldbyName('Campo6').AsString := Edit6.Text; . . . {aqui continua a insersão, dependendo de quantos campos você tem} Ou se você quiser pode usar o método Append, ao invés do Edit e do Insert. Não sei se era isso, qualquer coisa posta eaw... Até mais!
-
Olá raphael.sx, Não sei se isso te ajuda, mas você pode tentar da seguinte maneira: Qualquer coisa posta aew... Abraços...
-
Bem.... A idéia do SelectAll é boa, mas não sei se será bem aplicada corretamente na sua aplicação, contudo... não custa tentar! Caso você resolva usar Edits, a inclusão dependerá de qual componente está sendo usado para acessar o banco (Table, Query,.....). falou...