bom dia pessoal, estou tento dificuldades para
conectar meu software ao banco de dados mysql do
terra. Tenho q fazer o seguinte tenho um soft em
php q acessa o banco tudo ok e tenho o soft em
delphi e tenho q acessar o banco para atualizar
os dados para o on-line mas estou tendo
dificuldades será q o terra nao permeti? tentei
falar com eles mas eles falaram q nao dava e o
máximo q deram pra mim foi o ip do servidor,
sugestoes de componentes? ou como conectar?
--- Vitor Luiz Redes
<[EMAIL PROTECTED]> escreveu:
---------------------------------
Bom Dia Claudiney.
Seguinte, em aplicações Multitier você pode
controlar transações de duas maneiras, que seriam
"seguras", uma delas, é criando uma interface no
cliente, mais ou menos assim:
ITransactionContextEx Interface.
procedure TForm1.MoveMoneyClick(Sender: TObject);
begin
Transfer(CLASS_AccountA, CLASS_AccountB, 100);
end;
procedure TForm1.Transfer(DebitAccountId,
CreditAccountId: TGuid; Amount: Currency);
var
TransactionContextEx: ITransactionContextEx;
CreditAccountIntf, DebitAccountIntf: IAccount;
begin
TransactionContextEx :=
CreateTransactionContextEx;
try
OleCheck(TransactionContextEx.CreateInstance(DebitAccountId,
IAccount, DebitAccountIntf));
OleCheck(TransactionContextEx.CreateInstance(CreditAccountId,
IAccount, CreditAccountIntf));
DebitAccountIntf.Debit(Amount);
CreditAccountIntf.Credit(Amount);
except
TransactionContextEx.Abort;
raise;
end;
TransactionContextEx.Commit;
end;
Para maiores informações sobre controlar
transações no cliente, e interfaces, consulte o
help do delphi em "Setting up a transaction
object on the client side", também há um exemplo
bom na Clube Delphi deste mês, ensinando como
criar interfaces e controlar transações criando
funções de CallBack.
Outra ... vocês estão utilizando um
Transaction Data Module ? Se sim, na criação do
mesmo, a opção Support Transactions deve estar
marcada.
Pelo lado do servidor, você pode controlar as
transações também, peguei esse exemplo no Help do
Delphi mesmo ... qualquer coisa procure em:
"Setting up a transaction object on the server
side".
procedure
TAccountTransfer.Transfer(DebitAccountId,
CreditAccountId: TGuid;
Amount: Currency);
var
CreditAccountIntf, DebitAccountIntf: IAccount;
begin
try
OleCheck(ObjectContext.CreateInstance(DebitAccountId,
IAccount, DebitAccountIntf));
OleCheck(ObjectContext.CreateInstance(CreditAccountId,
IAccount, CreditAccountIntf));
DebitAccountIntf.Debit(Amount);
CreditAccountIntf.Credit(Amount);
except
DisableCommit;
raise;
end;
EnableCommit;
end;
Qualquer coisa, poste ae novamente ok ?
P.S: Você trabalha na Elotech de Maringá ?
-------------------------------------------
Vitor Luiz Redes
Desenvolvimento
-------------------------------------------
Redsystem Informática
[EMAIL PROTECTED]
-------------------------------------------
[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] ou
[EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido
por:PUBLICIDADE
---------------------------------
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!.
=====
Leandro...
[> Mutuka <]
_______________________________________________________
Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora!
http://br.acesso.yahoo.com/
--
<<<<< 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] ou [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
