 |
|
|
|
Você está aqui: Delphi ::: dbExpress ::: TSQLDataSet |
Como usar a propriedade CommandType da classe TSQLDataSet para definir o tipo de comando SQL que será disparadoQuantidade de visualizações: 11077 vezes |
|
A propriedade CommandType da classe TSQLDataSet atua juntamente com a propriedade CommandText para definir o tipo de comando SQL que será disparado contra o banco de dados. Esta propriedade pode ter um dos seguintes valores: ctQuery - Quando o valor de CommandType é ctQuery, o valor da propriedade CommandText deverá ser uma instrução SQL a ser executada pelo TSQLDataSet. Se a instrução for SELECT, o TSQLDataSet a executará quando este for aberto (método Open()). Se a instrução não retornar um conjunto de dados, o comando é executado por meio de uma chamada ao método ExecSQL(). ctStoredProc - Quando o valor de CommandType for ctStoredProc, a propriedade CommandText deverá conter o nome de uma stored procedure. O TSQLDataSet executará a stored procedure por meio de seu método Open() ou ExecSQL(), dependendo se a stored procedure retornará ou não um conjunto de dados. ctTable - Quando o valor de CommandType for ctTable, a propriedade CommandText deverá conter o nome de uma tabela no banco de dados. O TSQLDataSet gerará um comando SQL SELECT automaticamente para retornar todos os registros da tabela, ordenando-os pelos campos listados na propriedade SortFieldNames. O comando SQL SELECT é executado quando o TSQLDataSet é aberto. Por padrão, o valor da propriedade CommandType é ctQuery. Veja um trecho de código no qual definimos o valor desta propriedade em tempo de execução: ---------------------------------------------------------------------- Se precisar de ajuda com o código abaixo, pode me chamar no WhatsApp +55 (62) 98553-6711 (Osmar) ---------------------------------------------------------------------- procedure TForm3.Button1Click(Sender: TObject); begin // vamos definir o valor da propriedade CommandType SQLDataSet1.CommandType := ctStoredProc; end; Podemos também obter o valor desta propriedade usando um código parecido com: ----------------------------------------------------------------------
Se precisar de ajuda com o código abaixo, pode me chamar
no WhatsApp +55 (62) 98553-6711 (Osmar)
----------------------------------------------------------------------
procedure TForm3.Button1Click(Sender: TObject);
var
commandTypeStr: string;
begin
// vamos obter o valor da propriedade CommandType
if SQLDataSet1.CommandType = ctQuery then
commandTypeStr := 'ctQuery'
else if SQLDataSet1.CommandType = ctStoredProc then
commandTypeStr := 'ctStoredProc'
else if SQLDataSet1.CommandType = ctTable then
commandTypeStr := 'ctTable'
else
commandTypeStr := 'desconhecido';
ShowMessage('O valor da propriedade CommandType é: ' +
commandTypeStr);
end;
|
 Link para compartilhar na Internet ou com seus amigos: |
Desafios, Exercícios e Algoritmos Resolvidos de Delphi |
Veja mais Dicas e truques de Delphi |
Dicas e truques de outras linguagens |
E-Books em PDF |
||||
|
||||
|
||||
Linguagens Mais Populares |
||||
|
1º lugar: Java |
