Re: [delphi-br] Master Detail com Campo Auto-Incremento
O autoincremento que eu faço para estes casos, eu o faço clonando o CDS. Veja o
exemplo abaixo:
Eu o coloco no Evento OnNewRecord do CDS que voce quer incrementar
var
cdsClone: TClientDataset;
begin
try
cdsClone := TClientDataSet.Create(nil);
cdsClone.CloneCursor(Cds que voce pretente clonar, True, False);
cdsClone.Last;
DataSet.FieldByName('NSEQITMOV').AsInteger :=
cdsClone.FieldByName('NSEQITMOV').AsInteger + 1;
DataSet.FieldByName('IDITENS').AsInteger := GenAutoInc('IDITENS');
DataSet.FieldByName('CODKITIRLA').AsString :=
DMTP.dsKitIrla.DataSet.FieldByName('CODKITIRLA').AsString;
DataSet.FieldByName('CODORIGEM').AsString :=
DMTP.dsKitIrla.DataSet.FieldByName('CODORIGEM').AsString;
cdsClone.Close;
FreeAndNil(cdsClone);
except
raise EDataBaseError.Create(Exception(exceptobject).Message);
DataSet.Cancel;
end;
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@bol.com.br
http://delphitocorporerm.blogspot.com/
http://twitter.com/wchagas
MSN: whitesock...@hotmail.com
SKYPE: WalterChagasJr
- Original Message -
From: diego yahoo
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 15, 2010 5:49 PM
Subject: [delphi-br] Master Detail com Campo Auto-Incremento
Olá amigos, alguém sabe como utilizar Master/Detail com campo auto
incremento (generator) ??
Preciso que o campo auto-incremento gerado pelo banco seja atualizado na
tela.
Utilizo DBExpress , Delphi7 e Firebird.
Agradeço.
Diego.
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] duvida em Project-Opcoes-Directory/Conditionals
Obrigada a todos pela dica. Deu certo. Graça - Mensagem original De: Ricardo Augusto ricardo250...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Quinta-feira, 15 de Abril de 2010 11:11:23 Assunto: Re: [delphi-br] duvida em Project-Opcoes-Directory/Conditionals Tente caminhos relativos ao arquivo do projeto. Use .\ para a pasta do projeto e ..\ para cada nível de pasta acima dela. Por exemplo, se o arquivo .dpr fica na pasta C:\NOMEDAMAQUINA\Projetos\Fontes\ e vc quer o executável em C:\NOMEDAMAQUINA\Projetos\EXE, use ..\EXE\. Em 15 de abril de 2010 09:16, dangra2008 dangra2...@yahoo.com.br escreveu: Poderiam me ajudar numa duvida? Tenho os seguintes diretorios C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto1.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto2.dpr C:\NOMEDAMAQUINA\Projetos\Fontes\Projeto3.dpr C:\NOMEDAMAQUINA\Projetos\EXE (onde caem os 3 exe compilados) Para que os exe já caiam na pasta correta, configurei as opções do projeto (project - Options - Directory/Conditionals - Output Directory = C:\NOMEDAMAQUINA\Projetos\EXE Porem isso fica preso ao projeto e quando é compilado, esse caminho tem que ser alterado a cada maquina que se usa Tem como colocar esse diretorio com uma diretiva que pegue sempre o diretorio Projetos\EXE (sem o driver e o nome da maquina?) como é feito com as library paths onde se coloca $DELPHI ? ex: ..\Projetos\exe Graça -- _ Ricardo Augusto Muitos dos problemas do mundo devem-se ao fato de que os ignorantes estão completamente seguros e os inteligentes cheios de dúvidas (Bertrand Russel) [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[delphi-br] [MAF] Consumo de memória pela aplicação
Pessoal, tenho uma aplicação formada basicamente por alguns ClientDataSet, um DataSource, um DBGrid, um ClientSocket, um ServerSocket. A aplicação fica ligada o dia todo. O meu cliente me disse que com o passar do tempo ela começa a ficar lenta, ai ele fecha e abre e volta ao normal. Tudo indicava para consumo de memória. Aí coloquei um medidor de quanto da memória a aplicação está consumindo. Pensei que o consumo de memória estava sendo prejudicado pelo ClientDataSet, que recebe em média 50 registros e depois ele é atualizado por uma hora e depois recebe um comando que os registros devem ser apagados que o recebimento de dados vai recomeçar. A única coisa que faço é a seguinte: procedure NewEvent(); var i: Integer; strTxt: String; begin //Array public deve ser limpo for i := 0 to 12 do arrEvent[i] := ''; //ClientDataSet deve ser limpo frmMain.cdsDriver.EmptyDataSet; frmMain.cdsDriver.Free; end; Outra coisa que utilizo bastante é a leitura de arquivo INI de configuração do sistema e uso bastante variáveis StringList, mas sempre que acabo de usá-las dentro de uma procedure, uso o comando .Free para tirá-los da memória. Alguém pode me dar mais dicas de como reiniciar o sistema e liberar memória. Att, Marcos Ferreira [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Gráfico Pizza dentro de Gráfic o Pizza - Pizza Detalhado
Ok ... obrigado pela resposta, vou tentar isso. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Olha sinceramente, creio q seja só na questão de acentuação, eu usava com o
e um dia simplesmente não consegui restaurar o backup, ai usei o outro
método e deu certo.
E parava logo numa tabela onde tenho dados no formato RTF salvos
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos eduardo@gmail.com
Sent: Thursday, April 15, 2010 7:44 PM
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Luiz, qual a diferença?
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 15 de abril de 2010 17:13, Luiz Escobar
esco...@megasistema.com.brescreveu:
Só uma dica no final não use:
C:\SQL.SQL
use:
--result-file=sql.sql
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos
eduardo@gmail.comeduardo.drd%40gmail.com
Sent: Thursday, April 15, 2010 12:51 AM
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
tente assim:
mysqldump --user=USER --password=SENHA --databases
BANCO --opt --quote-names
--allow-keywords --complete-insert C:\SQL.SQL
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com eduardo.drd%40gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 14 de abril de 2010 16:57, dionatanhenrique
dionata...@hotmail.com dionatan_b%40hotmail.comescreveu:
Pessoal estou tentando a varios dias criar uma rotina de backup para
mysql..
porem sem sucesso..
Bom criei um bat com o seguinte comando:
mysqldump.exe -B -c --single-transaction --default-character-set=latin1
BANCO -u root --password=SENHA -h localhost backup.sql
bom ele ate funciona mas para campos que nao seja BLOB.. pois campos
que
tenha figura ele detona o campo nao fazendo o backup direito o que
esta
de
errado neste comando? isso se eu clico direto no icone do bat
outra coisa quando eu uso o delphi para executar ele nao executa ...
por
exemplo
WinExec(PChar('backup.bat'),SW_NORMAL);
ele so pisca a tela mas nao faz o backup... e se clico direto no
arquivo
backup.bat ele executa faz o backup mas os campos blob não sai todo
errado..
alguem pode me auxiliar...
--- Em delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.brdelphi-br%
40yahoogrupos.com.br,
Carlos gcm3...@... escreveu
Meu camarada, mais uma vez, boa tarde! Como eu havia dito
anteriormente, a sua pergunta é muito vaga, e talvez se vc
tivesse
se expressado melhor, teríamos lhe auxiliado melhor!
O que vc quer, seria mais ao menos isso:
1 Form;
1 Label;
1 SpeedButton;
1 TTimer.
No evento onTimer do TTimer, digite o seguinte:
lblDate.Caption := FormatDateTime('dd/mm/ - HH:MM:SS', Now);
No evento onClick do SpeedButton digite o seguinte:
var
__mData: string;
begin
mData := FormatDateTime('dd', Now)+ FormatDateTime('mm', Now)+
FormatDateTime('', Now) + FormatDateTime('hh', Now) +
FormatDateTime('nn', Now) + FormatDateTime('ss', Now)+ '.sql';
WinExec(PChar('cmd.exe /c C:\backup\bin\mysqldump -h NomeDaMáquina'
+
' -u root -pSEnha --opt NomeDoBancoCaminho\'
+ mData),SW_HIDE);
showmessage('Backup realizado com sucesso');
end;
É lógico que vc pode incrementar, mas a vantagem é poder colocar um
diretório fixo para salvar, e ele irá salvar o seu backup com o nome
da data e horário que foi feito.
Exemplo:
01012009120516.sql, informa que este backup foi feito no dia 01 de
janeiro de 2009 as 12:05:16 e vc poderá efetuar outro backup neste
diretório sem perder o anterior.
Viu ai...sem crise!!!Conversando a gente se entende!
Fraterno abraço,
Carlos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[delphi-br] Re: Master Detail com Campo Auto-Incremento
Não importa qual valor você tem para o campo chave em memoria (localmente),
quando ele for comitado, vai ser outro valor. Por isso, acho que nem seria
interessante exibir este campo.
--- Em delphi-br@yahoogrupos.com.br, Walter Chagas \(Bol\) wchag...@...
escreveu
O autoincremento que eu faço para estes casos, eu o faço clonando o CDS. Veja
o exemplo abaixo:
Eu o coloco no Evento OnNewRecord do CDS que voce quer incrementar
var
cdsClone: TClientDataset;
begin
try
cdsClone := TClientDataSet.Create(nil);
cdsClone.CloneCursor(Cds que voce pretente clonar, True, False);
cdsClone.Last;
DataSet.FieldByName('NSEQITMOV').AsInteger :=
cdsClone.FieldByName('NSEQITMOV').AsInteger + 1;
DataSet.FieldByName('IDITENS').AsInteger := GenAutoInc('IDITENS');
DataSet.FieldByName('CODKITIRLA').AsString :=
DMTP.dsKitIrla.DataSet.FieldByName('CODKITIRLA').AsString;
DataSet.FieldByName('CODORIGEM').AsString :=
DMTP.dsKitIrla.DataSet.FieldByName('CODORIGEM').AsString;
cdsClone.Close;
FreeAndNil(cdsClone);
except
raise EDataBaseError.Create(Exception(exceptobject).Message);
DataSet.Cancel;
end;
[]s
Walter Alves Chagas Junior
Belo Horizonte - MG - Brazil
wchag...@...
http://delphitocorporerm.blogspot.com/
http://twitter.com/wchagas
MSN: whitesock...@...
SKYPE: WalterChagasJr
- Original Message -
From: diego yahoo
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, April 15, 2010 5:49 PM
Subject: [delphi-br] Master Detail com Campo Auto-Incremento
Olá amigos, alguém sabe como utilizar Master/Detail com campo auto
incremento (generator) ??
Preciso que o campo auto-incremento gerado pelo banco seja atualizado na
tela.
Utilizo DBExpress , Delphi7 e Firebird.
Agradeço.
Diego.
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] [1/2OFF] SQL Lento no Firebird
Fernando, valeu pela ajuda ai mas ficou lento do mesmo jeito, tava pensando em criar uma tabela temporária com o segundo select e depois fazer o filtro por ela que seria bem menor do que a tabela de pedidos original. Alguem sabe como faz isso?? Grato. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Fernando Nati Enviada em: quinta-feira, 15 de abril de 2010 17:14 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] [1/2OFF] SQL Lento no Firebird Amigão, Não usa o IN, usa o NOT Exists. Ex: SELECT CLI.COD_CLI, CLI.NOME_CLI FROM CLIENTES CLI WHERE CLI.SITUACAO = '2' AND NOT EXISTS ( SELECT 1 FROM SAI_CAB CAB WHERE CAB.DIGITO = 'O' AND CAB.DT_PEDIDO '01/01/2010' AND CAB.COD_CLI = CLI.COD_CLI ) Testa aí e vê se resolveu!. Fernando Nati. 2010/4/15 Iran Lima i...@sgisolution.com.br Galera estou executando o sql: SELECT CLI.COD_CLI, CLI.NOME_CLI FROM CLIENTES CLI WHERE CLI.SITUACAO = '2' AND COD_CLI NOT IN ( SELECT DISTINCT(CAB.COD_CLI) FROM SAI_CAB CAB WHERE CAB.DIGITO = 'O' AND CAB.DT_PEDIDO '01/01/2010' ) Nele tem 2 Select executando separadamente da certa de 1s cada um, como podem ver o segundo select é so para filtrar o primeiro. Quando executo o SQL completo o mesmo demora muito como se escutasse o segundo Select para cada registro do primeiro (burrice do firebird) sendo assim como criar uma tabela temporária com os registros do segundo select para fazer o filtro ficar + rápido. Grato Iran. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
[delphi-br] Protesto
Estou no grupo há mais de 1 ano e até hoje minhas mensagens não são enviadas diretamente, demorando horas pra chegar ao grupo. O que devo fazer pra me tornar um membro aqui. sem passar por isso? Não da nem pra ajudar assim Quando minhas respostas chegam o tópico já ta até encerrado. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] SpeedButtons
Olá amigos.
Eu tenho aplicação que cria botoes em tempo de execução. Esses botoes sao do
tipo TSpeedButton e eles forma o menu do meu sistema, o código é o seguinte:
procedure TfLOG001.montamenu(formulariomenu: TForm; barramenu: TPanel);
var
botaomodulo, botaomenu: TSpeedButton;
vLeft: integer;
begin
dLOG001.tblmenu.First;
vLeft:= 5;
while not dLOG001.tblmenu.Eof do
begin
botaomodulo:= TSpeedButton.Create(formulariomenu);
with botaomodulo do
begin
Parent:= barramenu;
botaomodulo.Left:= vLeft;
botaomodulo.Top:= 5;
botaomodulo.Width:= 90;
botaomodulo.Height:= 70;
botaomodulo.Caption:= dLOG001.tblmenu.FieldByName('modulo_nm').Text;
botaomodulo.Layout:= blGlyphTop;
botaomodulo.Flat:= true;
vLeft:= Left+93;
botaomodulo.OnClick:= menuclic;
end;
dLOG001.tblmenu.Next;
end;
end;
Agora é o seguinte, eu preciso atribuir um onClick para cada um desses
botoes. Como eu faço isso?
O que eu quero na real é assim: No inicio do sistema vai aparecer alguns botoes
que serão os Modulos do sistema, por exemplo, Financeiro,
Administrador, Cadastros, etc...
Entao, ao clicar em Financeiro, os outros botoes somem e dão lugar a novos
botoes para aquele modulo, por exemplo. ao clicar no botao Administrador, deve
abrir outros botoes (na mesma barra) com Cadastro de Usuarios, Controle de
Acessos, etc..
Alguem ja viu isso?
Obrigado.
Richardson Marcelo Freddo.
msn: freddodp...@hotmail.com
Skype: r.freddo
Rondonópolis/MT
[As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Master Detail com Campo Auto-Incremento
Olá amigos, muito obrigado pelas sugestões. Consegui resolver da maneira que vocês me falaram. Agradeço muito. Diego. De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Rubem Rocha Enviada em: quinta-feira, 15 de abril de 2010 19:50 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] Master Detail com Campo Auto-Incremento Prioridade: Alta Ratificando o link do artigo: http://edn.embarcadero.com/article/20847 Sds. 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 Rubem Rocha Enviada em: quinta-feira, 15 de abril de 2010 18:47 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: RES: [delphi-br] Master Detail com Campo Auto-Incremento Prioridade: Alta Quando trabalho com TClientDataSet e tenho campos auto-incremento para gerar as chaves tanto de uma tabela máster como de seus detalhes, gero valores de chave e sub-chave localmente, na aplicação. Só depois deu aplicar o TClientDataSet ao banco de dados (ApplyUpdates) é que mostro (se for aplicável na maioria das vezes, não precisa disso!) as chaves já geradas pelo banco de dados. Faço isso seguindo dicas e orientações do excelente artigo http://av.rds.yahoo.com/_ylt=A0oGkti3l8dLJlQA7QYNGqMX;_ylu=X3oDMTBzdXAxcTho BHBndANhdl93ZWJfYWR2X3Jlc3VsdARzZWMDc3I-/SIG=11s6l03of/EXP=1271458103/**http %3a/edn.embarcadero.com/article/20847 How to use AutoInc fields with DataSnap, de autoria de Dan Miser. Sugiro que faça o mesmo! Boa sorte. Sds. De: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br [mailto:delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br ] Em nome de diego yahoo Enviada em: quinta-feira, 15 de abril de 2010 16:50 Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br Assunto: [delphi-br] Master Detail com Campo Auto-Incremento Olá amigos, alguém sabe como utilizar Master/Detail com campo auto incremento (generator) ?? Preciso que o campo auto-incremento gerado pelo banco seja atualizado na tela. Utilizo DBExpress , Delphi7 e Firebird. Agradeço. Diego. [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Distibuição de Aplicação com Firebird
Olá galera estou finalizando o desenvolvimento de um aplicativo Delphi + Firebird 2.0 Criei um instalador e no mesmo é instalado o firebird 2.0 também porém em algumas maquinas ocorre erro para conectar ao banco de dados, devido a na maquina do cliente já ter outra versão do firebird instalada ou mesmo um firewall não sei bem se esta e a melhor forma de distribuir o aplicativo devido estes problemas. Gostaria de uma dica neste ponto. E vantagem usar o firebird embarcado? Quais são as desvantagens dele? É possível funcionar em rede usando o firebird embarcado? Segue o link do instalador pra quem quiser dar uma olhada: http://www.sgicheck.com.br/downloads/SGICheck.exe Bem desde já agradeço e alguma sugestão. [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] Protesto
Não sei o que acontece não, mas só pra constar, a sua mensagem chegou exatamente agora, 21:39 do dia 16.04 Realmente, assim complica... mas acho que o problema deve ser com os servidores do Yahoo mesmo. Abraço, Ricardo. 1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS. 2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor compreendida. 3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante! --- Em sex, 16/4/10, Iran Lima i...@sgisolution.com.br escreveu: De: Iran Lima i...@sgisolution.com.br Assunto: [delphi-br] Protesto Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 16 de Abril de 2010, 14:52 Estou no grupo há mais de 1 ano e até hoje minhas mensagens não são enviadas diretamente, demorando horas pra chegar ao grupo. O que devo fazer pra me tornar um membro aqui. sem passar por isso? Não da nem pra ajudar assim Quando minhas respostas chegam o tópico já ta até encerrado. [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] Leitor optico USB
Ja passei por isso com portas COM... mas no caso era uma central PABX que tava queimando a maldita. Da vontade de esganar um por causa disso... mas no fim a gente respira fundo, vai ao banheiro, da um berro e volta mais calminho e toca a vida pra frente. Em 15/04/2010 23:29, Paulo Coutinho escreveu: Olá, Hoje fui no cliente ver qual era o problema. E o que descobri? Era a porta USB :( Algumas portas não funcionavam e nem reconheciam, e em outras já funcionavam normalmente. Obrigado a todos.
Re: [delphi-br] OFF - Teste automatizado
Oops, foi mal. Quando escrevi, eu estava usado uma máquina virtual de testes no trabalho. Obrigado por ter avisado. []'s Em Qui, 2010-04-15 às 17:44 -0300, dbug.eti.br - Gmail escreveu: Owarruma a data do seu micro vai22/11/2009, ninguém merece... Em 22/11/2009 01:16, Dirlei escreveu: Eu não faço testes automatizados em Delphi, mas usaria o DUnit se fizesse. Para testes visuais (de interface) não se recomenda testes automatizados e sim um testador humano. [ ]'s Dirlei. Em Qui, 2010-04-15 às 12:53 +, simoesluciano escreveu: Como vocês fazem testes automatizados em suas classes do server e nas telas do client? Luciano C. Simões [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Valew Luiz, aproveitando da uma olhada nessa rotina.
http://www.jijenik.com/projects/mysqlbackup/
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 16 de abril de 2010 16:42, Luiz Escobar esco...@megasistema.com.brescreveu:
Olha sinceramente, creio q seja só na questão de acentuação, eu usava com o
e um dia simplesmente não consegui restaurar o backup, ai usei o outro
método e deu certo.
E parava logo numa tabela onde tenho dados no formato RTF salvos
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos
eduardo@gmail.comeduardo.drd%40gmail.com
Sent: Thursday, April 15, 2010 7:44 PM
To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
Luiz, qual a diferença?
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com eduardo.drd%40gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 15 de abril de 2010 17:13, Luiz Escobar
esco...@megasistema.com.br escobar%40megasistema.com.brescreveu:
Só uma dica no final não use:
C:\SQL.SQL
use:
--result-file=sql.sql
[]s
Luiz Escobar
--
From: Eduardo Silva dos Santos
eduardo@gmail.com eduardo.drd%40gmail.comeduardo.drd%
40gmail.com
Sent: Thursday, April 15, 2010 12:51 AM
To: delphi-br@yahoogrupos.com.br
delphi-br%40yahoogrupos.com.brdelphi-br%
40yahoogrupos.com.br
Subject: Re: [delphi-br] [Off-Topic] Re: Rotina backup MySql
tente assim:
mysqldump --user=USER --password=SENHA --databases
BANCO --opt --quote-names
--allow-keywords --complete-insert C:\SQL.SQL
Att,
...
Eduardo Silva dos Santos
DRD SISTEMAS
(27) 3218-4201
(27) 9961-7095
MSN: eduardo@gmail.com eduardo.drd%40gmail.com eduardo.drd%
40gmail.com
Site: http://www.drdsistemas.com.br/
...
Em 14 de abril de 2010 16:57, dionatanhenrique
dionata...@hotmail.com dionatan_b%40hotmail.com dionatan_b%
40hotmail.comescreveu:
Pessoal estou tentando a varios dias criar uma rotina de backup para
mysql..
porem sem sucesso..
Bom criei um bat com o seguinte comando:
mysqldump.exe -B -c --single-transaction
--default-character-set=latin1
BANCO -u root --password=SENHA -h localhost backup.sql
bom ele ate funciona mas para campos que nao seja BLOB.. pois campos
que
tenha figura ele detona o campo nao fazendo o backup direito o que
esta
de
errado neste comando? isso se eu clico direto no icone do bat
outra coisa quando eu uso o delphi para executar ele nao executa ...
por
exemplo
WinExec(PChar('backup.bat'),SW_NORMAL);
ele so pisca a tela mas nao faz o backup... e se clico direto no
arquivo
backup.bat ele executa faz o backup mas os campos blob não sai todo
errado..
alguem pode me auxiliar...
--- Em delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br
delphi-br%40yahoogrupos.com.brdelphi-br%
40yahoogrupos.com.br,
Carlos gcm3...@... escreveu
Meu camarada, mais uma vez, boa tarde! Como eu havia dito
anteriormente, a sua pergunta é muito vaga, e talvez se vc
tivesse
se expressado melhor, teríamos lhe auxiliado melhor!
O que vc quer, seria mais ao menos isso:
1 Form;
1 Label;
1 SpeedButton;
1 TTimer.
No evento onTimer do TTimer, digite o seguinte:
lblDate.Caption := FormatDateTime('dd/mm/ - HH:MM:SS', Now);
No evento onClick do SpeedButton digite o seguinte:
var
__mData: string;
begin
mData := FormatDateTime('dd', Now)+ FormatDateTime('mm', Now)+
FormatDateTime('', Now) + FormatDateTime('hh', Now) +
FormatDateTime('nn', Now) + FormatDateTime('ss', Now)+ '.sql';
WinExec(PChar('cmd.exe /c C:\backup\bin\mysqldump -h NomeDaMáquina'
+
' -u root -pSEnha --opt NomeDoBancoCaminho\'
+ mData),SW_HIDE);
showmessage('Backup realizado com sucesso');
end;
É lógico que vc pode incrementar, mas a vantagem é poder colocar um
diretório fixo para salvar, e ele irá salvar o seu backup com o
nome
da data e horário que foi feito.
Exemplo:
01012009120516.sql, informa que este backup foi feito no dia 01 de
janeiro de 2009 as 12:05:16 e vc poderá efetuar outro backup neste
diretório sem perder o anterior.
Viu ai...sem crise!!!Conversando a gente se entende!
Fraterno abraço,
Carlos
Re: [delphi-br] Protesto
Não sei o que acontece não, mas só pra constar, a sua mensagem chegou exatamente agora, 21:39 do dia 16.04 Realmente, assim complica... mas acho que o problema deve ser com os servidores do Yahoo mesmo. Comigo também acontece isso, às vezes. Pode ser que o yahoo tá achando que vc anda fazendo SPAM e a mensagem vai pro moderador liberar ou não... Se o moderador demora a liberar, obviamente demora a chegar... Eu acredito que seja isso, e não um tipo de preferencia ou atraso voluntário de alguém. Nem sempre o moderador pode liberar na hora (ele provavelmente está fazendo outras coisas :-) , então, notamos esse atraso... []'s Jackson Gomes ToolsComps - Controle de Usuários para Desenvolvedores CodeGear Web Site: http://www.toolsandcomps.com Nosso Fórum: http://groups.yahoo.com/group/toolsandcomps e-mail: jack...@toolsandcomps.com Fone: 27 3389 1138 - 8811 0324 http://jacklovesdelphi.blogspot.com - Delphi, Intraweb, etc Devhost - Webhost para desenvolvedores Delphi http://www.devhost.com.br devh...@devhost.com.br
[delphi-br] TDBGrid delphi 2010
Galera, o TDBGrid do delphi 2010 quando editando um campo, tem uma borda preta em volta da célula horrorosa, alguém sabe como eu tiro aquela borda ? Lembrando que é o TDBGrid original do próprio delphi. -- __ : grato e sem mais, : Carlos Aquino, Uberaba/MG __ : http://duard.com.br//blog : Msn-Messenger : duar...@hotmail.com __ : Uberaba-MG / Brasil __ [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] TDBGrid delphi 2010
Configura a propriedade de layout do DBGrid, isso é novo no Delphi 2010. From: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] On Behalf Of Carlos Aquino Sent: Friday, April 16, 2010 9:33 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] TDBGrid delphi 2010 Galera, o TDBGrid do delphi 2010 quando editando um campo, tem uma borda preta em volta da célula horrorosa, alguém sabe como eu tiro aquela borda ? Lembrando que é o TDBGrid original do próprio delphi. -- __ : grato e sem mais, : Carlos Aquino, Uberaba/MG __ : http://duard.com.br//bloghttp://duard.com.br/blog : Msn-Messenger : duar...@hotmail.commailto:duardbr%40hotmail.com __ : Uberaba-MG / Brasil __ [As partes desta mensagem que não continham texto foram removidas] CONFIDENTIALITY NOTICE: This email message is for the sole use of the intended recipient(s) and may contain confidential and privileged information. Any unauthorized review, use, disclosure or distribution is prohibited. If you are not the intended recipient, please contact the sender by reply email and destroy all copies of the original message. [As partes desta mensagem que não continham texto foram removidas]
