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
