[delphi-br] Swingeing assortment just NOW
hello friend! I think you need get and try it. here i got. i tried and it helped! First i thought it's all lies.. but I could not resist:) and I do not regret.. Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: ADO + Firebird
Realmente era isso, pouco depois de postar a pergunta me veio a cabeça que o sinal de :(dois pontos) é um sinalizador de que o que está logo após é um parâmetro, no firebird usa-se dois pontos para identificar variáveis dentro de triggers ou stored procedures, então foi só setar ParamCheck para False que funcionou corretamente, às vezes a gente dá cada bobeira que nem acredita, mas resolvido o problema está ótimo, obrigado. --- Em delphi-br@yahoogrupos.com.br, Gabriel Filho [EMAIL PROTECTED] escreveu Esse erro ocorre geralmente qdo o tipo do paramentro não está definido. [As partes desta mensagem que não continham texto foram removidas] -- 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] 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: http://br.yahoo.com/info/utos.html
[delphi-br] Re: Data e Hora Execultavel
--- Em delphi-br@yahoogrupos.com.br, julianoinfo [EMAIL PROTECTED]
escreveu
Sr.'s Como fasso para pegar Data e Hora do Exe ?
Grato Pela Atenção
Declare a enumaration abaixo no topo da unit:
type
TFileDateType = (fdCreate, fdModify, fdAccess);
Coloque essa função na implementation:
function GetFileDate(const AFilename: String; AType: TFileDateType):
TDateTime;
var
pFile: TSearchRec;
pTime: TFileTime;
pLocal: TFileTime;
iTime: Integer;
begin
Result := 0;
if FindFirst(AFilename, faAnyFile, pFile) = 0 then begin
case AType of
fdCreate: pTime := pFile.FindData.ftCreationTime;
fdModify: pTime := pFile.FindData.ftLastWriteTime;
fdAccess: pTime := pFile.FindData.ftLastAccessTime;
end;
// Convert file time to local time
FileTimeToLocalFileTime(pTime, pLocal);
FileTimeToDosDateTime(pLocal, LongRec(iTime).Hi, LongRec
(iTime).Lo);
// Convert local time to TDateTime
Result := FileDateToDateTime(iTime);
FindClose(pFile);
end;
end;
para usar faça assim:
var
pFileDate: TDateTime;
begin
pFileData := GetFileDate('c:\bootlog.txt', fdCreate);
end;
Com fdCreate você retorna a data de criação do arquivo, com fdModify
a data de modificação e com fdAccess a data de acesso pode ser usado
com qualquer tipo de arquivo, não somente executáveis.
[]'s
--
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]
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:
http://br.yahoo.com/info/utos.html
[delphi-br] ADO + Firebird
Pessoal, estou trabalhando com ADO + Firebird usando o driver oficial do firebird, mas tou com um erro chato aqui, estou tentando criar uma trigger, e simplesmente ele não passa, já compilei a trigger em vários outros programas, tá certinha, no ADO sempre dá o erro: Objeto Parameter definido incorretamente. As informações são inconsistentes ou incompletas. Já pensei que pode ser por causa do SET TERM ^; que não estou colocando, mas se eu coloco, SET TERM ou SET TERMINATOR aí dá erro de undeclared identifier, esse negócio já tá me fazendo cair cabelo, tentei com ADOQuery, ADOCommand... sempre dá o mesmo erro... alguém já passou por isso? Obrigado. -- 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] 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: http://br.yahoo.com/info/utos.html
