Bom dia a todos, gostaria de saber se alguém poderia me ajudar.
É o seguinte: tenho uma viriável do tipo string cujo conteúdo é '240444',
gostaria de transformá-la no formato de data 24/04/1944 para gravação
correta na tabela.
Já tentei o StrToDate e não deu certo.
Utilizo o firebird 1.5 e
Coloque um atalho no menu Iniciar\Programa\Inicializar ou no regedit: Meu
Computador\HKey_Local_Machine\Software\Microsoft\Windows\Currentversion\Run
- Original Message -
From: Anderson
To: Grupo Delphi
Sent: Wednesday, August 24, 2005 1:12 PM
Subject: [delphi-br] Abrir
Uma das soluções é imprimir direto na porta:
lista := TStringList.Create;
lista.Add('linha1');
lista.Add('linha2');
lista.Add('linha3');
lista.Add('linha4');
lista.SaveToFile('LPT1'); // ou outra porta
lista.Free;
Existem várias formas de fazê-lo, talvez essa seja a mais simples.
Olá pessoal...
Tenho um formulário para pesquisa em que utilizo um edit e um DBgrid.
O usuário digita por exemplo o nome do cliente no edit e no dbgrid é marcado o
cliente desejado.
Teria como eu destacar de outra cor ou até mesmo deixar em negrito a célula do
DBgrid que possui o cliente
Pessoal...
Encontrei recentemente um artigo no site imaster (www.imasters.com.br) que
ensina a mostar um arquivo .xml que faz que a aplicação feita em delphi tenha a
aparência do windows xp.
A única coisa que o autor pede é pra salvar o arquivo como
nome_da_aplicação.exe.manifest.
Fui tentar
StrToDate(MaskDoFormatText('00/00/00', '220805', '_'));
Mas acho que seria melhor você trabalhar com datas em ponto flutuante,
como o Delphi trabalha com o DateTime, Date ou Time. É tudo do tipo
Double. Fica mais fácil depois de tratar no Delphi.
--- Em delphi-br@yahoogrupos.com.br, Cristiano
Prezados,
Tenho um relatorio em QuickReport no formato A4 que é um orçamento (em
geral o orçamento tem 10 linhas). Como fazer para que imprima 2x vezes
numa folha o orçamento, como que simulasse duas vias conforme abaixo:
ORÇAMENTO
Item Produto Qtde Valor
1 A
Pode ser mais ou menos assim:
var
datastr : string;
datadate : TDate;
begin
datastr:='240444';
datadate:=strtodate(copy(datastr,1,2) + '/' + copy(datastr,3,2)
+ '/' + copy(datastr,5,2));
end;
Dessa forma deve funcionar, considerando que o datastr sempre
esteja no formato ddmmyy
function ConvertDate( Data : String ) : TDateTime;
begin
Result := StrToDate( Copy( Data,1,2 ) + '/' + Copy( Data,3,2 ) + '/' +
Copy( Data,5,2 ) );
end;
---Mensagem original---
De: Cristiano Rodrigo Gomes
Data: 08/25/05 07:55:35
Para: delphi-br@yahoogrupos.com.br
Assunto:
O banco é FireBird 1.5,
Vou dar uma olhada no 'case' em SQL...
Valeu.
Thiago
[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:
Obrigado a todos pela ajuda...
- Original Message -
From: Filipe Xavier Ramalho
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 24, 2005 6:34 PM
Subject: RES: [delphi-br] Campo lógico
Eu costumo criar um domínio baseado em smallint que aceite apenas 0 ou 1.
O que voce deverá fazer pra este caso é;
var
sDate: String;
begin
sDate := Copy('240444',1,2) + '/' + Copy('240444',3,2) + '/'
Copy('240444',5,2);
end;
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
Belo Horizonte - MG - Brazil
[EMAIL
Então usa um pagefooter.
--- ARTELA - Artesanato em Biscuit
[EMAIL PROTECTED] escreveu:
Bom dia.
Eu gostaria de saber como faço para colocar os dados
da empresa no final da página do meu relatório.
Tentei usar o summary, porém se o relatório possui
metade da página ele coloca esses dados
O que pode ser feito para resolver este problema que ocorre na
abertura do executável?
Faulting application SISTALT.exe, version X.X.X.X, faulting module
kernel32.dll, version 5.2.3790.1830, fault address 0x00015dea.
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as
Bom dia,
Estou criando um setup para um aplicativo desenvolvido em Delphi 7 +
SQL Server. Quais os arquivos essenciais para adiciona-los na
instalação?
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
Eu uso o DbExpress (SimpleDataset) , carrego o registro no data set e altero um
dos campos (ex: Telefone)...
Tem jeito de na hora do post eu comparar o valor do registro anterior e o valor
do registro atual...
ja ouvi que tem jeito mas nao consigo achar como
abraços
[As partes desta
iRetorno:= Bematech_FI_AcionaGaveta();
Fernanda Forbici
- Original Message -
From: sweetheart_lovebr [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 23, 2005 3:08 PM
Subject: [delphi-br] Abrir Gaveta de Dinheiro
Como faço para abrir uma gaveta de dinheiro que
Bom dia,
Alguém possui um roteiro de criação do exe através do InstallShield
Express do Delphi 7.0 ?
--
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
Quando executo o meu programa em outra máquina, este erro é
apresentado! Eu já coloquei o midas.dll e qtint70.dll mas permanece o
problema.
O que há de errado?
Faulting application SISTALT.exe, version X.X.X.X, faulting module
kernel32.dll, version 5.2.3790.1830, fault address 0x00015dea.
Ola ao grupo,
Creio que minha maquina pegou um vibrião coléricors,
a cada pouco aparece mensagens da seguinte indole:
o processo indica que as mensagens sao de um aplicativo csrss.exe, eu deletei o
aplicativo e deu o maior pau no ruindows,
alguem tem ideia de que virus é ?
[]'s
Joao
Olá, será que alguém sabe como fazer um Drag n' drop da aplicação para o
explorer?
Como posso capturar este evento? qqr dica será muuito bem vinda...
Valeu!!!
Filipe Geyer.
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE
Não se esqueça da ddl de controle do dbExpress (dbexpint.dll se utilizar o
padrão do Delphi, dbexpUIBfire15.dll se usar o UIB com o FB 1.5...), que
deve ser colocada no diretório do sistema, junto com a Midas.dll...
Mauricio
_
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
Foi só colocar o kernel32.dll que o problema foi resolvido.
Em 24/08/05, Áureo[EMAIL PROTECTED] escreveu:
O que pode ser feito para resolver este problema que ocorre na
abertura do executável?
Faulting application SISTALT.exe, version X.X.X.X, faulting module
kernel32.dll, version
Ola a todos,
estou abrindo um projeto no delphi , que eu mesmo fiz e em uma unit
(UFuncoes.pas) , onde eu pus algumas funcoes que vou usar, quando compilo esta
dando a seguinte mensagem [Fatal Error] UFuncao.pas(42): Could not create
output file 'C:\CDVET\Fontes\UFuncao.dcu'
alguem sabe doque
Enfrentei esse problema também..
a solução que encontrei foi justamente desabilitar esse serviço do
windows...
Daniel Doná
Analista de Sistemas
- Original Message -
From: Carlos Fernando (Wiz Sistemas) [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 24, 2005
Ola pessoal,
Necessito colorir a borda de uma célula em um DBGrid, quando a célula for
selecionada. Estou utilizando Canvas e tentei com Canvas.Pen.Color, mas
não obtive sucesso. Alguém teria alguma sugestão?
[]s
Christian Balz
[As partes desta mensagem que não continham texto foram
Ou este diretório não existe, ou está corrompido ou há um arquivo
UFuncao.dcu nele que está em modo somente leitura
[]s
Walter Alves Chagas Junior
Projeto e desenvolvimento
Telemont Engenharia de telecomunicações
Belo Horizonte - MG - Brazil
[EMAIL PROTECTED]
Fone: (31) 3389-8215 Fax: (31)
Yahoo!.
__ NOD32 1.1201 (20050825) Information __
This message was checked by NOD32 antivirus system.
http://www.nod32.com
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens
Bom dia a todos, se alguém puder me ajudar.
Tenho as seguintes tabelas com os seguintes campos:
TABELA NOTACOMPRA
CODIGO
NUMERONOTA
DATANOTA
VALORNOTA
TABELA ITENSCOMPRA
CODIGO
NUMERONOTA
CODIGOPRODUTO
QUANTIADADEVALOR
O que gostaria de fazer é o seguinte. Quando cadastrar o tem gostaria de
Ninguem trabalha com TCP aqui pra me dar uma ajuda
-=SchiavoR=- escreveu:
Bom dia amigos.
Estou com um problema ao utilizar o componente IdTCPServer.
Em uma aplicação cliente, em determinados momentos ela efetua um pedido
para o servidor, e este servidor ao receber o pedido acessa um
Bom dia a todos
Preciso usar um determinado texto no meu código HTML no meu programa como uma
constante. Mas este código muda de acordo com alguns parâmentros :
'HREF=Resp_Historico2flag=P1nrot=SPG2308Nmensagem=processo=21422540interloc=sequencia=020'
Onde preciso inserir na
Bom dia amigos,
Possuo um sistema em uma rede com 9 clientes e 1
servidor.
Utilizo Delphi 7, Firebird 1.5 e MDO para conectar ao
banco.
O caso é que acho que os computadores estão perdendo a
conexão com o Servidor, o que causa um erro no meu
Sistema, aparecendo a famosa tela: Este aplicativo
Olá a todos
estou com um problema usando D7 - dbexpress - Oracle
Quando faço um applayupdates(-1) oorre o erro abaixo:
'ORA-00942' - a tabela ou view não existe.
Obs. o exemplo abaixo funciona no sqlserver mas no oracle ocorre o erro
exemplo.
procedure TForm1.Button1Click(Sender: TObject);
Como assim? Pelo delphi ou um programa a perte? A parte tem o outlook,
outlook express, thunderbird, pegasus mail , eudora, entre outros. Pelo
delphi vc pode usar os componentes indy.
Em 24/08/05, Raphael Programador [EMAIL PROTECTED] escreveu:
Olá amigos da lista
Estou precisando criar
Vai epender do q vc quer fazer e como.
Se vc quer q rode alguma instrução sem formulario e sem a nescessidade do logon
do windows, use o TService. Caso contrario use as instruções do nosso amigo
Eduardo.
Eduardo
- Original Message -
From: Eduardo
To:
Filipe,
Fiz um aplicação no Delphi 5, com componentes free de terceiros.
Mas o problema é que mudei de empresa, e não tenho mais esses componentes...
Funcionava perfeitamente
Se algum companheiro souber o nome desses componentes, poderia repassar para
a lista.
Abraços,
Eduardo
por acaso testeu nesta madrugada. Na minha aplicação funcionou
perfeitamente. Não tive problemas. Pelas outras pessoas que conheço que
usam, e nunca tiveram problemas.
Em 25/08/05, Cleiton [EMAIL PROTECTED] escreveu:
Pessoal...
Encontrei recentemente um artigo no site imaster
Salve lista.
Alguém aí, possui documentação ou dicas em relação ao uso do DBExpress ??
Estou com um sério problema, num cliente, usando Firebird e dbExpress.
O sistema está ficando lento. Tem alguma coisa que posso fazer no
ClientDataSet ou em qualquer outro lugar a fim de melhorar a
Pessoal,
Alguém poderia me ajudar.. preciso de um componente de imagem que possa
mostrar uma imagem que está no banco de dados em um campo BLOB, mas caso a
imagem seja maior do que o tamanho que o componente estar na tela, mostrar
barra de rolagem... Por favor.. se alguém souber onde posso
Gabriel,
Tenho um componente que faz o redimensionamento para exibição, põe barra de
rolagem com recurso pan, rotaciona, captura da WebCam, seleciona e manda
para o clipboard e mais algumas coisas, além de aceitar o formato PNG.
Entre em contato em PVT.
Filipe
[EMAIL PROTECTED] ou [EMAIL
Verifique o owner q vc esta usando e onde esta a tabela.
Se for diferente vc tem q passar por parametro, exemplo :
select CAMPO FROM USUARIO.TABELA
Eduardo
- Original Message -
From: Daniel Bastos
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 25, 2005 10:21 AM
foi mau ...
resposta certa para o topico errado
Eduardo
- Original Message -
From: Daniel Bastos
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 25, 2005 10:21 AM
Subject: Re: [delphi-br] Programa para enviar emails
Como assim? Pelo delphi ou um programa a
Verifique o owner q vc esta usando e onde esta a tabela.
Se for diferente vc tem q passar por parametro, exemplo :
select CAMPO FROM USUARIO.TABELA
Eduardo
- Original Message -
From: [EMAIL PROTECTED]
To: Undisclosed-Recipient:;
Sent: Thursday, August 25, 2005 10:15 AM
Felipe, vou te pedir mais uma ajudinha: criei o dominio mas gostaria de saber
como fazer para aceitar somente os valores 0 e 1.
Obrigado.
- Original Message -
From: Filipe Xavier Ramalho
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 24, 2005 6:34 PM
Subject:
Olá Eduardo,
Obrigado pela dica, só que nao funcionou tbm.
já tentei com o usuario system , ja tentei por owner do usuario que criou a
tabela
mas nao quer funcionar.
qualquer dica favor enviar.
muito obrigado
Sandro Garcia
- Original Message -
From: Eduardo
To:
Algumas dicas...
1) Configurar corretamente os providers flags do DataSetProvider
2) Não trazer deus o e mundo para o cliente
Isso é um bom começo.
www.clubedelphi.net
www.activedelphi.com.br
Agora, aqui na lista vc vai achar muita coisa também... Se não me engano na
parte de arquivos da
O nome de componentes eu não sei, mas vc pode procurar por artigos e
materiais sobre programação Shell, que é a pratica de integrar o
desenvolvimento ao sistema operacional.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Eduardo RC Neto
Enviada
Preciso montar uma Function que diz se, em uma string, existe um caracter
especial (@, !, #, $ Etc...)
Baseado em um evento que desenolví através do Método KeyPress do Form,
Fiz a seguinte Verificação só que, através de um Botão:
Procedure TForm1.Button1Click(Sender: TObject);
var wKey : Char ;
do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__ NOD32 1.1201 (20050825
Filipe,
Vc poderia estar passando isso pra mim ???
- Original Message -
From: Filipe Xavier Ramalho [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Cc: [EMAIL PROTECTED]
Sent: Thursday, August 25, 2005 12:04 PM
Subject: RES: [delphi-br] Componente de Imagem - URGENTE -
Use assim...
if SimpleDataSet.FieldByName( 'TELEFONE' ).OldValue
SimpleDataSet.FieldByName( 'TELEFONE' ).Value then
ShowMessage( 'Changed' );
constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password :=
Boa tarde pessoal
Estou com um problema, criei uma relatorio, que foge dos padrões normais
adotados (Carta, A4 etc..) para isso utilizei o formato Custom com altura de
203 mm e largura de 215 formatei o relatório para MM. Porém quando imprimi não
foi obedecida a fomatação que coloquei o
Olá,
Fiz um relatório usando o Rave Report
no topo do relatório tem o logo da empresa
quando dou um preview aparece no tamanho normal
mas quando mando imprimir o mesmo relatório, o logo
sai bem miniatura o que tem q fazer pro logo sair
igual aparece no video?
Obrigado
Thiago Bruno
[As partes
grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
b.. Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do
Serviço do Yahoo!.
__ NOD32 1.1201 (20050825
Eu tenho um exemplo em que um professor digita as notas na casa dele através de
um programa cliente, o mesmo envia um e-mail para o colégio onde eu trabalho, e
no programa gerencial daqui tem a opção de fazer a leitura desse e-mail. Caso
ajude.
Alisson Ricardo Viol Gazda
- Original
Desculpe ai galera mas acabei de achar, segue ai pra quem nao sabe
usei simpledatasetMeuCampo.oldvalue e simpledatasetMeuCampoNewValue
valeu...
- Original Message -
From: Ailton Branco
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, August 24, 2005 10:24 AM
Subject:
Quando eu coloquei a kernel32.dll dentro do diretório, o programa
abriu normalmente. O que posso estar fazendo de errado na compilação
do aplicativo?
Em 24/08/05, aureosl[EMAIL PROTECTED] escreveu:
Quando executo o meu programa em outra máquina, este erro é
apresentado! Eu já coloquei o
Saudações Pessoal
Gostaria de saber se alguem tem ou sabe onde achar uma apostila sobre delphi
2005 e .net, é que estou querendo aprender essa área e estou querendo ver
primeiro .net com o delphi para depois ver com o vb.net e fazer uma leve
comparação, alias, uma pergunta para os mais
Olá Rogerio
segue o seu exemplo usandoo uma function que retorna True se o caracter
informado for especial
quanquer duvida entre em contato
obs. nao deu tempo para testar.
Procedure TForm1.Button1Click(Sender: TObject);
var
i: Integer;
begin
for i:=1 to Length(Edit1.Text) do
begin
Alguém sabe como gravo uma string de um Edit em um arquivo TXT e depois
volto esta string para o Edit?
Falow!
--
No virus found in this incoming message.
Checked by AVG Anti-Virus.
Version: 7.0.344 / Virus Database: 267.10.15/81 - Release Date: 24/8/2005
--
No virus found in this
Ola!
Comecei a trabalhar com delphi meio q por acaso, fui aprendendo na
marra mesmo, na empresa q trabalho minha função nao eh esta mas sabe
como eh, as vezes temos q fazer de tudo um pouco.
Acontece q estou gostando disso e tenho pensado em trabalhar com
delphi por conta propria, prestando
procedure TForm1.Button1Click(Sender: TObject);
const Especiais : array [1..4] of string = ('@', '!', '#', '$');
var i, j : Integer;
begin
for i := 1 to Length(Edit1.Text) do
for j := 1 to 4 do
if (Edit1.Text[i] = Especiais[j]) then
ShowMessage(Edit1.Text[i] + ' é um
!.
__ NOD32 1.1201 (20050825) Information __
This message was checked by NOD32 antivirus system.
http://www.nod32.com
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA
Tarde!
Alguém sabe:
Eu preciso descobrir se um determinado componente tem uma propriedade
ou um método ou evento.
Mais ou menos assim:
for i:= 0 to ComponentCount - 1 do
begin
if Components[i].hasProperty('Enabled') then //isto não existe...
Components[i].Enabled := False;
Olá Pessoal.
Estou com um probleminha aqui.
Uso Delphi 7, Firebird 1.5 e DbExpress.
No BD existe um campo not null.
Ocorre que ao preechencer o clientdataset preciso deixar este campo
em branco ao aplicar o método post.
Vou preencher este campo not null somente antes do applyupdates, pela
CREATE DOMAIN DMN_BOOLEAN AS SMALLINT CHECK(VALUE = 0 AND VALUE = 1);
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED]
nome de Wilson Valdevite
Enviada em: quinta-feira, 25 de agosto de 2005 12:19
Para: delphi-br@yahoogrupos.com.br
Assunto: Re:
Atribua 0 ou '' para ele antes de gravar...
constructor TVitor.Create( AOwner : TProgrammer );
begin
Name := 'Vitor Redes';
Login := 'vredes';
Password := '**';
City := 'Curitiba';
Employee := 'Redsystem';
inherited Create( AOwner )
end;
end.
- Original
obrigado... valeu pela força
- Original Message -
From: Filipe Xavier Ramalho
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 25, 2005 3:21 PM
Subject: RES: [delphi-br] Campo lógico
CREATE DOMAIN DMN_BOOLEAN AS SMALLINT CHECK(VALUE = 0 AND VALUE = 1);
GOSTARIA DE SABER COMO FAÇO PARA PEGAR O ULTIMO DIA DO MES CORRENTE?
Atensiosamente
Luís
[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:
Caros amigos,
O Help do Delphi diz o seguinte:
Use GetMetadata to turn on or off the fetching of metadata on a database
object. Setting GetMetadata to False will improve performance because no
additional SQL will execute in order to get index information. However,
setting GetMetadata to
cria uma data com o primeiro dia do mes seguinte ao que vc quer e tira um dia ,
vc vai ter o ultimo dia do mes anterior
ex.
01/09/2005 - 1 = 31/08/2005
qualquer duvida entre em contato.
Sandro Garcia
- Original Message -
From: Guigos
To: Delphi-Br
Sent: Thursday, August
Beleza, testei e aparentemente funciona OK !
Obrigado.
[]'s
- Original Message -
From: [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 25, 2005 2:26 PM
Subject: Re: [delphi-br] ACHAR CARACTER ESPECIAL em uma STRING
Olá Rogerio
segue o seu exemplo usandoo uma
uso o delphi 7 com slqserver, conexão dbexpress.
gostaria de fazer uma tela na entrada do sistema para trocar a conexão com o
banco de dados.
Por exemplo, quando vou instalar em um cliente novo aparece a tela inicial para
conexão, para que eu selecione ou digite o nome do servidor e do banco
Estou tentando ler arquivos em .DBF e transformá-los em PARADOX;
porém a nível de desenvolvimento me aparece o seguinte erro :
Producion Index file missing
corrupt or cannot interpret index Key,
aí me aparece as opções :
Open Read Only
Fail Open
Open and Detach
se eu escolher a última opção eu
Boa tarde galera,
Estou com um problema, estou usando DBexpress com db Mysql
No meu SqlFuncionariosCont tenho isso na propriedade: CommandText
select * from FUNCIONARIOS, INFCONTRATACAO
WHERE INF_FUN_ID = FUN_ID
Quando entro na tela altero algo no cadastro, ele da a seguinte msg.
Boa tarde galera,
Estou com um problema, estou usando DBexpress com db Mysql
Uso o trio ClientDataset, DatasetProvider e SqlDataset
No meu SqlFuncionariosCont tenho isso na propriedade: CommandText
select * from FUNCIONARIOS, INFCONTRATACAO
WHERE INF_FUN_ID = FUN_ID
Quando entro na tela
Vc pode fazer essa verificação no registro, quando uma flag no registro
exp:
ConfConexao = 1, então quer dizer que o programa já foi configurado a
conexão ...IP usuário e Senha blz,
Se for a primeira execução, ou seja, instalação, não irá existir essa
flag no no registro do Windows,
Daí é onde vc
Ou use a função DaysInAMonth (fica na unit DateUtils).
Leandro
- Original Message -
From: [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, August 25, 2005 3:56 PM
Subject: Re: [delphi-br] ULTIMO DIA DO MES
cria uma data com o primeiro dia do mes seguinte ao que vc
Por experiência própria fiz um curso de ASP.NET(VB.Net), Usando a
ferramenta Visual Studio
Kara eu não gostei, pq? Achei lento o ADO, a ferramenta
quando falaram do Visual Studio,
Achei que era chapado, e tal, até quem já mexia com VB a
algum tempo, apanha...
Boa tarde galera,
Estou com um problema, estou usando DBexpress com db Mysql
Uso o trio ClientDataset, DatasetProvider e SqlDataset
No meu SqlFuncionariosCont tenho isso na propriedade: CommandText
select * from FUNCIONARIOS, INFCONTRATACAO
WHERE INF_FUN_ID = FUN_ID
Quando entro na tela
para o SQL server, vc terá que instalar o cliente que está o arquivo MDAC
2.8 baixe em
http://www.microsoft.com/downloads/details.aspx?FamilyID=6c050fe3-c795-4b7d-b037-185d0506396cdisplaylang=en
e em particular a DLL DBNETLIB.DLL que é a DLL que faz a comunicação com
MSSQL e nao vem no pacote
Experimente montar a sua Select assim;
SELECT *
FROM FUNCIONARIOS, INFCONTRATACAO
WHERE INFCONTRATACAO.INF_FUN_ID = FUNCIONARIOS.FUN_ID
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Rodrigo Mota
Enviada em: quinta-feira, 25 de agosto de
cara no google procure por deephi, sao muitas dicas, ou entao va diretamente
no site http://www.deephi.rg3.net/ eu gosto muito de usar esse tipo de
arquivos de pesquisa, evita que fique postando mensagens direto no forum,
primeiro vejo se nao existe algo nas dicas, vale apena ter esse arquivo
Thiagão... ligue o SQLMonitor, e veja como fica as instruções de atualizações,
com true e false
Att.
Danilo
Francisco Thiago [EMAIL PROTECTED] escreveu:
Caros amigos,
O Help do Delphi diz o seguinte:
Use GetMetadata to turn on or off the fetching of metadata on a database
object. Setting
Foi bom vcs terem entrado no assunto, sou louco pra aprender .NET, mas quero
aprender utilizado o Delphi, não acho nada na Net sobre isso, acha-se muito
material se ASP.NET
mas eu quero especificamente para usar com Delphi 2005
Se alguem achar me informe por favor
Att
Luis Carlos
-
Galera, la vai minha opnião simplificada sobre o uso do getmetadata..
podemos afirmar q para datasets de consulta usa-se getmetadata false e
para dataset onde vou fazer operações de manipulação de dados, uso
getmetadata true, cabe a nos balancear, uso desta forma em meus sistemas e
funciona mto
Lichot, que tipo de diferença você observa com o getmetadata???
Dá pra passar alguns testes praticos pra gente fazer?
Obrigado,
Danilo
[EMAIL PROTECTED] escreveu:
Galera, la vai minha opnião simplificada sobre o uso do getmetadata..
podemos afirmar q para datasets de consulta usa-se
Boa noite , estou tendo problemas com a criação de um form , pois estou
usando ele mais de uma vez ... veja .
Unit UTDM_Dados;
.
.
.
TDM_Dados = class(TdataModule)
SQLconnection : SQLconnection;
Sds_cad : TsimpleDataSet;
Dts_cad : TdataSource;
.
.
end;
.
.
end.
88 matches
Mail list logo