Res: [delphi-br] Zeos Lib - De volta após testes
Olá pessoal,
Ô velho, reporta o erro lá no site, o Mark Daems irá ficar muito grato, pois
postando os erros a galera vai corrigindo e o mesmo não vem numa próxima versão
(ou update).
[]'s, Silvio Clécio
---
Linux User: #481900
Skype: silvioprog
ICQ: 432519902
E-mail, Y! Messenger: silviop...@yahoo.com.br
Gmail, GTalk: silviop...@gmail.com
Hotmail, MSN: silviop...@hotmail.com
BlogSpot: http://silvioclecio.blogspot.com/
BlogSite: http://silvioprog.blogspot.com/
°oO| Seja livre, use Linux! |Oo°
De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 16 de Janeiro de 2009 4:40:25
Assunto: [delphi-br] Zeos Lib - De volta após testes
Bem...
Aos colegas que me deram a mão... Milhões de agradecimentos! !!
Funcionou...
Como relatei na minha última mensagem, baixei a versão STABLE que eles
disponibilizaram no site http://Zeos. Firmos.At e finalmente funcionou.
ENTRETANTO.. . há um pequeno bug... que não se detecta se você costuma
gerar, de própria mão, as instruções sql para Update, Insert e Delete!
Quando geramos as instruções SQL pelo UpdateSQLEditor, na hora de gerar
a instrução para INSERT, não está colocando : andtes dos nomes dos
campos, que serão os parâmetros... fiz isso aqui mesmo na mão grande!!!
Abram: ...\src\component\ ZUpdateSQLEditor .pas e encontrem o código abaixo:
procedure TZUpdateSQLEditForm .GenInsertSQL( const TableName: string;
UpdateFields, SQL: TStrings);
procedure GenFieldList( const TabName, ParamChar: String);
var
L: string;
I: integer;
Comma: string;
FieldName: string;
begin
L := ' (';
Comma := ', ';
for I := 0 to UpdateFields. Count - 1 do
begin
if I = UpdateFields. Count - 1 then Comma := '';
FieldName := UpdateFields[ I];
if QuoteFields. Checked and (ParamChar = '') then
FieldName := InternalQuoteIdenti fier(FieldName, QuoteChar);
//COLOQUEM OS DOIS PONTOS (COLON) CONFORME FIZ NA LINHA ABAIXO...
L := Format('%s:% s%s', [L, FieldName, Comma]);
if (Length(L) 70) and (I UpdateFields. Count - 1) then
begin
SQL.Add(L);
L := ' ';
end;
end;
SQL.Add(L+') ');
end;
Fora isso, não me pareceu nada ruim...
Para o Silvio... Valeu Parceiro!!! Vou economizar aqueles EUR120,00 HAHAHAHA
Abaços
Emanuel Coutinho
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] Zeos Lib - De volta após testes
Tá fechado... apenas para moderadores...
se você puder... reporta isso lá para mim, ok
Sds
Emanuel Coutinho
Silvio Clécio escreveu:
Olá pessoal,
Ô velho, reporta o erro lá no site, o Mark Daems irá ficar muito
grato, pois postando os erros a galera vai corrigindo e o mesmo não
vem numa próxima versão (ou update).
[]'s, Silvio Clécio
---
Linux User: #481900
Skype: silvioprog
ICQ: 432519902
E-mail, Y! Messenger: silviop...@yahoo.com.br
mailto:silvioprog%40yahoo.com.br
Gmail, GTalk: silviop...@gmail.com mailto:silvioprog%40gmail.com
Hotmail, MSN: silviop...@hotmail.com mailto:silvioprog%40hotmail.com
BlogSpot: http://silvioclecio.blogspot.com/
http://silvioclecio.blogspot.com/
BlogSite: http://silvioprog.blogspot.com/
http://silvioprog.blogspot.com/
°oO| Seja livre, use Linux! |Oo°
De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br
mailto:emanuelcoutinho%40yahoo.com.br
Para: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Enviadas: Sexta-feira, 16 de Janeiro de 2009 4:40:25
Assunto: [delphi-br] Zeos Lib - De volta após testes
Bem...
Aos colegas que me deram a mão... Milhões de agradecimentos! !!
Funcionou...
Como relatei na minha última mensagem, baixei a versão STABLE que eles
disponibilizaram no site http://Zeos. Firmos.At e finalmente funcionou.
ENTRETANTO.. . há um pequeno bug... que não se detecta se você costuma
gerar, de própria mão, as instruções sql para Update, Insert e Delete!
Quando geramos as instruções SQL pelo UpdateSQLEditor, na hora de gerar
a instrução para INSERT, não está colocando : andtes dos nomes dos
campos, que serão os parâmetros... fiz isso aqui mesmo na mão grande!!!
Abram: ...\src\component\ ZUpdateSQLEditor .pas e encontrem o código
abaixo:
procedure TZUpdateSQLEditForm .GenInsertSQL( const TableName: string;
UpdateFields, SQL: TStrings);
procedure GenFieldList( const TabName, ParamChar: String);
var
L: string;
I: integer;
Comma: string;
FieldName: string;
begin
L := ' (';
Comma := ', ';
for I := 0 to UpdateFields. Count - 1 do
begin
if I = UpdateFields. Count - 1 then Comma := '';
FieldName := UpdateFields[ I];
if QuoteFields. Checked and (ParamChar = '') then
FieldName := InternalQuoteIdenti fier(FieldName, QuoteChar);
//COLOQUEM OS DOIS PONTOS (COLON) CONFORME FIZ NA LINHA ABAIXO...
L := Format('%s:% s%s', [L, FieldName, Comma]);
if (Length(L) 70) and (I UpdateFields. Count - 1) then
begin
SQL.Add(L);
L := ' ';
end;
end;
SQL.Add(L+') ');
end;
Fora isso, não me pareceu nada ruim...
Para o Silvio... Valeu Parceiro!!! Vou economizar aqueles EUR120,00
HAHAHAHA
Abaços
Emanuel Coutinho
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
Res...: [delphi-br] Zeos Lib - De volta após testes
Olá pessoal, Fechado para moderadores? Não entendi, fiz meu login lá normalmente e não sou moderador, vi as mensagens no fórum etc. Bom, eu reportar um erro que não estou com ele para dar detalhes fica complicado, com certeza tanto o Mark quanto os outros membros irão pedir detalhes do erro. Um Amigo aqui da lista queria que eu reportasse o erro do Zeos + Oracle lá, eu falei que seria melhor ele, bom, os caras conversaram pelo MSN e resolveram o pró. [http://zeos.firmos.at/viewtopic.php?t=2172highlight=edson]. []'s, Silvio Clécio --- Linux User: #481900 Skype: silvioprog ICQ: 432519902 E-mail, Y! Messenger: silviop...@yahoo.com.br Gmail, GTalk: silviop...@gmail.com Hotmail, MSN: silviop...@hotmail.com BlogSpot: http://silvioclecio.blogspot.com/ BlogSite: http://silvioprog.blogspot.com/ °oO| Seja livre, use Linux! |Oo° De: Coutinho - Yahoo emanuelcouti...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 16 de Janeiro de 2009 14:43:23 Assunto: Re: Res: [delphi-br] Zeos Lib - De volta após testes Tá fechado... apenas para moderadores. .. se você puder... reporta isso lá para mim, ok Sds Emanuel Coutinho Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbuscados.yahoo.com [As partes desta mensagem que não continham texto foram removidas]
