Checa se um campo existe em determinada tabela. Funciona com qualquer
banco de dados relacional. Utiliza componentes DBExpress.
}
function FieldExists(AConnection: TSQLConnection; TableName, FieldName:
String): Boolean;
var
lQuery: TSQLQuery;
begin
lQuery := TSQLQuery.Create(nil);
lQuery.SQLConnection := AConnection;
with lQuery do
try
SQL.Text := Format('SELECT * FROM %s WHERE 0=1', [TableName]);
Open;
Result := Assigned(FindField(FieldName));
finally
Close; Free;
end;
end;
>From: "Vinicius" <[EMAIL PROTECTED]>
>Reply-To: delphi-br@yahoogrupos.com.br
>To: <delphi-br@yahoogrupos.com.br>
>Subject: RES: [delphi-br] Verificar se camo existe?
>Date: Thu, 20 Apr 2006 12:48:46 -0300
>
>Marcos, Boa tarde
>
>Não entendi a pergunta, vc deseja saber se servidor FIREBIRD estar
>instalado ou não?
>
>Vinicius
>
>
>-----Mensagem original-----
>De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
>Em nome de Marcos André
>Enviada em: quinta-feira, 20 de abril de 2006 09:41
>Para: delphi-br@yahoogrupos.com.br
>Assunto: RES: [delphi-br] Verificar se camo existe?
>
>Qual o banco de dados??se for interbase/firebird existe um RDB$ alguma
>coisa... é só pesquisar a tabela....
>
>
>Um Abraço
>
> __ __
> / \ /| |'-.
> .\__/ || | |
>_ / `._ \|_|_.-'
>| / \__.`=._) (_ Marcos André
>|/ ._/ |"""""""""|
>|'. `\ | | Analista de Sistema
>;"""/ / | | Easy Corporation
>) /_/| |.-------.| www.e-easy.com.br
>' `-` ' " " msn: [EMAIL PROTECTED]
>Desenvolvimento e hospedagem de sites apartir de R$ 4,00
>Planos profissionais com qualidade.
>consulte nossos planos, click aqui
>-----Mensagem original-----
>De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
>Em
>nome de Emerson Moreno
>Enviada em: quinta-feira, 20 de abril de 2006 09:24
>Para: delphi-br@yahoogrupos.com.br
>Assunto: [delphi-br] Verificar se camo existe?
>
>Caros amigos,
>
> Gostaria de verificar em uma determinada tabela se um determinado
>campo existe. Recentemente vi um tópico parecido onde responderam para
>verificar usando o dataset.
>DateSet.FieldByName('Campo_a_ser_Verificado').AsString.
>
>Mas o que eu queria mesmo era saber como faço para verificar se o tal
>campo existe direto no banco atravez de um SQL.
>
>Obrigado a todos.
>
>--
>[]'s
>
>Emerson Moreno
>O grande sábio aprende por ensinar!
>
>
>--
><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>Links do Yahoo! Grupos
>
>
>
>
>
>
>
>
>
>
>
>--
><<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
>
>
>
>
>
>
>
>Yahoo! Grupos, um serviço oferecido por:
>
>
>PUBLICIDADE
>
><http://br.ard.yahoo.com/SIG=12fcduirq/M=264379.8325491.9130922.4826560/
>D=brclubs/S=2137111264:HM/Y=BR/EXP=1145547034/A=3351830/R=2/id=noscript/
>SIG=112g4rmd0/*http:/www.yahoo.com.br/copa2006>
>
>
><http://br.i1.yimg.com/br.yimg.com/i/br/ads7/0303_lrec_promos_grupodamor
>te_sky.gif>
>
> _____
>
>Links do Yahoo! Grupos
>* Para visitar o site do seu grupo na web, acesse:
>http://br.groups.yahoo.com/group/delphi-br/
>
>* Para sair deste grupo, envie um e-mail para:
>[EMAIL PROTECTED]
><mailto:[EMAIL PROTECTED]>
>
>* O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
><http://br.yahoo.com/info/utos.html> Serviço do Yahoo!.
>
>
>[As partes desta mensagem que não continham texto foram removidas]
>
_________________________________________________________________
Inscreva-se no programa beta do novo Windows Live Mail e seja um dos
primeiros a testar as novidades. Saiba mais:
http://www.ideas.live.com/programpage.aspx?versionId=5d21c51a-b161-4314-9b0e-4911fb2b2e6d
--
<<<<< FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM >>>>>
<*> Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
<*> Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
| Yahoo! Grupos, um serviço oferecido por: | |
|
Links do Yahoo! Grupos
- Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
- Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
- O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
