Executar Comando SQL

Question

Iai Galera, Bom n�o encontrei at� agora o que preciso, se puderem me ajudar... Estou a procura de um executador de comando via meu sistema. Explicando melhor: Os usu�rios na empresa onde trabalho exec...

Adriano Santos · Answer

Tremonti, pode me explicar por que seus usuarios executam queries? Sim, porque se isso � feito para atualiza��op do banco, o que acontece muito, voc� tem outras formas de fazer isso.

O que exatamente precisa?
Tem uma edi��o da ClubeDelphi, 84, que tem um artigo meu falando sobre o assunto.

Abs

Tremonti · Answer

Fala Adriano, executam porque precisam de novas rotinas no sistema, mas enquanto nao fica pronto, � executado via comando.Exemplo, tirar relat�rio, alterar datas e assim vai...Obrigado...

Adriano Santos · Answer

Entendi.� perigoso deixar o usu�rio executar selects, updates, deletes e etc. Eu faria uma rotina mais travada para que o usu�rio n�o ficasse t�o livre.Tenho tr�s sugest�es:[list:79617b2561][*:79617b2561]Se for para filtro tem uma s�rie de v�deo-aulas do meu colega Paulo Quicoli mostrando como criar uma super-query. Uma janela com alguns ComboBoxes onde o usu�rio cria sua consulta.A primeira v�deo-aula est� nesse link, depois fica f�cil encontrar as outras://www.devmedia.com.br/articles/viewcomp.asp?comp=5286[*:79617b2561]Se for pra fazer manuten��o do sistema, incluindo campos, tabelas e etc, crie um programinha que l� um arquivo texto e executa automaticamente as linhas do mesmo. Na edi��o 84 da ClubeDelphi tem um artigo meu. Se precisar de ajuda estou no ar.[*:79617b2561]E por �ltimo se realmente necessitar que o usu�rio fa�a a querie e execute, crie uma janela com um Memo. Ao clicar em determinado bot�o voc� d� um loop no Lines do Memo e manda executar cada linha no m�todo ExecuteDirect do componente SQLConnection do DBExpress. Funciona que � uma beleza.[/list:u:79617b2561]Abs...

Tremonti · Answer

Entendi.Necessito mesmo que os usu�rios executem queries.A dificuldade est� no fato de que usu�rios executam updates e outros usu�rios selects.Preciso de uma rotina bem semelhante ao do query, onde aparecem os resultados na parte inferior da tela, sabe?Obrigado...

Adriano Santos · Answer

Sim, entendi.Isso � moleza de fazer. Crie uma tela onde voc� ter�:[list:fa83f4da00]  1. Voc� vai precisar de, 1 Button, 1 Memo alTop, 1 DbGrid alClient, 1 SQLConnection, 1 SQLQuery, 1 DataSetProvider, 1 ClientDataSet e 1 DataSource  2. Ligue o SQLConnection a sua base de dados  3. Ligue o SQLQuery ao SQLConnection pela propriedade SQLConnection  4. O DataSetProvider � ligado ao SQLQuery pela propriedade DataSet  5. Conecte o ClientDataSet ao DataSetProvider pela propriedade ProviderName  6. Por �ltimo ligue o DataSource ao ClientDataSet e o DBGrid ao DataSource[/list:u:fa83f4da00]Para utilizar voc� vai fazer algo asim no evento onClick do Button:[code:1:fa83f4da00]procedure TForm1.Button1Click(Sender: TOject);begin  if not SQLConnection.Connected then    SQLConnection.Connected := True;  with SQLQuery, ClientDataSet do  begin    Close;    SQL.Clear;    SQL.Assign(Memo1.Lines);    ClientDataSet.FecthParams;    ClientDataSet.Open;  end;end;[/code:1:fa83f4da00]Essa � uma forma bem simplificada, s� pra voc� entender. D� pra fazer muita coisa com esse esquema e aperfei�oar ainda mais.Abs...

Adriano Santos · Answer

Ah detalhe, estou sem Delphi nesse momento ent�o posso ter cometido algum erro na rotina de exemplo acima. Abs...

F�rum Executar Comando SQL #348356