[delphi-br] Re: Delphi 2007 - 3 Camadas - BSS
Opa. e aí Luiz, blzinha? Obrigado pela resposta. Seguinte, já tentei fazer a conexão sim sem o sharedConnection. Achoq eu vou experimentar recriar o servidor para ver se vai funcionar. Não sei, agora vai para tentativa e solução ou erro. rs Abraços. --- Em delphi-br@yahoogrupos.com.br, Luiz Carlos [EMAIL PROTECTED] escreveu fjogassa escreveu: Boa tarde a todos. Estou desenvolvendo um sistema em três camadas no Delphi 2007 utilizando o Borland Socket Server + DatasetProvider + ClientDataSet. Desenvolvi o servidor e o mesmo está funcionando, aparentemente, iniciei o socket server na máquina cliente (Windows Vista Ultimate 64bits). Vou no BSS e configuro o servidor e dou um connected TRUE e conecta também. No cliente, juntamente com o socket coloquei um SharedConnection apontando para este socket. Agora vem o problema, na tela coloco um clientdataset e configuro o remoteserver e o providername e na hora que vou dar um actiev TRUE ele dá access violation no scktsvr.exe. alguém poderia me ajudar por favor. Obrigado. Abraços. GTalk: [EMAIL PROTECTED] mailto:fjogassa%40gmail.com Tentou fazer a conexão sem o ShareConnection?
Re: [delphi-br] Atualizar Tabelas do sistema
Estava tentando atualizar as tabelas de sistema e não foi permitido. Alguns bancos de dados tem comandos específicos para alterar o tipo das colunas, mas não me lembro de cabeça se o FB tem. Se não houver, vai ter que ser na munheca mesmo: tabelas temporárias e etc e tal... 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: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Delphi http://www.devhost.com.br [EMAIL PROTECTED]
[delphi-br] Ajuda
Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Ajuda
Coloca no FormShow; for vIndex := 0 to pgcInstalacao.PageCount - 1 do pgcInstalacao.Pages[vIndex].TabVisible := False; Luciano Calenzani Simões - Mensagem original De: BandaLemuel [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 8:43:16 Assunto: [delphi-br] Ajuda Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Ajuda
Vc pode usar o pagecontrol, mas em cada tabsheet criado, coloque tabvisible=false Abraços Rodinei Amorim Programador Delphi [EMAIL PROTECTED] (11) 8208-9503 - (11) 2024-2723 From: BandaLemuel Sent: Wednesday, September 24, 2008 8:43 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Ajuda Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda com formulário tipo Wizard (era Ajuda)
- Mensagem original - Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley - Fim da mensagem original - Wesley, na boa, o título da sua mensagem não ajuda nem um pouco. Tente ser mais específico já no título. Isso ajuda a quem vai responder. Em relação à sua dúvida, eu costumo fazer wizards manipulando uma variável de índice e as proriedades dos objetos no form. Eu acho essa maneira mais simples. Porém, se alguém tiver alguma outra idéia... []'s --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal [EMAIL PROTECTED] --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom ---,___ Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualizar Tabelas do sistema
Jackson Gomes - ToolsComps wrote: Estava tentando atualizar as tabelas de sistema e não foi permitido. Alguns bancos de dados tem comandos específicos para alterar o tipo das colunas, mas não me lembro de cabeça se o FB tem. Se não houver, vai ter que ser na munheca mesmo: tabelas temporárias e etc e tal... Que por sinal é o método mais seguro. As tabelas de sistema não estão protegidas contra alterações atoa -- você pode corromper irreversivelmente seu banco de dados, ou pior, descobrir que ele está corrompido com seu sistema em produção. A propósito, se a conversão nvarchar - varchar for simples, basta um alter table sem precisar usar campo temporário. -- Joao Morais
[delphi-br] Re: Mais uma dúvida Importante !
Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço !
Re: [delphi-br] Ordenar registros DBGrid.
Bom dia, Eu utilizo com uma Query. Vc também pode utilizar com um ClientDataSet, adicionando ao index o field da tabela procedure OrdenaGrid(grid: TwwdbGrid; Field : String); var posicao : integer; begin with (grid.DataSource.DataSet as TIBQuery) do begin posicao := pos(' ORDER BY', UpperCase(SQL.Text)); if posicao = 0 then sql.Add(' ORDER BY ' + Field) else if pos(' DESC', UpperCase(SQL.Text)) = 0 then sql.text := Copy(sql.text, 1, Posicao - 1) + ' ORDER BY ' + Field + ' DESC' else sql.text := Copy(sql.text, 1, Posicao - 1) + ' ORDER BY ' +Field; open; end; end; Luiz Carlos escreveu: Coutinho - Yahoo escreveu: Luis Carlos. Não sei se os colegas que te responderam antes entenderam o que vc deseja. Eu entendi que você quer controlar, aleatoriamente, ou como der na telha, em determinado momento a ordem de inclusão de registros numa tabela... Bem, pelo visto você deseja alterar hoje de uma forma, amanhã, de outra... Eu sugiro que vc coloque um campo numérico, com valor inteiro, e coloque um índice único neste campo... Este campo é o que vc deverá alterar, inserindo números sequencialmente para que sejam apresentados na ordem que vc deseja. Lembre, que o conteúdo do campo é o que ordena, e se for um campo string, o sgbd vai letra a letra, fazendo a indexação, então: Antonia, vem antes de Antonio, Jorge antes de José... e assim sucessivamente. Você pode ainda usar vários campos... por exemplo Se for gerar um view (ou pesquisa do access), crie um campo que analise o valor do campo, e te dê uma resposta lógica (boolean), e depois, use outro campo para ser a próxima chave do índice... e um terceiro e assim sucessivamente... aí sua imaginação é que vai dizer, mas ainda assim, eu usaria um sql para isso, pois você poderá manipulá-lo de forma mais controlada Sds Emanuel Coutinho Luiz Carlos escreveu: Olá a todos, Estou com o seguinte problema; tenho uma sequencia de 5 registros e gostaria de mudar a ordem deles, podendo escolher em que posição inseri-los, por exemplo: modo original: 1 - registro 1 2 - registro 2 3 - registro 3 4 - registro 4 5 - registro 5 resultado desejado: 1 - registro 2 2 - registro 3 3 - registro 4 4 - registro 5 5 - registro 1 isso de forma aleatório, alguma idéia? Mensagens neste tópico http://br.groups.yahoo.com/group/delphi-br/message/192092;_ylc=X3oDMTM4dWQ3aGVuBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzEyMjIxODE5MDkEdHBjSWQDMTkyMDky http://br.groups.yahoo.com/group/delphi-br/message/192092;_ylc=X3oDMTM4dWQ3aGVuBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawN2dHBjBHN0aW1lAzEyMjIxODE5MDkEdHBjSWQDMTkyMDky (4) Responder (através da web) http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJyNzFqZGg5BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEyMjIxODE5MDk-?act=replymessageNum=192132 http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJyNzFqZGg5BF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BG1zZ0lkAzE5MjEzMgRzZWMDZnRyBHNsawNycGx5BHN0aW1lAzEyMjIxODE5MDk-?act=replymessageNum=192132 | Adicionar um novo tópico http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJldXI4dm5kBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTIyMjE4MTkwOQ-- http://br.groups.yahoo.com/group/delphi-br/post;_ylc=X3oDMTJldXI4dm5kBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA250cGMEc3RpbWUDMTIyMjE4MTkwOQ-- Mensagens http://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlbHFjaGtvBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTIyMjE4MTkwOQ-- http://br.groups.yahoo.com/group/delphi-br/messages;_ylc=X3oDMTJlbHFjaGtvBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA21zZ3MEc3RpbWUDMTIyMjE4MTkwOQ-- | Arquivos http://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmcDh0a2tpBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzEyMjIxODE5MDk- http://br.groups.yahoo.com/group/delphi-br/files;_ylc=X3oDMTJmcDh0a2tpBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA2ZpbGVzBHN0aW1lAzEyMjIxODE5MDk- | Fotos http://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlaWJyNmdmBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTIyMjE4MTkwOQ-- http://br.groups.yahoo.com/group/delphi-br/photos;_ylc=X3oDMTJlaWJyNmdmBF9TAzk3NDkwNDM3BGdycElkAzEwNTg3NzgEZ3Jwc3BJZAMyMTM3MTExMjY0BHNlYwNmdHIEc2xrA3Bob3QEc3RpbWUDMTIyMjE4MTkwOQ-- | Links
[delphi-br] Select Set07 a Jan08
Olá amigos da lista! Preciso fazer um select onde o usuário digita Setembro 2007 a Dezembro de 2008. Minha tabela esta assim MesAno SETEMBRO2007 OUTUBRO2007 NOVEMBRO2007 DEZEMBRO2007 JANEIRO2008 FEVEREIRO2008 MARÇO2008 ABRIL2008 MAIO2008 Então se ele colocar Set2007 a Fev2008 tem que vir este intervalo.. Eu tenho um recurso que ao passar SETEMBRO ele me retorna o numero equivalente (9). Ja tive a seguinte dica SELECT T.* FROM ( SELECT (CAST(RETORNA_MES(MES) || ANO) AS INTEGER) MES_ANO FROM MINHATABELA ) T WHERE T.MES_ANO BETWEEN :MES_I AND :MES_F Mas quando passo 20079 a 20081 só vem JANEIRO/2008... Alguém ja passou por isso ? Qualquer dica ficarei agradecido Anderson Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses
Re: [delphi-br] Ajuda
E aí Wesley, blz. Este mesmo componente, no Object Inspector tem a propriedade TABVISIBLE, se vc coloca como False, a mesma não aparece. Claro, você precisa criar primeiro as TAB (New Tab), depois você clica para selecionar a TAB e vai no Object Inspector e localiza a propriedade e coloca False, a mesma imediatamente desaparece, e para acessar elas, via IDE, no Object Inspector, localize a propriedade... não me lembro, mas é a primeira que aparece no topo! Já via código (para acessar) é: PageControl1.ActivePage := TabSheed1; PageControl1.ActivePage := TabSheed2; PageControl1.ActivePage := ...; Blz. Onjahyr BandaLemuel escreveu: Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley
Re: [delphi-br] Select Set07 a Jan08
Preciso fazer um select onde o usuário digita Setembro 2007 a Dezembro de 2008. Mas quando passo 20079 a 20081 só vem JANEIRO/2008... mas vc usa Mes/Ano e está passando Ano/Mês. Não seria isso? Alguém ja passou por isso ? Tb tive uma situação parecida, aonde fiz a junção do ano com o mês, criando um novo valor: 2007/09 vira 200709, daí fica fácil distinguir pelo Ano/Mes. begin for select tf.codigo_fipe, tf.ano_modelo, tf.ano, tf.mes_ref, tf.valor from tabela_fipe tf where tf.ano * 100 + tf.mes_ref = (select first 1 tfi.ano*100 + tfi.mes_ref from tabela_fipe tfi where tfi.codigo_fipe = tf.codigo_fipe and tfi.ano_modelo = tf.ano_modelo and (tfi.ano*100 + tfi.mes_ref) = (:p_ano*100 + :p_mes_ref) order by 1 desc ) order by tf.ano, tf.mes_ref into :CODIGO_FIPE, :ANO_MODELO, :ANO, :MES_REF, :VALOR do suspend; end 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: [EMAIL PROTECTED] Fone: 27 3389 1138 - 8811 0324 Devhost - Webhost para desenvolvedores Delphi http://www.devhost.com.br [EMAIL PROTECTED]
Re: [delphi-br] Re: Mais uma dúvida Importante !
sem muito tecniquês, é o seguinte: O last é um comando, ou seja, você está mandando se posicionar no ÚLTIMO registro O eof testa se o registro é o último da tabela. Alexandre - Original Message - From: victor_scampini To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 7:33 AM Subject: [delphi-br] Re: Mais uma dúvida Importante ! Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço ! -- No virus found in this incoming message. Checked by AVG - http://www.avg.com Version: 8.0.169 / Virus Database: 270.7.1/1687 - Release Date: 23/9/2008 18:32 [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Re: Mais uma dúvida Important e !
Oi, não sou bom em Banco de Dados não, mas o EOF significa o final dos dados do seu banco e BOF é o início, ou seja: /while/ not DataSet./Eof/ do begin // Se chegou até aqui é porque ainda há registros e vc poderá ir para o próximo com o NEXT end; /while/ not DataSet./Bof/ do begin // Se passar do begin é porque ainda existem registros e você pode usar a função PRIOR para ir para o anterior até chegar ao primeiro registro. end; Onjahyr victor_scampini escreveu: Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço !
RES: [delphi-br] Re: Mais uma dúvida Importante !
if not TABELA.Eof then TABELA.Next( ) else ShowMessage( 'FIM da Tabela ) _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Nicolas Enviada em: quarta-feira, 24 de setembro de 2008 09:33 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Re: Mais uma dúvida Importante ! sem muito tecniquês, é o seguinte: O last é um comando, ou seja, você está mandando se posicionar no ÚLTIMO registro O eof testa se o registro é o último da tabela. Alexandre - Original Message - From: victor_scampini To: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Sent: Wednesday, September 24, 2008 7:33 AM Subject: [delphi-br] Re: Mais uma dúvida Importante ! Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço ! -- No virus found in this incoming message. Checked by AVG - http://www.avg. http://www.avg.com com Version: 8.0.169 / Virus Database: 270.7.1/1687 - Release Date: 23/9/2008 18:32 [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] Ajuda
Obrigado... Rodinei e Luciano... Eu não sabia desta propriedade.. rsrrs Wesley From: Rodinei (MSN) Sent: Wednesday, September 24, 2008 8:47 AM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Ajuda Vc pode usar o pagecontrol, mas em cada tabsheet criado, coloque tabvisible=false Abraços Rodinei Amorim Programador Delphi [EMAIL PROTECTED] (11) 8208-9503 - (11) 2024-2723 From: BandaLemuel Sent: Wednesday, September 24, 2008 8:43 AM To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Ajuda Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Information from ESET NOD32 Antivirus, version of virus signature database 3466 (20080923) __ The message was checked by ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Duvida sobre 3 camadas.
Queria sabe de alguém que já desenvolveu em 3 camadas como fica o desempenho. Por exemplo: Alugo um servidor dedicando na locaweb e coloco nele a aplicação servidora e a base de dados. Na empresa existe uma conexão velox para de 1 mega compartilhada com 40 pessoas. Teria um bom desempenho na comunicação entre esse aplicativos clientes e a aplicação servidora contando Com uma conexão apenas de 1 mega? Se alguém tem uma situação parecida por favor comente. [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualizar Tabelas do sistema
Bom dia João e Jackson, Quanto à atualização das tabelas do sistema, tem comandos para alterar sim. Existem duas formas para isso: 1) usando diretamente as tabelas do FB. Todas elas começam com RDB$alguma coisa... heheheh. Mais para trabalhar com elas, muito cuidado. Apesar dele não permitir alterações inválidas, melhor estudar bem elas primeiro para depois alterá-las. Obs: Tenho alguns exemplos em casa... Aí mais tarde posto aqui porque agora estou no serviço... 2) Como disse o João é usando Alter Table... Que, na verdade, internamente irá fazer a alteração acima dentro do banco. Se precisar de algum exemplo, posta aí a necessidade ou manda em PVT que tento te ajudar... Abraços, Guilherme Augusto --- Em qua, 24/9/08, Joao Morais [EMAIL PROTECTED] escreveu: De: Joao Morais [EMAIL PROTECTED] Assunto: Re: [delphi-br] Atualizar Tabelas do sistema Para: delphi-br@yahoogrupos.com.br Data: Quarta-feira, 24 de Setembro de 2008, 8:51 Jackson Gomes - ToolsComps wrote: Estava tentando atualizar as tabelas de sistema e não foi permitido. Alguns bancos de dados tem comandos específicos para alterar o tipo das colunas, mas não me lembro de cabeça se o FB tem. Se não houver, vai ter que ser na munheca mesmo: tabelas temporárias e etc e tal... Que por sinal é o método mais seguro. As tabelas de sistema não estão protegidas contra alterações atoa -- você pode corromper irreversivelmente seu banco de dados, ou pior, descobrir que ele está corrompido com seu sistema em produção. A propósito, se a conversão nvarchar - varchar for simples, basta um alter table sem precisar usar campo temporário. -- Joao Morais Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Duvida sobre 3 camadas.
Posto sua dúvida em [EMAIL PROTECTED], grupo exclusivo sobre n-tier em Delphi. Luciano Calenzani Simões - Mensagem original De: TI - METALURGICA JANO [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 10:12:13 Assunto: [delphi-br] Duvida sobre 3 camadas. Queria sabe de alguém que já desenvolveu em 3 camadas como fica o desempenho. Por exemplo: Alugo um servidor dedicando na locaweb e coloco nele a aplicação servidora e a base de dados. Na empresa existe uma conexão velox para de 1 mega compartilhada com 40 pessoas. Teria um bom desempenho na comunicação entre esse aplicativos clientes e a aplicação servidora contando Com uma conexão apenas de 1 mega? Se alguém tem uma situação parecida por favor comente. Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Atualizar Tabelas do sistema
Guilherme Augusto wrote: 2) Como disse o João é usando Alter Table... Que, na verdade, internamente irá fazer a alteração acima dentro do banco. ... e o mais importante - sem deixar o usuário corromper o banco. -- Joao Morais
[delphi-br] Invalid datatype - Delphi 2007
Olá pessoal! Estou migrando o projeto do D2005 para o D2007... putz! Que dor de cabeça! Para ajudar o projeto utiliza DBExpress e Firebird, então já sabem do problema do driver. Eu consegui resolver o problema dos campos blob fazendo um downgrade do driver dbxint30.dll para o do D2006. Funcionou perfeitamente. Agora, estou com um problemão com o SQLDataSet. Malditos DBX. Ele está configurado como ctStoredProc, e após passar os parametros, dou um ExecSQL; Ai a mensagem de erro: Invalid command Data type unknown. Tentei com os parametros definidos na lista de parametros, sem definir... voltei o driver para o do D2007 e nada! Mesmo erro. Valew! -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] * http://www.edmafer.com.br */ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Invalid datatype - Delphi 2007
Olá pessoal! Estou migrando o projeto do D2005 para o D2007... putz! Que dor de cabeça! Para ajudar o projeto utiliza DBExpress e Firebird, então já sabem do problema do driver. Eu consegui resolver o problema dos campos blob fazendo um downgrade do driver dbxint30.dll para o do D2006. Funcionou perfeitamente. Agora, estou com um problemão com o SQLDataSet. Malditos DBX. Ele está configurado como ctStoredProc, e após passar os parametros, dou um ExecSQL; Ai a mensagem de erro: Invalid command Data type unknown. Tentei com os parametros definidos na lista de parametros, sem definir... voltei o driver para o do D2007 e nada! Mesmo erro. Valew! -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] * http://www.edmafer.com.br */ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Interface para listagem e cadastro/alteração de dados do DB de forma genérica
Olá pessoal. Acho que o subject já diz muito. Meu problema maior é bolar um jeito de tornar genérica a forma de cadastrar e alterar os dados das tabelas, pois para listar os dados umas Views no postgres com os campos nomeados, um DBGrid e um select * from nomedaview no dataset já resolvem o problema. Tentei criar um form que criasse os componentes automaticamente de acordo com os campos mas não deu muito certo, principalmente porque estou sem muito tempo para desenvolver. Pensei em alterar os dados no DBGrid mesmo mas gerou muitos problemas nas views e campos de chaves estrangeiras. E também tinha o problema que alguns campos como os campos 'nome' e 'sobrenome' que tinham que estar separados na tabela, mas juntos na hora de exibir no dbgrid e separados novamente para alterar. Alguém já passou por isso, ou melhor, alguém tem alguma solução? Também estou atrás de material sobre construção de interfaces ou boas práticas de programação cliente/servidor. Obrigado. [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Re: Mais uma dúvida Importante !
Victor, Eof = End-of-file Portanto, se não é o fim do arquivo Next (vai pro próximo registro). Abraço! De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de victor_scampini Enviada em: quarta-feira, 24 de setembro de 2008 07:34 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: Mais uma dúvida Importante ! Ok amigo, vou tentar eof...Mais você pode me explicar porque se possível ?...Obrigado desde já ! Abraço ! [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda com select
Pesssoal da lista boa tarde Preciso de uma ajuda em uma consulta A situação é a seguinte na minha tabela ha os campos nome telefone tipo_ligaçao Onde o tipo de ligação pode ser particular ou serviço Como posso fazer para que ele conte quantas ligações cada pessoa fez, dentro disto contando os tipos separados ,agrupando por nome da pessoa ? Meio chato né Ficaria mais ou menos assim Nometotal de ligações serviço particular Ricardo 15 10 5 Andrea 2 20 Andressa3 0 3 Como posso fazer isto? desde ja agradeço a ajuda Obrigado OBS : pensei em criar dois campo de tipo de ligação ai acho que funciona Ricado de Abreu [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Ajuda com select
No Sybase dá para fazer assim: select nome, count(nome), (select count(telefone) from ligacao as lig where nome = ligacao.nome and tipo_ligacao = 'P' ) as Pessoal, (select count(telefone) from ligacao as lig where nome = ligacao.nome and tipo_ligacao = 'S' ) as Servico from ligacao group by nome Luciano Calenzani Simões - Mensagem original De: Ricardo [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 13:29:28 Assunto: [delphi-br] Ajuda com select Pesssoal da lista boa tarde Preciso de uma ajuda em uma consulta A situação é a seguinte na minha tabela ha os campos nome telefone tipo_ligaçao Onde o tipo de ligação pode ser particular ou serviço Como posso fazer para que ele conte quantas ligações cada pessoa fez, dentro disto contando os tipos separados ,agrupando por nome da pessoa ? Meio chato né Ficaria mais ou menos assim Nometotal de ligações serviço particular Ricardo 15 10 5 Andrea 2 20 Andressa3 0 3 Como posso fazer isto? desde ja agradeço a ajuda Obrigado OBS : pensei em criar dois campo de tipo de ligação ai acho que funciona Ricado de Abreu Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Vagas para desenvolvedores e analistas Delphi
Estagiário de TI Desenvolvimento Estagio para alunos de boa formação com solitos conhecimentos de C, C+, SO (Windows), Banco de dados. http://www.progbr.com/oferta/1266 Analista Programador Delphi Desenvolvimento A PL Informática, empresa de significativa representatividade no segmento de Tecnologia da Informação, busca profissionais no seguinte perfil: Para alocação em projeto Experiência mínima de 3 anos na ferramenta Delphi e banco de dados Oracle; Conhecimentos em C# / .NET; Local de trabalho:... http://www.progbr.com/oferta/1261 Programador Delphi Pleno Desenvolvimento Empresa de Desenvolvimento de Sistemas a mais de 15 anos no setor necessita de programador Delphi Pleno, para desenvolvimento de projetos Fiscais e Contábeis. Salário a Combinar. http://www.progbr.com/oferta/1241 Programador Delphi 2007 Desenvolvimento Programador Delphi 2007 - Firebird - Delphi.net http://www.progbr.com/oferta/1239 Programador PHP Desenvolvimento Empresa seleciona profissional com excelentes conhecimentos em PHP + MySQL, XML, CSS, Tableless. Necessário também conhecimento em modelagem de dados. Residir próximo à Barra da Tijuca. Conhecimentos em: PHP; MySQL; O conhecimento de outra lingüagem de programação, principalmente Delphi, é um ... http://www.progbr.com/oferta/1226 Desenvolvedor Delphi Desenvolvimento Objetivo: Atuar no desenvolvimento de sistemas customizados em linguagem Delphi Pré requisitos obrigatórios: Experiência comprovada em banco de dados SQL MYSQL Conhecimento e trabalhos desenvolvidos na linguagem de programação Delphi; Competências necessárias: Criatividade Responsabilida... http://www.progbr.com/oferta/1183 Desenvolvedor de Aplicação Desenvolvimento Objetivo: Atuar no desenvolvimento de aplicações personalizadas, re-engenharia e migração manutenção de sistemas Pré Requisito: Domínio de Lógica de programação Conhecimento de linguagem de programação orientada a objetos Conhecimento de Linguagem SQL Desejável conhecimento da Linguag... http://www.progbr.com/oferta/1181
[delphi-br] Re: Ajuda com select
Select count(*) from tabela where nome='fulano' order by nome se vc criar um campo exmp. n_ligacao fica mais facil. select sum(n_ligacao) from tabela group by nome na minha tabela ha os campos nome telefone tipo_ligaçao
[delphi-br] Probleminha em um TQUERY + TUpdateSQL + DBFs..
Gente faz muto tempo que não mexe com isso, e acho que deu pane To tendo que mudar umas coisinha bem altigas aqui... porem ta me dando um erro q ta meio assim perdido... (é duro fica velho viu... vai lembra que jeito... k) quem sabe escrevendo este email e depois de enviar clarei mais as coisas... Seguinte... Tenho um : query.sql := SELECT * FROM 'ouv_sort.dbf' AS sor, 'ouvinte.dbf' AS ouv WHERE (sor.ts_cod_cad = :premio) AND (sor.ouv_ndoc=ouv.num_doc) ORDER BY ouv.ts_sorteio; // até aqui 100% Onde as propriedades estão assim: AutoCalcFields := true; AutoRefresh := true; CachedUpdate := true; Constraints := true; ObjectView := true; ParamCheck := true; RequestLive := true; UniDirectional := FALSE; UpdateMode := upWhereKeyOnly UpdateObject := UpdateSQL_sorteio; ai em um button tenho UpdateSQL.DELETE := delete from 'ouv_sort.dbf' where TS_ID = :OLD_TS_ID; // aqui que a porca torçe o rabo... AH o campo TS_ID se chamasa TIMESTAMP, claro que tive q mudar o nome no DBF e depois fui no TQuery FIELD.EDITOR e troquei tudo que achei de TIMESTAMP para TS_ID ou seja... DisplayLabel := TS_ID FieldName := TS_ID Name := strngfld_sorteioTS_ID Origin := LOCALDB.ouv_sort.DBF.TS_ID ProviderFlags := [ pfInUpdate, pfInWhere, pfInKey ] quando mando executar : dm1.UpdateSQL_sorteio.DeleteSQL.Text := 'delete from ouv_sort.dbf where TS_ID = :OLD_TS_ID'; dm1.UpdateSQL_sorteio.ExecSQL( ukDelete ); dm1.qry_sorteio.Refresh; Ele me fala que OLD_TS_ID é de tipo desconhecido: Field 'OLD_TS_ID' is of an unknown type. POREM está query ai acima, foi gerada pelo proprio UpdateSQL.EDITOR O que eu to esquecendo ? []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9175) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26 --- [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Ajuda com select
Ricardo... SQL padronizada ANSI-92: select nome, count(tipo_ligacao) as contagem, case when tipo_ligacao = 'P' then 'Particular' when tipo_ligacao = 'S' then 'Serviço' end as tipo_ligacao, from ligacoes group by nome, tipo_ligacao []'s --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal [EMAIL PROTECTED] --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom --- - Mensagem original De: Ricardo [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 13:29:28 Assunto: [delphi-br] Ajuda com select Pesssoal da lista boa tarde Preciso de uma ajuda em uma consulta A situação é a seguinte na minha tabela ha os campos nome telefone tipo_ligaçao Onde o tipo de ligação pode ser particular ou serviço Como posso fazer para que ele conte quantas ligações cada pessoa fez, dentro disto contando os tipos separados ,agrupando por nome da pessoa ? Meio chato né Ficaria mais ou menos assim Nometotal de ligações serviço particular Ricardo 15 10 5 Andrea 2 20 Andressa3 0 3 Como posso fazer isto? desde ja agradeço a ajuda Obrigado OBS : pensei em criar dois campo de tipo de ligação ai acho que funciona Ricado de Abreu [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Ajuda com select
Ele quer contar o número total de ligações, total particular e total serviço. Dessa forma que você passou, vai gerar dois registro para cada tipo de ligação. Luciano Calenzani Simões - Mensagem original De: Willian Jhonnes Lara dos Santos [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 14:57:19 Assunto: Res: [delphi-br] Ajuda com select Ricardo... SQL padronizada ANSI-92: select nome, count(tipo_ligacao) as contagem, case when tipo_ligacao = 'P' then 'Particular' when tipo_ligacao = 'S' then 'Serviço' end as tipo_ligacao, from ligacoes group by nome, tipo_ligacao []'s Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Criar componente de classe indefinida/dinâmica
Boa tarde galera... Preciso da ajuda de vocês para uma solução dos meus estudos para a prova de certificação do Delphi... É que estou estudando herança dos componentes... Querendo ver todos os seus ancestrais até TObject. Aí, consegui com a ajuda da net achar algo parecido com o que eu queria... Só que ele faz apenas com o Sender do TButton que estou usando para clicar e executar a busca dos ancestrais... Agora, o que eu preciso é fazer essa mesma coisa não apenas com Sender ou com algum componente da tela. Quero digitar uma classe qualquer num Edit e ele me retornar esse ancestral.. Só que não estou conseguindo fazer isso de jeito nenhum... Segue o código abaixo... procedure TForm1.BtClassesClick(Sender: TObject); Var ClassRef : TClass; Obj : TControl; begin ListaClasses.Clear; // Aqui abaixo que está o problema... Obj := TLabel.Create(Self); // Porque mesmo que eu faça, dá um Access Violation Obj := TControl(EdClasse.Text).Create(Self); ClassRef := Obj.ClassType; While ClassRef Nil Do Begin ListaClasses.Items.Add(ClassRef.ClassName); ClassRef := ClassRef.ClassParent; End; FreeAndNil(Obj); end; Conto com a ajuda de vocês para facilitar os meus estudos pois é material que não acaba mais... Falow Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
RE: [delphi-br] Criar componente de classe indefinida/din âmica
Leia a respeito das funções GetClass(), FindClass() e RegisterClass() no help do Delphi e vc vai entender melhor pq seu codigo nao funciona. Sds. To: [EMAIL PROTECTED]; delphi-br@yahoogrupos.com.br; [EMAIL PROTECTED] From: [EMAIL PROTECTED] Date: Wed, 24 Sep 2008 11:09:49 -0700 Subject: [NDDV] Criar componente de classe indefinida/dinâmica Boa tarde galera... Preciso da ajuda de vocês para uma solução dos meus estudos para a prova de certificação do Delphi... É que estou estudando herança dos componentes... Querendo ver todos os seus ancestrais até TObject. Aí, consegui com a ajuda da net achar algo parecido com o que eu queria... Só que ele faz apenas com o Sender do TButton que estou usando para clicar e executar a busca dos ancestrais... Agora, o que eu preciso é fazer essa mesma coisa não apenas com Sender ou com algum componente da tela. Quero digitar uma classe qualquer num Edit e ele me retornar esse ancestral.. Só que não estou conseguindo fazer isso de jeito nenhum... Segue o código abaixo... procedure TForm1.BtClassesClick(Sender: TObject); Var ClassRef : TClass; Obj : TControl; begin ListaClasses.Clear; // Aqui abaixo que está o problema... Obj := TLabel.Create(Self); // Porque mesmo que eu faça, dá um Access Violation Obj := TControl(EdClasse.Text).Create(Self); ClassRef := Obj.ClassType; While ClassRef Nil Do Begin ListaClasses.Items.Add(ClassRef.ClassName); ClassRef := ClassRef.ClassParent; End; FreeAndNil(Obj); end; Conto com a ajuda de vocês para facilitar os meus estudos pois é material que não acaba mais... Falow _ Confira vídeos com notícias do NY Times, gols direto do Lance, videocassetadas e muito mais no MSN Video! http://video.msn.com/?mkt=pt-br
RES: [delphi-br] Re: Ajuda com select
Acho melehora criar os campo tipo pois posso contar independente Obrigado pela ajuda _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de mauriciojrly Enviada em: quarta-feira, 24 de setembro de 2008 14:32 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Re: Ajuda com select Select count(*) from tabela where nome='fulano' order by nome se vc criar um campo exmp. n_ligacao fica mais facil. select sum(n_ligacao) from tabela group by nome na minha tabela ha os campos nome telefone tipo_ligaçao [As partes desta mensagem que não continham texto foram removidas]
RES: [delphi-br] Ajuda com select
Funiona com Mysql ? Vou tentar _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Willian Jhonnes Lara dos Santos Enviada em: quarta-feira, 24 de setembro de 2008 14:57 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] Ajuda com select Ricardo... SQL padronizada ANSI-92: select nome, count(tipo_ligacao) as contagem, case when tipo_ligacao = 'P' then 'Particular' when tipo_ligacao = 'S' then 'Serviço' end as tipo_ligacao, from ligacoes group by nome, tipo_ligacao []'s --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal willianjhonnes@ mailto:willianjhonnes%40yahoo.com.br yahoo.com.br --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom --- - Mensagem original De: Ricardo ricardoe4in@ mailto:ricardoe4in%40yahoo.com.br yahoo.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 13:29:28 Assunto: [delphi-br] Ajuda com select Pesssoal da lista boa tarde Preciso de uma ajuda em uma consulta A situação é a seguinte na minha tabela ha os campos nome telefone tipo_ligaçao Onde o tipo de ligação pode ser particular ou serviço Como posso fazer para que ele conte quantas ligações cada pessoa fez, dentro disto contando os tipos separados ,agrupando por nome da pessoa ? Meio chato né Ficaria mais ou menos assim Nome total de ligações serviço particular Ricardo 15 10 5 Andrea 2 2 0 Andressa 3 0 3 Como posso fazer isto? desde ja agradeço a ajuda Obrigado OBS : pensei em criar dois campo de tipo de ligação ai acho que funciona Ricado de Abreu [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new. http://br.new.mail.yahoo.com/addresses mail.yahoo.com/addresses [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] Ajuda com select
eu uso mysql funciona ? _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Luciano Calenzani Simões Enviada em: quarta-feira, 24 de setembro de 2008 14:21 Para: delphi-br@yahoogrupos.com.br Assunto: Res: [delphi-br] Ajuda com select No Sybase dá para fazer assim: select nome, count(nome), (select count(telefone) from ligacao as lig where nome = ligacao.nome and tipo_ligacao = 'P' ) as Pessoal, (select count(telefone) from ligacao as lig where nome = ligacao.nome and tipo_ligacao = 'S' ) as Servico from ligacao group by nome Luciano Calenzani Simões - Mensagem original De: Ricardo ricardoe4in@ mailto:ricardoe4in%40yahoo.com.br yahoo.com.br Para: [EMAIL PROTECTED] mailto:delphi-br%40yahoogrupos.com.br os.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 13:29:28 Assunto: [delphi-br] Ajuda com select Pesssoal da lista boa tarde Preciso de uma ajuda em uma consulta A situação é a seguinte na minha tabela ha os campos nome telefone tipo_ligaçao Onde o tipo de ligação pode ser particular ou serviço Como posso fazer para que ele conte quantas ligações cada pessoa fez, dentro disto contando os tipos separados ,agrupando por nome da pessoa ? Meio chato né Ficaria mais ou menos assim Nome total de ligações serviço particular Ricardo 15 10 5 Andrea 2 2 0 Andressa 3 0 3 Como posso fazer isto? desde ja agradeço a ajuda Obrigado OBS : pensei em criar dois campo de tipo de ligação ai acho que funciona Ricado de Abreu Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new. http://br.new.mail.yahoo.com/addresses mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Componente Doc x Pdf
Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática
RES: [delphi-br] Ajuda com select
Não tenho MySQL. Testa aí. Luciano Calenzani Simões - Mensagem original De: Ricardo [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 15:03:59 Assunto: RES: [delphi-br] Ajuda com select eu uso mysql funciona ? Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como testar se um valor é inteiro
Pessoal, Tenho um valor do tipo Variant, preciso testá-lo se é um inteiro ou não. Agradeço antecipadamente a ajuda dos Colegas. -- []s, Odail Della Niesi Junior São Pedro-SP
[delphi-br] Hexa para imagem
Como converter hexadecimal para imagem e jogar em um TImage
Re: [delphi-br] Como testar se um valor é int eiro
Odail Della Niesi Junior wrote: Tenho um valor do tipo Variant, preciso testá-lo se é um inteiro ou não. Agradeço antecipadamente a ajuda dos Colegas. if VarType(SeuVariant) = varInteger then -- Joao Morais
Re: [delphi-br] Criar componente de classe indefinida/dinâmica
Guilherme Augusto wrote: Boa tarde galera... Preciso da ajuda de vocês para uma solução dos meus estudos para a prova de certificação do Delphi... É que estou estudando herança dos componentes... Querendo ver todos os seus ancestrais até TObject. Aí, consegui com a ajuda da net achar algo parecido com o que eu queria... Só que ele faz apenas com o Sender do TButton que estou usando para clicar e executar a busca dos ancestrais... Agora, o que eu preciso é fazer essa mesma coisa não apenas com Sender ou com algum componente da tela. Quero digitar uma classe qualquer num Edit e ele me retornar esse ancestral.. Só que não estou conseguindo fazer isso de jeito nenhum... Segue o código abaixo... Primeiro você precisa descobrir qual o endereço da classe a partir do nome. A classe precisa estar registrada de alguma forma, e a forma mais prática é pegar carona nas rotinas de streaming da IDE e usar GetClass/RegisterClass. Depois de ter o endereço da classe, basta localizar a superclasse através do método ClassParent. Então, para que o seu código mostre o nome da superclasse de um nome de classe fornecido pelo usuário, você precisa de mais ou menos isso aqui: var VClass: TPersistentClass; begin VClass := GetClass(Edit1.Text); if Assigned(VClass) then Memo1.Lines.Add( 'Nome da superclasse: ' + VClass.ClassParent.ClassName) else Memo1.Lines.Add('Não achei a classe ' + Edit1.Text); end; -- Joao Morais procedure TForm1.BtClassesClick(Sender: TObject); Var ClassRef : TClass; Obj : TControl; begin ListaClasses.Clear; // Aqui abaixo que está o problema... Obj := TLabel.Create(Self); // Porque mesmo que eu faça, dá um Access Violation Obj := TControl(EdClasse.Text).Create(Self); ClassRef := Obj.ClassType; While ClassRef Nil Do Begin ListaClasses.Items.Add(ClassRef.ClassName); ClassRef := ClassRef.ClassParent; End; FreeAndNil(Obj); end; Conto com a ajuda de vocês para facilitar os meus estudos pois é material que não acaba mais... Falow Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente Doc x Pdf
José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática
Re: [delphi-br] Como testar se um valor é int eiro
João não tive sucesso ! Joao Morais escreveu: Odail Della Niesi Junior wrote: Tenho um valor do tipo Variant, preciso testá-lo se é um inteiro ou não. Agradeço antecipadamente a ajuda dos Colegas. if VarType(SeuVariant) = varInteger then -- Joao Morais -- []s, Odail Della Niesi Junior São Pedro-SP
Re: [delphi-br] Como testar se um valor é inteiro
João usou a elegância, vamos usar o método tosco.. Function IsInteger( Value:Variant ):Boolean; begin try StrToint( value ); Result := True; except Result := False; end; end; tem uma função que verifica isso, ha pouco tempo alguém perguntou e o Rubem respondeu. 2008/9/24 Odail Della Niesi Junior [EMAIL PROTECTED] João não tive sucesso ! Joao Morais escreveu: Odail Della Niesi Junior wrote: Tenho um valor do tipo Variant, preciso testá-lo se é um inteiro ou não. Agradeço antecipadamente a ajuda dos Colegas. if VarType(SeuVariant) = varInteger then -- Joao Morais -- []s, Odail Della Niesi Junior São Pedro-SP -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como testar se um valor é int eiro
Eduardo Silva dos Santos wrote: João usou a elegância, vamos usar o método tosco.. Function IsInteger( Value:Variant ):Boolean; begin try StrToint( value ); Result := True; except Result := False; end; end; Eduardo, isso não é tosco. Isso é medonho. Odail, você sequer disse o que não deu certo. Pode ser mais específico? -- Joao Morais tem uma função que verifica isso, ha pouco tempo alguém perguntou e o Rubem respondeu. 2008/9/24 Odail Della Niesi Junior [EMAIL PROTECTED] João não tive sucesso ! Joao Morais escreveu: Odail Della Niesi Junior wrote: Tenho um valor do tipo Variant, preciso testá-lo se é um inteiro ou não. Agradeço antecipadamente a ajuda dos Colegas. if VarType(SeuVariant) = varInteger then -- Joao Morais -- []s, Odail Della Niesi Junior São Pedro-SP
Re: [delphi-br] Criar componente de classe indefinida/dinâmica
Guilherme Augusto wrote: Agora, minha dúvida é a seguinte: Porém, a parte do Novo := GetClass(EdClasse.Text);está me retornando Null porque ainda não registrei a classe. Aí, a minha dúvida é: Vou precisar colocar Novo := TEdit; Novo := TLabel; etc... para todas as classes que eu quiser usar antes de tentar ver os ascendentes?? Poque quando eu faço isso ele funciona!! Ou como eu faço para a minha String EdClasses.Text virar uma TPersistentClass?? O GetClass só vai achar o que você registrar. A medida em que você instancia forms, o próprio delphi vai registrar algumas classes de forma automática, mas você não tem nenhuma garantia. O ideal é registrar tudo antes de usar o getclass. Outra coisa: o create é virtual apenas de TComponent para baixo, então você vai precisar fazer outro truque para criar componentes em runtime: if VClass.InheritsFrom(TComponent) then VObj := TComponentClass(VClass).Create() else // não é um TComponent No entanto, se você só precisa saber quem é a superclasse, você não precisa criar a instância; o ponteiro da classe é suficiente. -- Joao Morais
[delphi-br] manter o menu clikado
trabalhei numa empresa que no sistema que a gente fazia la.. ao clikar num item de um menu e abrir outro form ao voltar pro menu principal ele mantia o menu do mesmo jeito... exemplo.. arquivoseditareditar arquivo de mala direta.. ao clikar nesse item de menu que veio de um submenu.. abre a janela de editar mala direta.. ao voltar pro form princial ele vai estar com o menu aberto e selecionado no arquivoseditareditar arquivo de mala direta como fazer isso? t+ -- --- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. --- [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Hexa para imagem
Olá, você tem que transformar o Hexadecimal para Binário e salvar com o nome de um arquivo com a extensão, ele era antes um BMP, salva com o nome e a extensão .BMP, era um JPG... Pois. Robson Tazinaffo escreveu: Como converter hexadecimal para imagem e jogar em um TImage
Re: [delphi-br] manter o menu clikado
A última vez que vi isso foi em um sistema em Clipper, nunca vi esse comportamento em sistemas em modo gráfico. 2008/9/24 Rafael Jorge [EMAIL PROTECTED] trabalhei numa empresa que no sistema que a gente fazia la.. ao clikar num item de um menu e abrir outro form ao voltar pro menu principal ele mantia o menu do mesmo jeito... exemplo.. arquivoseditareditar arquivo de mala direta.. ao clikar nesse item de menu que veio de um submenu.. abre a janela de editar mala direta.. ao voltar pro form princial ele vai estar com o menu aberto e selecionado no arquivoseditareditar arquivo de mala direta como fazer isso? t+ -- -- Rafael jorge alves (Analista/desenvolvedor) www.sistemafocus.com.br sistema focus de gestão comercial e serviços em informatica. -- [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente Doc x Pdf
Passa o link aonde baixa ele que é melhor. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Luciano Angelini - uol To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:16 PM Subject: Re: [delphi-br] Componente Doc x Pdf José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Ajuda
Olá pessoal, Wesley, o pacote JEDI tem um componente próprio p isso (JvWizard) tipo o do InnoSetup, e tem um exemplo demonstrativo. Eu uso a versão JVCL333CompleteJCL1101-Build2725, acho mais estável, pelo menos para o meu BDS2006. Link para baixar o pacote: http://sourceforge.net/project/showfiles.php?group_id=45786package_id=42327 Um abraço a todos! Silvio Clécio - Mensagem original De: BandaLemuel [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 24 de Setembro de 2008 8:43:16 Assunto: [delphi-br] Ajuda Pessoal Bom dia, existe algum componente que tem a mesma função do PageControl mas que não mostra os botoes ou abas ??? Preciso fazer um esquema como se fosse um programa de instalação... vlw.. Wesley . Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Erro no BDE ao fechar 2 objetos TStoredProc ou TQuery consecutivamente
Olá, galera... Seguinte: o problema é cascudo! Em uma determinada aplicação desenvolvida em Delphi3 tenho objetos TStoredProc e TQuery manipulando informações no BD (Oracle 10g Enterprise) via Oracle Client 9.0. Até aí, tudo bem. A aplicação é legada e NÃO há como migrá-la para uma versão mais atual do Delphi sem impactar em nosso cronograma. Digo isso para que respostas como muda pro Delphi 2007 ou usa o ODAC, as quais não ajudam em nada, não apareçam. Voltando ao caso, em 'n' formulários tenho objetos TQuery e TStoredProc instanciados e trabalhando normalmente. Porém, em certas situações, eles teimam em causar problemas. Em certas máquinas, a execução de dois métodos Close em dois componentes distintos (TQuery ou TStoredProc, isso independe) simplesmente encerra a aplicação! Isso sem nenhuma mensagem de exceção. Debugando a aplicação, me deparei com uma mensagem *INFORMATIVA* de violação de acesso! O texto da mensagem é este: access violation at 0x4da2ed3d: read of address 0xffaaadcc 83 3A 00 74 63 E8 39 10 00 00 64 8B Exatamente como aparece na caixa de mensagem. Após clicar em ok, a aplicação é encerrada. Em uma consulta ao google, a pesquisa pelo código de erro me retornou isto [1]. Alguém tem alguma idéia de como resolver (ou contornar, mesmo com POG) este problema? Reitero: respostas como muda pro Delphi 2007 ou usa o ODAC não ajudam. Dentre uma das tentativas, tentamos compilar a aplicação em Delphi7, mas o problema persiste. Tenho a alternativa de usar o ODAC, mas, como já disse, o impacto no nosso cronograma seria gigantesco, pois esta é a maior de todas as nossas aplicações em produção. Abraços e espero ter sido claro o suficiente (se não fui, me desculpem e, por favor, me questionem)... [1] - http://www.google.com.br/search?hl=pt-BRrlz=1G1GGLQ_PT-BRBR293q=0x4da2ed3dbtnG=Pesquisarmeta= -- --- Att.: Willian Jhonnes L. dos Santos Analista/Desenvolvedor Object/Free Pascal [EMAIL PROTECTED] --- Seja livre. Use Linux. Grupo de Usuários GNU/Linux de São José dos Pinhais Linux user number 449753 --- Powered by Slackware Linux 12.0 Kernel 2.6.21.5-custom ---
Re: [delphi-br] manter o menu clikado
Boa tarde Rafael... Cara, eu sei que tem como sim e é muito fácil... Até tenho isso em casa... Quando chegar lá eu posto aqui pra vc... Caso alguém não o faça antes... Abraços Guilherme Augusto --- Em qua, 24/9/08, Rafael Jorge [EMAIL PROTECTED] escreveu: De: Rafael Jorge [EMAIL PROTECTED] Assunto: [delphi-br] manter o menu clikado Para: delphi-br delphi-br@yahoogrupos.com.br Data: Quarta-feira, 24 de Setembro de 2008, 17:06 trabalhei numa empresa que no sistema que a gente fazia la.. ao clikar num item de um menu e abrir outro form ao voltar pro menu principal ele mantia o menu do mesmo jeito... exemplo.. arquivoseditar editar arquivo de mala direta.. ao clikar nesse item de menu que veio de um submenu.. abre a janela de editar mala direta.. ao voltar pro form princial ele vai estar com o menu aberto e selecionado no arquivoseditar editar arquivo de mala direta como fazer isso? t+ -- - - - - - - Rafael jorge alves (Analista/desenvolv edor) www.sistemafocus. com.br sistema focus de gestão comercial e serviços em informatica. - - - - - - [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Erro no BDE ao fechar 2 objetos TStoredProc ou TQuery consecutivamente
Willian Jhonnes L. dos Santos wrote: Olá, galera... Seguinte: o problema é cascudo! Em uma determinada aplicação desenvolvida em Delphi3 tenho objetos TStoredProc e TQuery manipulando informações no BD (Oracle 10g Enterprise) via Oracle Client 9.0. Até aí, tudo bem. A aplicação é legada e NÃO há como migrá-la para uma versão mais atual do Delphi sem impactar em nosso cronograma. Digo isso para que respostas como muda pro Delphi 2007 ou usa o ODAC, as quais não ajudam em nada, não apareçam. Voltando ao caso, em 'n' formulários tenho objetos TQuery e TStoredProc instanciados e trabalhando normalmente. Porém, em certas situações, eles teimam em causar problemas. Em certas máquinas, a execução de dois métodos Close em dois componentes distintos (TQuery ou TStoredProc, isso independe) simplesmente encerra a aplicação! Isso sem nenhuma mensagem de exceção. Debugando a aplicação, me deparei com uma mensagem *INFORMATIVA* de violação de acesso! O texto da mensagem é este: access violation at 0x4da2ed3d: read of address 0xffaaadcc 83 3A 00 74 63 E8 39 10 00 00 64 8B Praticamente certo de que alguém está tentando usar um objeto que já foi destruído. Exatamente como aparece na caixa de mensagem. Após clicar em ok, a aplicação é encerrada. Em uma consulta ao google, a pesquisa pelo código de erro me retornou isto [1]. Não ajuda, isso é meramente um endereço de memória. Alguém tem alguma idéia de como resolver (ou contornar, mesmo com POG) este problema? Reitero: respostas como muda pro Delphi 2007 ou usa o ODAC não ajudam. Dentre uma das tentativas, tentamos compilar a aplicação em Delphi7, mas o problema persiste. Tenho a alternativa de usar o ODAC, mas, como já disse, o impacto no nosso cronograma seria gigantesco, pois esta é a maior de todas as nossas aplicações em produção. Se o problema aparece em Delphi 7, então é certo que está na sua aplicação. Do contrário, numa hipótese muito remota, poderia ser bug da vcl. Dica: ligue as informações de debug da sua aplicação e use as units com informações de debug: project | options | compiler | use debug dcu. Quando o erro pipocar, veja um backtrace (Ctrl+F3) e use a criatividade para tentar adivinhar quem está apontando para o objeto destruído. Boa sorte. -- Joao Morais Abraços e espero ter sido claro o suficiente (se não fui, me desculpem e, por favor, me questionem)... [1] - http://www.google.com.br/search?hl=pt-BRrlz=1G1GGLQ_PT-BRBR293q=0x4da2ed3dbtnG=Pesquisarmeta=
Re: [delphi-br] Componente Doc x Pdf
Até onde sei o PDFFactory PRO não é free... tme um custo de $99 (dolares...) http://www.fineprint.com/products/pdffactory/index.html http://www.fineprint.com/ http://www.google.com.br/search?rlz=1C1CHMG_pt-BRsourceid=chromeie=UTF-8q=pdf+factory+pro []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9175) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26 --- From: Walter Chagas Jr (BOL) Sent: Wednesday, September 24, 2008 4:51 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Componente Doc x Pdf Passa o link aonde baixa ele que é melhor. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Luciano Angelini - uol To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:16 PM Subject: Re: [delphi-br] Componente Doc x Pdf José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Conexão no SqlDataSet logando em DB diferente
Boa a noite a todos! Senhores, tenho alguns projetos para estudar o desenvolvimento de um novo sistema, e adicionei alguns bancos de dados de outros sistemas em minha máquina, para estudo. Ai começa o problema. Nestes bancos existem tabelas com o mesmo nome (usuario, unidade etc)e quando rodo o sistema pelo executável, sem problemas, mas quando executo para verificação de rotina, um SqlDataSet que uso para consulta, pega outras tabelas de outros bancos e me da um erro. A conexão com o DB correto no SqlConnection é feita através de arquivo .Ini. e os DB's são em MySql. Como evitar que este SqlDataSet pega tabelas de bancos que não tem nada a ver? Espero que tenha me fazido entender... Fraterno abraço a todos, Carlos
Re: [delphi-br] Componente Doc x Pdf
http://sourceforge.net/projects/pdfcreator/ 2008/9/24 Luiz ESCobar [EMAIL PROTECTED] Até onde sei o PDFFactory PRO não é free... tme um custo de $99 (dolares...) http://www.fineprint.com/products/pdffactory/index.html http://www.fineprint.com/ http://www.google.com.br/search?rlz=1C1CHMG_pt-BRsourceid=chromeie=UTF-8q=pdf+factory+pro []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9175) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26 --- From: Walter Chagas Jr (BOL) Sent: Wednesday, September 24, 2008 4:51 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Componente Doc x Pdf Passa o link aonde baixa ele que é melhor. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Luciano Angelini - uol To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:16 PM Subject: Re: [delphi-br] Componente Doc x Pdf José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [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 -- Abs Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente Doc x Pdf
De fato, o caboclo lá falou que era Free mas é aqule Free. Como eu não o conhecia (O componente), achei que ele tava falando a verdade. Aí é foda cara. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Luiz ESCobar To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 5:33 PM Subject: Re: [delphi-br] Componente Doc x Pdf Até onde sei o PDFFactory PRO não é free... tme um custo de $99 (dolares...) http://www.fineprint.com/products/pdffactory/index.html http://www.fineprint.com/ http://www.google.com.br/search?rlz=1C1CHMG_pt-BRsourceid=chromeie=UTF-8q=pdf+factory+pro []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9175) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26 -- From: Walter Chagas Jr (BOL) Sent: Wednesday, September 24, 2008 4:51 PM To: delphi-br@yahoogrupos.com.br Subject: Re: [delphi-br] Componente Doc x Pdf Passa o link aonde baixa ele que é melhor. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] SKYPE: WalterChagasJr - Original Message - From: Luciano Angelini - uol To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:16 PM Subject: Re: [delphi-br] Componente Doc x Pdf José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] manter o menu clikado
Já tentou a propriedade AutoCheck dos itens do Menu??? Seta para True JM 2008/9/24 Guilherme Augusto [EMAIL PROTECTED] Boa tarde Rafael... Cara, eu sei que tem como sim e é muito fácil... Até tenho isso em casa... Quando chegar lá eu posto aqui pra vc... Caso alguém não o faça antes... Abraços Guilherme Augusto --- Em qua, 24/9/08, Rafael Jorge [EMAIL PROTECTED]rafael.jorge%40gmail.com escreveu: De: Rafael Jorge [EMAIL PROTECTED] rafael.jorge%40gmail.com Assunto: [delphi-br] manter o menu clikado Para: delphi-br delphi-br@yahoogrupos.com.brdelphi-br%40yahoogrupos.com.br Data: Quarta-feira, 24 de Setembro de 2008, 17:06 trabalhei numa empresa que no sistema que a gente fazia la.. ao clikar num item de um menu e abrir outro form ao voltar pro menu principal ele mantia o menu do mesmo jeito... exemplo.. arquivoseditar editar arquivo de mala direta.. ao clikar nesse item de menu que veio de um submenu.. abre a janela de editar mala direta.. ao voltar pro form princial ele vai estar com o menu aberto e selecionado no arquivoseditar editar arquivo de mala direta como fazer isso? t+ -- - - - - - - Rafael jorge alves (Analista/desenvolv edor) www.sistemafocus. com.br sistema focus de gestão comercial e serviços em informatica. - - - - - - [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas] -- Jhosef Marks de Carvalho Delphi Developer http://groups.google.com/group/soumaisdelphi [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Invalid datatype - Delphi 2007
É sempre falei q migrar de uma versão para outra, sempre foi problema, por isso que o que tenho em uma em matenho até num dá mais. hehehehe TALVEZ quando meu D6 e o D7 não instalar mais em versões novas do Windows, ai eu faça uma migração para um D mais novo Ou já parto para WEB (PHP) []s Luiz Escobar - Original Message - From: Edson Marco To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 11:43 AM Subject: [delphi-br] Invalid datatype - Delphi 2007 Olá pessoal! Estou migrando o projeto do D2005 para o D2007... putz! Que dor de cabeça! Para ajudar o projeto utiliza DBExpress e Firebird, então já sabem do problema do driver. Eu consegui resolver o problema dos campos blob fazendo um downgrade do driver dbxint30.dll para o do D2006. Funcionou perfeitamente. Agora, estou com um problemão com o SQLDataSet. Malditos DBX. Ele está configurado como ctStoredProc, e após passar os parametros, dou um ExecSQL; Ai a mensagem de erro: Invalid command Data type unknown. Tentei com os parametros definidos na lista de parametros, sem definir... voltei o driver para o do D2007 e nada! Mesmo erro. Valew! -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] * http://www.edmafer.com.br */ [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] Hexa para imagem
Pera ai, acho que ele quer criar um número HEXA e transformar ele numa imagem. Tipo fazer a imagem de um numero HEXA.. http://delphimasters.blogspot.com/2007/03/esta-uma-dica-bastante-interessante.html acho q aqui ja da pra ter uma idéia.. se não for isso então, desculpa ai, e esquece o q eu disse... abraços... Luiz Escobar - Original Message - From: Onjahyr - GMAIL To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:48 PM Subject: Re: [delphi-br] Hexa para imagem Olá, você tem que transformar o Hexadecimal para Binário e salvar com o nome de um arquivo com a extensão, ele era antes um BMP, salva com o nome e a extensão .BMP, era um JPG... Pois. Robson Tazinaffo escreveu: Como converter hexadecimal para imagem e jogar em um TImage [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Invalid datatype - Delphi 2007
Luiz, eu migrei do Delphi 7 para o 2007 sem problemas, mas também não tenho um TField Adicionado as minhas Queries... nosso amigo Wednesday que se prepare para remover e adicionar todos os TField dos SQLDataSet dele uma coisa que eu não largo é o MyDAC, você pode fazer o sistema com MyDAC 1 e migrar para 5 que vai rodar tranquilo, agora com DBExpress, a coisa ja é diferente, mais uma prova disso estamos vendo agora. 2008/9/24 Luiz Escobar [EMAIL PROTECTED] É sempre falei q migrar de uma versão para outra, sempre foi problema, por isso que o que tenho em uma em matenho até num dá mais. hehehehe TALVEZ quando meu D6 e o D7 não instalar mais em versões novas do Windows, ai eu faça uma migração para um D mais novo Ou já parto para WEB (PHP) []s Luiz Escobar - Original Message - From: Edson Marco To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, September 24, 2008 11:43 AM Subject: [delphi-br] Invalid datatype - Delphi 2007 Olá pessoal! Estou migrando o projeto do D2005 para o D2007... putz! Que dor de cabeça! Para ajudar o projeto utiliza DBExpress e Firebird, então já sabem do problema do driver. Eu consegui resolver o problema dos campos blob fazendo um downgrade do driver dbxint30.dll para o do D2006. Funcionou perfeitamente. Agora, estou com um problemão com o SQLDataSet. Malditos DBX. Ele está configurado como ctStoredProc, e após passar os parametros, dou um ExecSQL; Ai a mensagem de erro: Invalid command Data type unknown. Tentei com os parametros definidos na lista de parametros, sem definir... voltei o driver para o do D2007 e nada! Mesmo erro. Valew! -- /* * Edson Marco Ferrari Junior * [EMAIL PROTECTED] edmafer%40edmafer.com.br * http://www.edmafer.com.br */ [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Componente Doc x Pdf
Acho que ta havendo um equívoco, o nosso colega perguntou se alguém conhece algum *Componente*, que converta .DOC para PDF e Free, sinceramente eu acho que vai ser complicado achar algum componente que faça isso e ainda 0800. agora software que instala uma impressora e ao imprimir nela gera um PDF tem um monte... o PrimoPDF é um exemplo http://www.primopdf.com/ José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, 2008/9/24 Daniel Bastos [EMAIL PROTECTED] http://sourceforge.net/projects/pdfcreator/ 2008/9/24 Luiz ESCobar [EMAIL PROTECTED]escobar%40megasistema.com.br Até onde sei o PDFFactory PRO não é free... tme um custo de $99 (dolares...) http://www.fineprint.com/products/pdffactory/index.html http://www.fineprint.com/ http://www.google.com.br/search?rlz=1C1CHMG_pt-BRsourceid=chromeie=UTF-8q=pdf+factory+pro []s Luiz Escobar - Analista/Desenvolvedor: WEB - HTML/JavaScript/PHP/MySQL WINDOWS - Delphi/ASSEMBLY/MySQL/xBase SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP HARBOUR -- Borland C++ 5.5.1 (32 bit) Harbour 1.0.0 Intl. (Rev. 9175) xHarbour Compile build 1.1.0 (Simplex) Harbour MiniGUI 1.5 Extended Edition (Build 55) - 2008.08.26 -- From: Walter Chagas Jr (BOL) Sent: Wednesday, September 24, 2008 4:51 PM To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] Componente Doc x Pdf Passa o link aonde baixa ele que é melhor. []s Walter Alves Chagas Junior Belo Horizonte - MG - Brazil [EMAIL PROTECTED] wchagasj%40bol.com.br http://www.geocities.com/SiliconValley/Bay/1058 http://delphitocorporerm.blogspot.com/ MSN: [EMAIL PROTECTED] whitesockets%40hotmail.com SKYPE: WalterChagasJr - Original Message - From: Luciano Angelini - uol To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Sent: Wednesday, September 24, 2008 4:16 PM Subject: Re: [delphi-br] Componente Doc x Pdf José ... eu uso o PDF Factory Pro ele é free vc instala ele .. seria o mesmo que vc tivesse instalado uma impressora ... no word ... vc pede pra imprimi e escolha a impressora: PDF Factory Pro Caso vc queira me manda seu email ou até mesmo pelo msn: [EMAIL PROTECTED] lucianoangelini%40msn.com ... que eu te mando é pequeno 1.5 Mb ... Espero ter ajudado !!! Luciano Angelini Prefeitura de Lupionópolis-Pr === José Ferreira S. Filho escreveu: Caros colegas, Por gentileza algum colega do grupo conhece ulgum componente free para delphi que converta um arquivo Doc em Pdf. grato, José Ferreira Beccasoft Informática __ Informação do ESET NOD32 Antivirus, versão da vacina 3469 (20080924) __ A mensagem foi verificada pelo ESET NOD32 Antivirus. http://www.eset.com [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 -- Abs Daniel A. Bastos [As partes desta mensagem que não continham texto foram removidas] -- ... Eduardo Silva dos Santos DRD SISTEMAS (27) 3218-4201 MSN: [EMAIL PROTECTED] Site: http://www.drdsistemas.com.br/ ... [As partes desta mensagem que não continham texto foram removidas]