Re: [delphi-br] IBDatabase (IBX) - Connected
Valeu Felipe! On 8/6/07, Fellipe Henrique [EMAIL PROTECTED] wrote: O Jeito mais fácil é no IBDataBase, setar a propriedade AllowStreamedConnected para False... Mesmo ele estando True no seu projeto, ele sempre vai False, ou seja, ao carregar ele não verifica se quando foi compilado estava True... solucionou meu problema.. []s Em 03/08/07, Daniel Pohren [EMAIL PROTECTED]danielpohren%40gmail.com escreveu: Bom dia! Algo que me atormenta a tempo... Se por acaso esqueço de setar a propriedade Connected do IBDatabase para False antes de compilar a versão que vou mandar para o cliente, quando o executavel ABRE, ou seja, nates de passar pelo meu .ini que diz onde está o banco ele ja tenta conectar, obviamente sem sucesso, pois está configurado para o meu IP aqui no escritório. Qual é a maneira mais facil pra nao precisar se preocupar com isto? Tipo não permitir esta conexão? Ja coloquei no create do Form um IF que verifica se ele está conectado e dá uma mensagem de erro Mas ainda não é o ideal, pois se por algum motivo passa assim o que acontece é dar esta mensagem no cliente... Na verdade o que quero é que ANTES de conectar no banco automaticamente ele faça esta verificação Tentei colocar uns testes no BeforeConnect, mas começou a me dar umas violações de acesso sinistras, pois não sou eu que chamo este connect, ele já foi esquecido assim Agradeço, -- Daniel Pohren Naphta Informática [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] fellipeh%40gmail.com Você valoriza a existêcia das pessoas extraordinárias e momentos em que a história avança graças a elas. Tudo o que se imagina pode ser alcançado. Deve-se ousar sonhar. Mas não há substituto para perseverança e trabalho... e trabalho em equipe. Por que ninguém consegue sozinho. Se comemoramos a grandeza desses eventos e as pessoas que os realizam... não podemos esquecer o sacrifício daqueles que tornam possíveis tais realizações. [As partes desta mensagem que não continham texto foram removidas] -- Daniel Pohren Naphta Informática [As partes desta mensagem que não continham texto foram removidas]
RES: RES: [delphi-br] [1/2 Off] PayPal
Olha Walter, Tenho certeza que o banco Real faz depósito transação internacional mesmo por que ele faz parte do grupo ABN AMRO BANK. E amigos meus no exterior já fizeram tal transação. Informe-se novamente. E o banco Real tem swift Code. HSBC faz a mesma transação. Pois eu mesmo já fiz várias vezes. Eu continuo achando que qualquer banco grande como (Bradesco, Itaú, HSBC, real, BB e outros) deve fazer esse tipo de transação, Mesmo por que eles tem clientes de cunho internacional e com certeza deve haver esse tipo de movimentação. Ainda pelo que andei conversando com a minha gerente de conta. Parece que o BB é o único que permite via transação internacional O depósito direto em conta. No outros bancos, mesmo possuindo conta vc ainda deve ir assinar o tal papelzinho. Outra, sobre WU eu quis dizer que, o PayPal pode mandar o valor para seu banco via WU. É só procurar na pagina do PayPal que há instruções. Agora pagar uma compra no ebay diretamente por WU realmente não faz sentido. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: terça-feira, 7 de agosto de 2007 18:09 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [1/2 Off] PayPal Western Union é uma outra modalidade de transferencia que você manda de lá e cai no banco na hora. Quem tem conta no BB pode solicitar a transferencia pra conta na hora, quem não tem, tem que ir lá, assinar um papel e pegar a bufunfa QUE É COTADA PELO DOLAR TURISMO, descontado IOF, CPMF, e outros impostos. Seguro pra você mas não pro comprador. Muita gente lá fora é receioso de faze pagamento desta forma uma vez que você recebeu o fazmerir, e o comprador não terá mais como reinvindicar o mesmo caso você resolva dar o cano nele. Com o Paypal ele ainda tem 30 dias pra arquivar um Dispute. No WU não tem. Quanto a qualquer banco no Brasil poder receber uma transferência internacional, pelo que sei, só o BB está autorizado a tal. A Caixa Economica não mexe com isto porque eu já procurei me informar. Quando eu tinha conta no Mercantil Do Brasil, eles também não trabalhavam com isto. Minha esposa tem conta no Real e lá também eles não fazem esta intermediação. Somente bancos autorizados pelo BC e pela Receita Federal podem fazer isto. Uma alternativa que sempre usei e sempre funcionou beleza, é usar um intermediário. Eu conheço dois que são limpeza total. Um cobra 10% e o outro 6% do montante que você vai transferir. Estes intermediarios trabalham da seguinte maneira: Você manda o dinheiro do seu Paypal pro Paypal dele e ele cota o valor pelo dolar comercial para compra. Deste montante que caiu no paypal dele (o Paypal te cobra uma taxa de 1.5% por tranferencia) ele tira a comissão dele e deposita o equivalente ao restante em reais, na sua conta (você tem que informar pra ele a conta). Estes dois camaradas, que eu conheço, te pedem um prazo de até 48 horas para o dinheiro estar na sua conta. Sempre foi tranquilo. Eu tenho uma comunidade no Orkut, chamada Brasileiros no Ebay. Lá tem muito nego que oferece intermediar este tipo de negócio (Trocar Paypal). Mas se alguém for entrar nesta, busque primeiro referencias do atravessador em vista e se informe mais sobre o historico de negociações do elemento, pois não precisa dizer que ninguem aqui nasceu ontem né... Agora Paypal integrado com algum banco no Brasil não existe. Não precisa nem procurar. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] mailto:wchagas%40telemont.com.br Fone: (31) 3389-8217 Fax: (31) 3389-8215 -Mensagem original- De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ]Em nome de Davi Eduardo Borges Wall Enviada em: terça-feira, 7 de agosto de 2007 17:56 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [1/2 Off] PayPal Não, ele não consegue. Há uma maneira de conseguir que esse dinheiro chegue no Brasil e vá para uma conta. Existe um meio de mandar dinheiro para sua conta no Brasil se vc estiver no exterior via transferencia internacional (wire transfer com swift code do banco). Esse dinheiro chega no Brasil e fica pronto para ir para sua conta, mas não vai. Você então vai no banco e assina o tal do papel que libera o valor para sua conta. MAS, essa forma há encargos normais do tramite. IOF++ outros, que são descontados do valor antes que ele atinja sua conta (depois tem CPMF). Alias qualquer banco no Brasil pode receber uma transferência internacional. Bom, existe um careta chamado UNION BANK que faz esse tipo de transferência. E pelo que andei vendo com colegas, Esse cara faz uma transferência internacional com o dinheiro do PAyPal para sua conta. MAS, vc vai ter que ir no banco e assinar
Re: [delphi-br] Tquery
Ok Luciano.
Obrigado
[]'s
Satoy
On 8/7/07, Luciano Angelini [EMAIL PROTECTED] wrote:
Boa Tarde Satoy .
Talvez isso te ajude
Transacao.TransactionID := 2;
Transacao.IsolationLevel := xilREADCOMMITTED;
try
if not FrmDM.SQLConnection.InTransaction then
FrmDM.SQLConnection.StartTransaction(Transacao);
Inclusao:
FrmDm.QueryCredores.Close;
FrmDm.QueryCredores.CommandText := 'Insert into Credores
(codigo_c,nome_c,endereco_c,complemento_c,bairro_c,cidade_c,uf_c,cep_c,doc,tipo_doc)
values (:vcodigo, :vnome, :vendereco, :vcomplemento, :vbairro, :vcidade,
:vuf, :vcep, :vdoc, :vtipo_doc)' ;
FrmDm.QueryCredores.ParamByName('vcodigo').AsInteger :=
strtoint(edit1.text) ;
FrmDm.QueryCredores.ParamByName('vnome').asstring := Edit2.text ;
FrmDm.QueryCredores.ParamByName('vendereco').asstring := edit3.text ;
FrmDm.QueryCredores.ParamByName('vcomplemento').asstring :=
edit4.text ;
FrmDm.QueryCredores.ParamByName('vbairro').asstring := edit5.Text ;
FrmDm.QueryCredores.ParamByName('vcidade').asstring := edit6.text ;
FrmDm.QueryCredores.ParamByName('vuf').asstring := ComboBox2.Text ;
FrmDm.QueryCredores.ParamByName('vcep').asstring := MaskEdit1.Text ;
FrmDm.QueryCredores.ParamByName('vdoc').asstring := MaskEdit2.Text ;
FrmDm.QueryCredores.ParamByName('vtipo_doc').asstring :=
ComboBox1.text ;
FrmDM.QueryCredores.ExecSQL ;
FrmDM.SQLConnection.Commit(Transacao) ;
end;
except
on Exc:Exception do
begin
ShowMessage('Ocorreu um erro na Tentativa de Gravar o Registro') ;
FrmDM.SQLConnection.Rollback(Transacao);
end;
end;
Alteração:
FrmDm.QueryCredores.Close;
FrmDm.QueryCredores.CommandText := 'Update Credores set codigo_c =
:vcodigo, nome_c = :vnome, endereco_c = :vendereco, complemento_c =
:vcomplemento, bairro_c = :vbairro, cidade_c = :vcidade, uf_c = :vuf,
cep_c = :vcep, doc = :vdoc, tipo_doc = :vtipo_doc where codigo_c = ''' +
edit1.text + ''' ' ;
FrmDm.QueryCredores.ParamByName('vcodigo').AsInteger :=
strtoint(edit1.text) ;
FrmDm.QueryCredores.ParamByName('vnome').asstring := Edit2.text ;
FrmDm.QueryCredores.ParamByName('vendereco').asstring := edit3.text ;
FrmDm.QueryCredores.ParamByName('vcomplemento').asstring :=
edit4.text ;
FrmDm.QueryCredores.ParamByName('vbairro').asstring := edit5.Text ;
FrmDm.QueryCredores.ParamByName('vcidade').asstring := edit6.text ;
FrmDm.QueryCredores.ParamByName('vuf').asstring := ComboBox2.Text ;
FrmDm.QueryCredores.ParamByName('vcep').asstring := MaskEdit1.Text ;
FrmDm.QueryCredores.ParamByName('vdoc').asstring := MaskEdit2.Text ;
FrmDm.QueryCredores.ParamByName('vtipo_doc').asstring :=
ComboBox1.text ;
FrmDM.QueryCredores.ExecSQL ;
FrmDM.SQLConnection.Commit(Transacao) ;
end;
except
on Exc:Exception do
begin
ShowMessage('Ocorreu um erro na Tentativa de Alterar o Registro') ;
FrmDM.SQLConnection.Rollback(Transacao);
end;
end;
sds
Luciano
Satoy Matsuoka escreveu:
Bom dia pessoal,
Por favor desculpe a ignorância, mas como faço um insert update
utilizando o
Tquery ou TUpdate ???
Como seria o comando ?
Exemplo:
Insert into tabela (campo1,campo2) values (???,)
Como me referencio aos campos que vou fazer um insert, update que são da
tela ???
Obrigado
[]'s
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Imagens
Bom dia pessoal, Alguém sabe onde posso encontrar BMP´s para colocar nas minhas aplicações !! Na toolbar ... e outros botões ?? Vlw !!! Abraços []'s Satoy [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] não consigo entender
ola pessoal saudações Estou desenvolvendo um sistema D7, interbase, dbExpress. Tenho um banco de dados e duas tabelas, ainda, dentro desse BD. Clientes e Telefones. Uso os seguintes componentes: SQLConnection, SQLDataSet, DataSetProvider, ClienteDataSet e um DataSource, isto para cada tabela, sendo em comum apenas a Connection. No botão Confirma faço a locação dos campos com os respectivos valores das respectivas edits.text. Tanto para os campos do cliente, como para os do telefone. E no final de cada um uso um ApplyUpdates nos clientDataSet respectivos. No caso do dados dos clientes, da um erro dizendo que não reconhece a tabela Clientes, e no caso do telefone aceita sem problemas. O que fazer ou o que estou fazendo de errado? Obrigado Clovito Clóvis Machado Ferreira Que o GADU nos Ampare Msn-[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Aviso de Mudanca de Valor de Variavel
Bom Dia!! alguem se o Delphi tem algum recurso para saber qdo o valor de uma variavel muda?? tenho umas variaveis em umas telas q estao assumindo valores meio sinistros e n estou conseguindo achar qdo elas estao recebendo estes valores. Ja tentei fazer o passo-a-passo com a tecla F7 durante a execucao, mas o codigo da mtas voltas e é mto grande e por isso está mto dificil de encontrar (ainda mais pq em alguns passos nao é mostrado o valor q entrou na variavel) Mto Obrigado Rafael [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro ao usar DLL
Olá a Todos...
Pessoal tenho a seguinte dll:
library Biblio;
uses
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms,
Dialogs, DB, Grids, DBGrids, Buttons, StdCtrls,
Mask, DBCtrls, ExtCtrls,
ActnList, ComCtrls, FMTBcd, Provider, DBClient;
{$R *.res}
procedure LimpaCampos(vForm: TForm; vFormHandle:
THandle);
var i : Integer;
begin
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TEdit' then
begin
TEdit(vForm.Controls[i]).Text:='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TDBEdit' then
begin
TDBEdit(vForm.Controls[i]).Text:='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TCheckBox' then
begin
TCheckBox(vForm.Controls[i]).Checked:= False;
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TDBCheckBox' then
begin
TDBCheckBox(vForm.Controls[i]).Checked:= False;
end;
end;
Exports
LimpaCampos;
begin
end.
E no Form frmCadKits declaro a procedure e a dll.
...
public
{ Public declarations }
end;
procedure LimpaCampos(vForm: TForm; vFormHandle:
THandle); external 'biblio.dll';
var
...
E faço uma chamada no show do Form
procedure TfrmCadKits.FormShow(Sender: TObject);
begin
LimpaCampos(frmCadKits,frmCadKits.Handle);
end;
E recebo o erro:
Project Aplicativo.exe raised exception class
EAccessViolation with message 'Access violation at
address 045DF5B in module Aplicativo.exe'. Read of
address 0180'. Process stopped. Use Step or Run to
continue.
Alguém tem uma solução, já tentei de várias formas e
nada, sempre dá esse erro. No mesmo diretório da
aplicação estão a biblio.dll e a borlndmm.dll.
Grato a todos.
Alexandre.
Alertas do Yahoo! Mail em seu celular. Saiba mais em
http://br.mobile.yahoo.com/mailalertas/
RE: [delphi-br] Aviso de Mudanca de Valor de Variavel
seleciona a variavel e aperta ctrl F5, da pra fazer pelo ctrl F7 tb []s From: Rafael Marques [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Aviso de Mudanca de Valor de Variavel Date: Wed, 8 Aug 2007 08:18:26 -0300 Bom Dia!! alguem se o Delphi tem algum recurso para saber qdo o valor de uma variavel muda?? tenho umas variaveis em umas telas q estao assumindo valores meio sinistros e n estou conseguindo achar qdo elas estao recebendo estes valores. Ja tentei fazer o passo-a-passo com a tecla F7 durante a execucao, mas o codigo da mtas voltas e é mto grande e por isso está mto dificil de encontrar (ainda mais pq em alguns passos nao é mostrado o valor q entrou na variavel) Mto Obrigado Rafael [As partes desta mensagem que não continham texto foram removidas] _ Seja um dos primeiros a testar o novo Windows Live Mail Beta- grátis. Acesse http://www.ideas.live.com/programpage.aspx?versionId=5d21c51a-b161-4314-9b0e-4911fb2b2e6d
[delphi-br] Erro ao usar dll
Olá a Todos...
Pessoal tenho a seguinte dll:
library Biblio;
uses
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms,
Dialogs, DB, Grids, DBGrids, Buttons, StdCtrls,
Mask, DBCtrls, ExtCtrls,
ActnList, ComCtrls, FMTBcd, Provider, DBClient;
{$R *.res}
procedure LimpaCampos(vForm: TForm; vFormHandle:
THandle);
var i : Integer;
begin
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TEdit' then
begin
TEdit(vForm.Controls[i]).Text:='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TDBEdit' then
begin
TDBEdit(vForm.Controls[i]).Text:='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TCheckBox' then
begin
TCheckBox(vForm.Controls[i]).Checked:= False;
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[i].ClassName = 'TDBCheckBox' then
begin
TDBCheckBox(vForm.Controls[i]).Checked:= False;
end;
end;
Exports
LimpaCampos;
begin
end.
E no Form frmCadKits declaro a procedure e a dll.
...
public
{ Public declarations }
end;
procedure LimpaCampos(vForm: TForm; vFormHandle:
THandle); external 'biblio.dll';
var
...
E faço uma chamada no show do Form
procedure TfrmCadKits.FormShow(Sender: TObject);
begin
LimpaCampos(frmCadKits,frmCadKits.Handle);
end;
E recebo o erro:
Project Aplicativo.exe raised exception class
EAccessViolation with message 'Access violation at
address 045DF5B in module Aplicativo.exe'. Read of
address 0180'. Process stopped. Use Step or Run to
continue.
Alguém tem uma solução, já tentei de várias formas e
nada, sempre dá esse erro. No mesmo diretório da
aplicação estão a biblio.dll e a borlndmm.dll.
Grato a todos.
Alexandre.
Alertas do Yahoo! Mail em seu celular. Saiba mais em
http://br.mobile.yahoo.com/mailalertas/
Re: RES: RES: [delphi-br] [1/2 Off] PayPal
Davi, O fato do Real ser hoje do ABN AMRO Bank e portanto ser ABN Amro Real, não tem tanto valor internacional assim!! Tenho uma conta lá e fui viajar para o exterior a trabalho, perguntei se poderia fazer saques em agências do ABN e a resposta foi categórica: NÃO!! Só aquela rede Cirrus e tal quando tem!! Ou seja, ele não obrigatoriamente vai receber transações internacionais! Davi Eduardo Borges Wall [EMAIL PROTECTED] escreveu: Olha Walter, Tenho certeza que o banco Real faz depósito transação internacional mesmo por que ele faz parte do grupo ABN AMRO BANK. E amigos meus no exterior já fizeram tal transação. Informe-se novamente. E o banco Real tem swift Code. HSBC faz a mesma transação. Pois eu mesmo já fiz várias vezes. Eu continuo achando que qualquer banco grande como (Bradesco, Itaú, HSBC, real, BB e outros) deve fazer esse tipo de transação, Mesmo por que eles tem clientes de cunho internacional e com certeza deve haver esse tipo de movimentação. Ainda pelo que andei conversando com a minha gerente de conta. Parece que o BB é o único que permite via transação internacional O depósito direto em conta. No outros bancos, mesmo possuindo conta vc ainda deve ir assinar o tal papelzinho. Outra, sobre WU eu quis dizer que, o PayPal pode mandar o valor para seu banco via WU. É só procurar na pagina do PayPal que há instruções. Agora pagar uma compra no ebay diretamente por WU realmente não faz sentido. De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: terça-feira, 7 de agosto de 2007 18:09 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [1/2 Off] PayPal Western Union é uma outra modalidade de transferencia que você manda de lá e cai no banco na hora. Quem tem conta no BB pode solicitar a transferencia pra conta na hora, quem não tem, tem que ir lá, assinar um papel e pegar a bufunfa QUE É COTADA PELO DOLAR TURISMO, descontado IOF, CPMF, e outros impostos. Seguro pra você mas não pro comprador. Muita gente lá fora é receioso de faze pagamento desta forma uma vez que você recebeu o fazmerir, e o comprador não terá mais como reinvindicar o mesmo caso você resolva dar o cano nele. Com o Paypal ele ainda tem 30 dias pra arquivar um Dispute. No WU não tem. Quanto a qualquer banco no Brasil poder receber uma transferência internacional, pelo que sei, só o BB está autorizado a tal. A Caixa Economica não mexe com isto porque eu já procurei me informar. Quando eu tinha conta no Mercantil Do Brasil, eles também não trabalhavam com isto. Minha esposa tem conta no Real e lá também eles não fazem esta intermediação. Somente bancos autorizados pelo BC e pela Receita Federal podem fazer isto. Uma alternativa que sempre usei e sempre funcionou beleza, é usar um intermediário. Eu conheço dois que são limpeza total. Um cobra 10% e o outro 6% do montante que você vai transferir. Estes intermediarios trabalham da seguinte maneira: Você manda o dinheiro do seu Paypal pro Paypal dele e ele cota o valor pelo dolar comercial para compra. Deste montante que caiu no paypal dele (o Paypal te cobra uma taxa de 1.5% por tranferencia) ele tira a comissão dele e deposita o equivalente ao restante em reais, na sua conta (você tem que informar pra ele a conta). Estes dois camaradas, que eu conheço, te pedem um prazo de até 48 horas para o dinheiro estar na sua conta. Sempre foi tranquilo. Eu tenho uma comunidade no Orkut, chamada Brasileiros no Ebay. Lá tem muito nego que oferece intermediar este tipo de negócio (Trocar Paypal). Mas se alguém for entrar nesta, busque primeiro referencias do atravessador em vista e se informe mais sobre o historico de negociações do elemento, pois não precisa dizer que ninguem aqui nasceu ontem né... Agora Paypal integrado com algum banco no Brasil não existe. Não precisa nem procurar. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8217 Fax: (31) 3389-8215 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br ]Em nome de Davi Eduardo Borges Wall Enviada em: terça-feira, 7 de agosto de 2007 17:56 Para: delphi-br@yahoogrupos.com.br Assunto: RES: RES: [delphi-br] [1/2 Off] PayPal Não, ele não consegue. Há uma maneira de conseguir que esse dinheiro chegue no Brasil e vá para uma conta. Existe um meio de mandar dinheiro para sua conta no Brasil se vc estiver no exterior via transferencia internacional (wire transfer com swift code do banco). Esse dinheiro chega no Brasil e fica pronto para ir para sua conta, mas não vai. Você então vai no banco e assina o tal do papel que libera o valor para sua conta. MAS, essa forma há encargos normais do tramite. IOF++ outros, que são descontados do valor antes que ele atinja sua conta (depois tem CPMF). Alias qualquer banco no
[delphi-br] Manipulação de Tabela Excel
Existe um modelo de uma tabela aqui na empresa usada pra fichas de ponto de funcionários. O que queria fazer é imprimir o nome do funcionário em arquivos Excel no campo aonde seria o nome do funcionário. E depois imprimir... alguém tem um exemplo de como fazer isso? _ E-mail classificado pelo Identificador de Spam Inteligente. Para alterar a categoria classificada, visite o Terra Mail http://mail.terra.com.br/cgi-bin/imail.cgi?+_u=jvp.vinicius_l=1,118657 0376.182081.7152.cadarga.hst.terra.com.br,21293,Des15,Des15 _ Esta mensagem foi verificada pelo E-mail Protegido Terra http://mail.terra.com.br/ . Scan engine: McAfee VirusScan / Atualizado em 07/08/2007 / Versão: 5.1.00/5092 Proteja o seu e-mail Terra: http://mail.terra.com.br/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Aviso de Mudanca de Valor de Variavel
Já eu sugiro que você crie uma rotina de LOG, ou seja, gravar em arquivo texto todos os eventos que você considere importante. Aqui eu uso este recurso largamente e garanto que vale a pena. [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Erro ao usar dll
coloque o seguinte comando na chamada:
cdecl; external 'biblio.dll' ;
Atenciosamente, Evaldo Avelar Marques
- Mensagem original
De: Alexandre G. de Oliveira [EMAIL PROTECTED]
Para: Lista Delphi - Yahoo delphi-br@yahoogrupos.com.br
Enviadas: Quarta-feira, 8 de Agosto de 2007 9:31:10
Assunto: [delphi-br] Erro ao usar dll
Olá a Todos...
Pessoal tenho a seguinte dll:
library Biblio;
uses
Windows, Messages, SysUtils, Variants, Classes,
Graphics, Controls, Forms,
Dialogs, DB, Grids, DBGrids, Buttons, StdCtrls,
Mask, DBCtrls, ExtCtrls,
ActnList, ComCtrls, FMTBcd, Provider, DBClient;
{$R *.res}
procedure LimpaCampos( vForm: TForm; vFormHandle:
THandle);
var i : Integer;
begin
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[ i].ClassName = 'TEdit' then
begin
TEdit(vForm. Controls[ i]).Text: ='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[ i].ClassName = 'TDBEdit' then
begin
TDBEdit(vForm. Controls[ i]).Text: ='';
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[ i].ClassName = 'TCheckBox' then
begin
TCheckBox(vForm. Controls[ i]).Checked: = False;
end;
for i := 0 to (vForm.ControlCount -1) do
if vForm.Controls[ i].ClassName = 'TDBCheckBox' then
begin
TDBCheckBox( vForm.Controls[ i]).Checked: = False;
end;
end;
Exports
LimpaCampos;
begin
end.
E no Form frmCadKits declaro a procedure e a dll.
...
public
{ Public declarations }
end;
procedure LimpaCampos( vForm: TForm; vFormHandle:
THandle); external 'biblio.dll' ;
var
...
E faço uma chamada no show do Form
procedure TfrmCadKits. FormShow( Sender: TObject);
begin
LimpaCampos( frmCadKits, frmCadKits. Handle);
end;
E recebo o erro:
Project Aplicativo.exe raised exception class
EAccessViolation with message 'Access violation at
address 045DF5B in module Aplicativo.exe' . Read of
address 0180'. Process stopped. Use Step or Run to
continue.
Alguém tem uma solução, já tentei de várias formas e
nada, sempre dá esse erro. No mesmo diretório da
aplicação estão a biblio.dll e a borlndmm.dll.
Grato a todos.
Alexandre.
Alertas do Yahoo! Mail em seu celular. Saiba mais em http://br.mobile.
yahoo.com/ mailalertas/
!--
#ygrp-mlmsg {font-size:13px;font-family:arial, helvetica, clean, sans-serif;}
#ygrp-mlmsg table {font-size:inherit;font:100%;}
#ygrp-mlmsg select, input, textarea {font:99% arial, helvetica, clean,
sans-serif;}
#ygrp-mlmsg pre, code {font:115% monospace;}
#ygrp-mlmsg * {line-height:1.22em;}
#ygrp-text{
font-family:Georgia;
}
#ygrp-text p{
margin:0 0 1em 0;}
#ygrp-tpmsgs{
font-family:Arial;
clear:both;}
#ygrp-vitnav{
padding-top:10px;font-family:Verdana;font-size:77%;margin:0;}
#ygrp-vitnav a{
padding:0 1px;}
#ygrp-actbar{
clear:both;margin:25px 0;white-space:nowrap;color:#666;text-align:right;}
#ygrp-actbar .left{
float:left;white-space:nowrap;}
.bld{font-weight:bold;}
#ygrp-grft{
font-family:Verdana;font-size:77%;padding:15px 0;}
#ygrp-ft{
font-family:verdana;font-size:77%;border-top:1px solid #666;
padding:5px 0;
}
#ygrp-mlmsg #logo{
padding-bottom:10px;}
#ygrp-vital{
background-color:#e0ecee;margin-bottom:20px;padding:2px 0 8px 8px;}
#ygrp-vital #vithd{
font-size:77%;font-family:Verdana;font-weight:bold;color:#333;text-transform:uppercase;}
#ygrp-vital ul{
padding:0;margin:2px 0;}
#ygrp-vital ul li{
list-style-type:none;clear:both;border:1px solid #e0ecee;
}
#ygrp-vital ul li .ct{
font-weight:bold;color:#ff7900;float:right;width:2em;text-align:right;padding-right:.5em;}
#ygrp-vital ul li .cat{
font-weight:bold;}
#ygrp-vital a {
text-decoration:none;}
#ygrp-vital a:hover{
text-decoration:underline;}
#ygrp-sponsor #hd{
color:#999;font-size:77%;}
#ygrp-sponsor #ov{
padding:6px 13px;background-color:#e0ecee;margin-bottom:20px;}
#ygrp-sponsor #ov ul{
padding:0 0 0 8px;margin:0;}
#ygrp-sponsor #ov li{
list-style-type:square;padding:6px 0;font-size:77%;}
#ygrp-sponsor #ov li a{
text-decoration:none;font-size:130%;}
#ygrp-sponsor #nc {
background-color:#eee;margin-bottom:20px;padding:0 8px;}
#ygrp-sponsor .ad{
padding:8px 0;}
#ygrp-sponsor .ad #hd1{
font-family:Arial;font-weight:bold;color:#628c2a;font-size:100%;line-height:122%;}
#ygrp-sponsor .ad a{
text-decoration:none;}
#ygrp-sponsor .ad a:hover{
text-decoration:underline;}
#ygrp-sponsor .ad p{
margin:0;}
o {font-size:0;}
.MsoNormal {
margin:0 0 0 0;}
#ygrp-text tt{
font-size:120%;}
blockquote{margin:0 0 0 4px;}
.replbq {margin:4;}
--
Alertas do Yahoo! Mail em seu celular. Saiba mais em
http://br.mobile.yahoo.com/mailalertas/
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Tquery
Utilizando Tquery vc terá que utilizar o Componente UpdateSQL ou ligar o RequestLive da Tquery. Em 07/08/07, Satoy Matsuoka [EMAIL PROTECTED] escreveu: Bom dia pessoal, Por favor desculpe a ignorância, mas como faço um insert update utilizando o Tquery ou TUpdate ??? Como seria o comando ? Exemplo: Insert into tabela (campo1,campo2) values (???,) Como me referencio aos campos que vou fazer um insert, update que são da tela ??? Obrigado []'s [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Imagens
Dê uma olhada neste site... tem bastante coisa... de repente vc encontra o que precisa... http://www.iconarchive.com/ abraço _ Claudiney Cogo N2 Sistemas e Soluções em Informática Av. São Paulo, 172 - 15º Andar - Sala 1505 Maringá - Paraná www.n2solutions.com.br - Original Message - From: Satoy Matsuoka To: delphi-br Sent: Wednesday, August 08, 2007 9:13 AM Subject: [delphi-br] Imagens Bom dia pessoal, Alguém sabe onde posso encontrar BMP´s para colocar nas minhas aplicações !! Na toolbar ... e outros botões ?? Vlw !!! Abraços []'s Satoy [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] não consigo entender
Tem duas formas de fazer isso. 1. no sdsClientes, faça um select antes de dar um insert 2. dspClientes vá no evento OnGetTableName e coloque assim: TableName := 'SuaTabela'; *Thiago Filiano * msn: [EMAIL PROTECTED] http://www.americasoft.com.br [EMAIL PROTECTED] escreveu: ola pessoal saudações Estou desenvolvendo um sistema D7, interbase, dbExpress. Tenho um banco de dados e duas tabelas, ainda, dentro desse BD. Clientes e Telefones. Uso os seguintes componentes: SQLConnection, SQLDataSet, DataSetProvider, ClienteDataSet e um DataSource, isto para cada tabela, sendo em comum apenas a Connection. No botão Confirma faço a locação dos campos com os respectivos valores das respectivas edits.text. Tanto para os campos do cliente, como para os do telefone. E no final de cada um uso um ApplyUpdates nos clientDataSet respectivos. No caso do dados dos clientes, da um erro dizendo que não reconhece a tabela Clientes, e no caso do telefone aceita sem problemas. O que fazer ou o que estou fazendo de errado? Obrigado Clovito Clóvis Machado Ferreira Que o GADU nos Ampare Msn-[EMAIL PROTECTED] [As partes desta mensagem que não continham texto foram removidas]
