[delphi-br] Criando DLL
Pessoal,
Preciso criar uma DLL que se conecta a uma base SQL Server e gere um
Relatório em PDF.
Eu sei como fazer tudo isso, esse não é o problema, o que está me faltando
mesmo é um pouco de conhecimento referente a parte de DLL's mesmo.
Seguinte:
Criei o meu projeto DLL conforme abaixo:
library minhadll;
uses
SysUtils,
Classes,
uPrincipal in 'uPrincipal.pas' {frmPrincipal},
uRelatorio in 'uRelatorio.pas' {Rep: TQuickRep};
{$R *.res}
Procedure GeraPDF( Servidor, Tipo: String ); stdcall;
begin
frmPrincipal.GeraRelatorio( Servidor, Tipo );
end;
exports GeraPDF;
end.
Como vocês podem ver tenho duas Units no meu projeto. Uma é somente um form
para eu colocar os componentes que necessito, no Caso o ADOConnection,
ADOQuery e um outro que uso para exportar para PDF. A outra unit é um
Report.
Ao debugar bem na linha abaixo:
frmPrincipal.GeraRelatorio( Servidor, Cliente, Tipo, Dir, DataIni, DataFim
);
recebo um erro de access violation. Como as minhas ações estão no form
frmPrincipal e o erro acontece justamente ao chamar algo que está nele,
percebi que estava faltando eu criar o form. Aí tentei de todos os jeitos e
não consegui. O que está faltando eu declarar para que eu possa utilizar o
form frmPrincipal.
Para criar o frmPrincipal tentei um dos dois códigos abaixo:
Forma 1:
Application.CreateForm( TfrmPrincipal, frmPrincipal ) ;
Forma 2:
If frmPrincipal = Nil Then frmPrincipal := TfrmPrincipal.Create( Self )
;
Poderiam me ajudar
Att,
Marcelo A. Souza
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Criando DLL
Será que ninguém pode me ajudar???
Marcelo.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de Marcelo Alves de Souza
Enviada em: segunda-feira, 22 de maio de 2006 12:26
Para: delphi-br@yahoogrupos.com.br
Assunto: [delphi-br] Criando DLL
Pessoal,
Preciso criar uma DLL que se conecta a uma base SQL Server e gere um
Relatório em PDF.
Eu sei como fazer tudo isso, esse não é o problema, o que está me faltando
mesmo é um pouco de conhecimento referente a parte de DLL's mesmo.
Seguinte:
Criei o meu projeto DLL conforme abaixo:
library minhadll;
uses
SysUtils,
Classes,
uPrincipal in 'uPrincipal.pas' {frmPrincipal},
uRelatorio in 'uRelatorio.pas' {Rep: TQuickRep};
{$R *.res}
Procedure GeraPDF( Servidor, Tipo: String ); stdcall; begin
frmPrincipal.GeraRelatorio( Servidor, Tipo ); end;
exports GeraPDF;
end.
Como vocês podem ver tenho duas Units no meu projeto. Uma é somente um form
para eu colocar os componentes que necessito, no Caso o ADOConnection,
ADOQuery e um outro que uso para exportar para PDF. A outra unit é um
Report.
Ao debugar bem na linha abaixo:
frmPrincipal.GeraRelatorio( Servidor, Cliente, Tipo, Dir, DataIni, DataFim
);
recebo um erro de access violation. Como as minhas ações estão no form
frmPrincipal e o erro acontece justamente ao chamar algo que está nele,
percebi que estava faltando eu criar o form. Aí tentei de todos os jeitos e
não consegui. O que está faltando eu declarar para que eu possa utilizar o
form frmPrincipal.
Para criar o frmPrincipal tentei um dos dois códigos abaixo:
Forma 1:
Application.CreateForm( TfrmPrincipal, frmPrincipal ) ;
Forma 2:
If frmPrincipal = Nil Then frmPrincipal := TfrmPrincipal.Create( Self )
;
Poderiam me ajudar
Att,
Marcelo A. Souza
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Vaga Programador Delphi - Complemento [OFF-TOPIC]
Precisa ser local. Dúvidas me chame em pvt. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de [EMAIL PROTECTED] Enviada em: segunda-feira, 6 de março de 2006 10:29 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Vaga Programador Delphi - Complemento [OFF-TOPIC] Marcelo, existe a possibilidade de trabalhar remotamente ? ou tem q residir na cidade de Guarulhos realmente ? Sou de Piracicaba Interior e preencho todos os requitos abaixo. Obrigado. Samuel R. Campos. - Original Message - From: Marcelo Alves de Souza [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Friday, March 03, 2006 4:45 PM Subject: [delphi-br] Vaga Programador Delphi - Complemento Prezados, Segue a Vaga abaixo para os interessados: Programador Delphi CLT p/ atuar em Guarulhos - SP (Centro) Requisitos: - Mínimo de 01 ano de experiência em Delphi - Banco de Dados Firebird e SQL Server - Criação de Stored Procedures - Utilização dos componentes IBX e ADO - Bons conhecimentos em arquitetura Cliente/Servidor - Disponibilidade para viagens Salário: R$ 1.800,00 + Benefícios Aos interessados enviar CV para análise em pvt. Att, Marcelo A. Souza Supervisor de Desenvolvimento Grupo Aleff -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.1.375 / Virus Database: 268.2.0/275 - Release Date: 6/3/2006 -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Vaga Programador Delphi
Prezados, Segue a Vaga abaixo para os interessados: Programador Delphi CLT p/ atuar em Guarulhos - SP (Centro) Requisitos: - Mínimo de 01 ano de experiência em Delphi - Banco de Dados Firebird e SQL Server - Criação de Stored Procedures - Utilização dos componentes IBX e ADO - Bons conhecimentos em arquitetura Cliente/Servidor - Disponibilidade para viagens Salário: R$ 1.800,00 + Benefícios Att, Marcelo A. Souza Supervisor de Desenvolvimento Grupo Aleff -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Vaga Programador Delphi - Complemento
Prezados, Segue a Vaga abaixo para os interessados: Programador Delphi CLT p/ atuar em Guarulhos - SP (Centro) Requisitos: - Mínimo de 01 ano de experiência em Delphi - Banco de Dados Firebird e SQL Server - Criação de Stored Procedures - Utilização dos componentes IBX e ADO - Bons conhecimentos em arquitetura Cliente/Servidor - Disponibilidade para viagens Salário: R$ 1.800,00 + Benefícios Aos interessados enviar CV para análise em pvt. Att, Marcelo A. Souza Supervisor de Desenvolvimento Grupo Aleff -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] TIRAR FOTO
Walter, Na Verdade ele estava reclamando da Própria unit Twain. Renomeei a mesma e alterei a chamada na uses das outras units e aí rolou blz. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: segunda-feira, 6 de fevereiro de 2006 09:43 Para: 'delphi-br@yahoogrupos.com.br' Assunto: RES: [delphi-br] TIRAR FOTO Ô vei, isso daí tá parecendo uma recursividade da própria Unit ou ela está chamando esta unit duas vezes nos dois Uses diferentes. Verique: 1) Se nas cláusulas uses, da Unit Twain.pas, não está havendo uma declaração do tipo Twain (Eu acho o mais provável isto estar acontecendo) 2) Se em uma unit qualquer do pacote, não há uma declaração do tipo Twain no Uses lá no topo da unit (após a cláusula interface e após a cláusula implementation também []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Marcelo Alves de Souza Enviada em: domingo, 5 de fevereiro de 2006 22:34 Para: delphi-br@yahoogrupos.com.br Assunto: RES: [delphi-br] TIRAR FOTO Amigo, Quando tento instalar esse componente aparece o seguinte erro: [Fatal Error] Twain.pas(1): Program or unit 'Twain.pas' recursively uses itself Sabe como resolver? Uso Delhi 7. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sexta-feira, 3 de fevereiro de 2006 16:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TIRAR FOTO Tem um componente TDelphiTwain se não me engano, que é bem interessante... funciona pra webcam e pra scanner e é free... http://delphitwain.sourceforge.net/ bene20032004 wrote: Pessoal, tenho um sistema de controle de curriculum e gostaria de saber se é possível, atraves do programa ,usando um componenete,tirar a foto e gravar em uma determinada pasta. Porque atualmente eu uso o programa da propria webcan, para tirar foto , mas o meu cliente quer tirar a foto do meu programa. É possível ? Agradeço desde ja! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] TIRAR FOTO
Pior que não está... Já olhei isso. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Filipe Enviada em: segunda-feira, 6 de fevereiro de 2006 09:33 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TIRAR FOTO Veja se a unit que dá o erro não está adicionada na sua própria cláusula Uses. []'s Filipe Geyer - Original Message - From: Marcelo Alves de Souza To: delphi-br@yahoogrupos.com.br Sent: Sunday, February 05, 2006 10:33 PM Subject: RES: [delphi-br] TIRAR FOTO Amigo, Quando tento instalar esse componente aparece o seguinte erro: [Fatal Error] Twain.pas(1): Program or unit 'Twain.pas' recursively uses itself Sabe como resolver? Uso Delhi 7. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sexta-feira, 3 de fevereiro de 2006 16:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TIRAR FOTO Tem um componente TDelphiTwain se não me engano, que é bem interessante... funciona pra webcam e pra scanner e é free... http://delphitwain.sourceforge.net/ bene20032004 wrote: Pessoal, tenho um sistema de controle de curriculum e gostaria de saber se é possível, atraves do programa ,usando um componenete,tirar a foto e gravar em uma determinada pasta. Porque atualmente eu uso o programa da propria webcan, para tirar foto , mas o meu cliente quer tirar a foto do meu programa. É possível ? Agradeço desde ja! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Tirar Foto
Pessoal, Alguém tem aí o Componente TVideoServer que é utilizado no exemplo enviado pelo Ferreira??? Ele disponibilizou um exemplo na Sexta-Feira dizendo que era do Componente DSPack mas não é. Marcelo. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] TIRAR FOTO
Amigo, Quando tento instalar esse componente aparece o seguinte erro: [Fatal Error] Twain.pas(1): Program or unit 'Twain.pas' recursively uses itself Sabe como resolver? Uso Delhi 7. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Denner Bizarria Branco Enviada em: sexta-feira, 3 de fevereiro de 2006 16:35 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] TIRAR FOTO Tem um componente TDelphiTwain se não me engano, que é bem interessante... funciona pra webcam e pra scanner e é free... http://delphitwain.sourceforge.net/ bene20032004 wrote: Pessoal, tenho um sistema de controle de curriculum e gostaria de saber se é possível, atraves do programa ,usando um componenete,tirar a foto e gravar em uma determinada pasta. Porque atualmente eu uso o programa da propria webcan, para tirar foto , mas o meu cliente quer tirar a foto do meu programa. É possível ? Agradeço desde ja! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Vaga Programador Delphi - Urgente
Já está lá também. Marcelo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Walter Alves Chagas Junior Enviada em: terça-feira, 17 de janeiro de 2006 09:40 Para: 'delphi-br@yahoogrupos.com.br' Assunto: RES: [delphi-br] Vaga Programador Delphi - Urgente Marcelo. Poste esta mensagem também na lista delphi-empregos [EMAIL PROTECTED] []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Marcelo Alves de Souza Enviada em: segunda-feira, 16 de janeiro de 2006 21:22 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Vaga Programador Delphi - Urgente Prezados, Segue a Vaga abaixo para os interessados: Programador Delphi CLT p/ atuar em Guarulhos - SP (Centro) Requisitos: - Mínimo de 01 ano de experiência - Banco de Dados Firebird e SQL Server - Criação de Stored Procedures - Utilização dos componentes IBX e ADO - Bons conhecimentos em arquitetura Cliente/Servidor - Disponibilidade para viagens Os interessados devem mandar CV no corpo do e-mail com a Pretensão Salarial (não aceitaremos anexos) para [EMAIL PROTECTED] com VagaDelhpi2006 no assunto. Att, Marcelo A. Souza Aleff Sistemas www.aleff.com.br [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Criar o Alias do BDE pelo Inno Setup
Pessol, infelizmente ainda tenho clientes que usam paradox e estou
precisando criar um instalador do meu sistema, mas estou na dúvida de como
passar o path de onde estão as tabelas paradox do meu sistema. Estou usando
um exemplo onde o Inno Setup instala o BDE, registra usando o MiniReg.exe e
usa o AddAlias.exe para criar o alias.
Veja o meu bloco Run
[Run]
Filename: {tmp}\MiniReg.exe; Parameters: {tmp}\BdeInst.dll
Filename: {tmp}\AddAlias.exe
Bom, creio que está faltando algum parâmetro quando mando rodar o AddAlias
na linha abaixo:
Filename: {tmp}\AddAlias.exe
ou eu tenho que mandar o arquivo para o diretório usando a linha abaixo
Source: AddAlias.exe; DestDir: {app}
ao invés de usar assim:
Source: AddAlias.exe; DestDir: {tmp}
Porque desse jeito ele configurou o path como sendo o diretório temporário
onde o AddAlias.exe foi extraído.
Att,
Marcelo A. Souza
Aleff Sistemas
(11) 6440-7758
www.aleff.com.br http://www.aleff.com.br/
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
RES: [delphi-br] Re: Problema com ntdll.dll - Urgente
Pessoal,
Descobrimos o problema, na verdade é só atualizar o D7 pois isso é um dos
100 bugs corrigidos no Update 1.
Marcelo.
-Mensagem original-
De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em
nome de José Henrique (Zote)
Enviada em: quarta-feira, 4 de janeiro de 2006 16:21
Para: delphi-br@yahoogrupos.com.br
Assunto: RE: [delphi-br] Re: Problema com ntdll.dll - Urgente
É uma propriedade do combo, acho que Style ou algo do tipo que não aceita.
Uma solução??!! No lugar de '' use ' ' aqui funcionou ou altere a
propriedade...
Abraço
--
José Henrique (Zote)
-Original Message-
From: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] On
Behalf Of marcelloassouza
Sent: quarta-feira, 4 de janeiro de 2006 16:04
To: delphi-br@yahoogrupos.com.br
Subject: [delphi-br] Re: Problema com ntdll.dll - Urgente
Pessoal, complementando o problema abaixo depois de dar mais umas fuçadas,
percebi que o que ocorre é o seguinte:
Me parece que no delphi 7 o componente combobox não aceita textos em branco
pois é justamente quando eu tento passar um valor de uma posição do combobox
que está em branco que ocorre o erro. Quando o combobox está com todos os
itens preenchidos não ocorre o erro.
Agora como validar se o item é vazio ou não??? Notar abaixo na minha função
que a variável que recebe o valor de cada item da combo é do tipo String.
Att,
Marcelo.
--- Em delphi-br@yahoogrupos.com.br, marcelloassouza
[EMAIL PROTECTED] escreveu
Pessoal,
Temos vários projetos aqui na empresa, mas somente um estou tendo
um
problema com a ntdll.dll.
Os projetos estavam em D5 e agora estamos migrando para D7. Em D7
funcionava muito bem.
Será que alguém poderia me ajudar
Desde já agradeço!!!
O erro que recebo é:
Access Violation at address 7C912FFC in module 'ntdll.dll'. Write
of
adress 004050E1
O estranho é que nem o try except resolve...
Segue a função onde está dando o erro:
procedure ValidaCombo( Sender: TObject ); var
lChar : string ;
lCont : Integer ;
begin
If ( Sender as TComboBox ).Text = '' Then
Exit ;
( Sender as TComboBox ).Text := UpperCase( ( Sender as TComboBox
).Text );
For lCont := 0 To ( Sender as TComboBox ).Items.Count - 1 do
Begin
//Linha onde ocorre o erro
lChar := ( Sender as TComboBox ).Items.Strings[lCont] ;
If UpperCase( lChar ) = UpperCase( ( Sender as TComboBox
).Text ) Then
Exit ;
End ;
Application.MessageBox('Valor do campo invalido, favor
selecionar
um valor da lista', 'Mensagem do Sistema', MB_OK);
( Sender as TComboBox ).Text := '' ;
( Sender as TComboBox ).SetFocus ;
( Sender as TComboBox ).DroppedDown := True ;
end;
Att,
Marcelo.
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Links do Yahoo! Grupos
Received: (qmail 27778 invoked by uid 0); 4 Jan 2006 16:04:24 -0200
Received: from 216.155.203.226 by poseidon.bludata.com.br (envelope-from
[EMAIL PROTECTED]
, uid 0) with qmail-scanner-1.25
(clamdscan: 0.85/974. spamassassin: 3.0.2.
Clear:RC:0(216.155.203.226):SA:0(-2.4/5.0):.
Processed in 8.324709 secs); 04 Jan 2006 18:04:24 -
X-Qmail-Scanner-Mail-From:
[EMAIL PROTECTED]
via poseidon.bludata.com.br
X-Qmail-Scanner: 1.25 (Clear:RC:0(216.155.203.226):SA:0(-2.4/5.0):.
Processed in 8.324709 secs)
Received: from unknown (HELO n6a.bullet.dcn.yahoo.com) (216.155.203.226)
by poseidon.bludata.com.br with SMTP; 4 Jan 2006 16:04:16 -0200
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
DomainKey-Signature: a=a-sha1; q=s; c=fws; s=tel; d=hoogrupos.com.br;
b=DZnJ9JUoSuu8OdExQwbHSi9YBdm8NWu8ZsXzAWHakUqodSB2Bfjkr3Z8ObSrsCRNxNp2EsmYZm
7nxGne7R6ulfZg2QfcwB3wXDyiRLsQnL0xnQ8Mye/5ivhTNKnPtf;
Received: from [216.155.201.65] by n6.bullet.dcn.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -
Received: from [66.218.66.58] by mailer2.bullet.dcn.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -
Received: from [66.218.66.61] by mailer7.bullet.scd.yahoo.com with NNFMP; 04
Jan 2006 18:04:15 -
X-Yahoo-Newman-Property: groups-email
X-Sender: [EMAIL PROTECTED]
X-Apparently-To: delphi-br@yahoogrupos.com.br
Received: (qmail 7488 invoked from network); 4 Jan 2006 18:04:14 -
Received: from unknown (66.218.66.216)
by m35.grp.scd.yahoo.com with QMQP; 4 Jan 2006 18:04:14 -
Received: from unknown (HELO n5a.bullet.scd.yahoo.com) (66.94.237.39)
by mta1.grp.scd.yahoo.com with SMTP; 4 Jan 2006 18:04:14 -
Comment: DomainKeys? See http://antispam.yahoo.com/domainkeys
Received: from [66.218.69.3] by n5.bullet.scd.yahoo.com with NNFMP; 04 Jan
2006 18:04:06 -
Received: from [66.218.66.67] by mailer3.bullet.scd.yahoo.com with NNFMP; 04
Jan 2006 18:04:06 -
To: delphi-br@yahoogrupos.com.br
Message-ID: [EMAIL PROTECTED]
In-Reply-To: [EMAIL PROTECTED]
User-Agent: eGroups-EW/0.82
X-Mailer: Yahoo Groups Message Poster
X-Originating-IP: 66.94.237.39
