Otacílio Ricardo

Segue o código. procedure TForm1.Button1Click(Sender: TObject); Var checkbox:TCheckBox; begin checkbox:=TCheckBox.Create(Self); checkbox.Parent:=ListBox2; checkbox.Name:='Checkbox1'; end;

Entre neste site http://beensoft.blogspot.com/2007/10/fooli...bbrowser-4.html. Espero ter ajudado.

Caro não desista tão fácil... Como um bom escovador de bit que sou... Só desisto depois de morto... Bom, como não tenho Delphi 2009 aqui alguém pode me enviar um link? Estou tendo alguns problemas na instalação no Delphi 2010. Mas tentei somente uma vez.

O RxDBLookupCombo permite lista mais de um campo e quando o usuário digita um valor ele busca na lista este valor. Em alguns casos isso não esta funcionando. Por exemplo: Tenho uma tabela chamada “FUNCIONÁRIO” (select funcionario.id_fun, funcionario.nome, cidade.cidade, estado.estado from funcionario, cidade, estado where funcionario.id_cid=cidade.id_cid and funcionario.id_est=estado.id_est), funciona normalmente, porem quando uso em uma outra tabela não funciona. Somente em uma tabela não esta funcionado. Já delete a tabela e criei novamente, apague todos os índices e crie novamente. Tabela que onde esta ocorrendo o problema. REATE TABLE ESTOQUEITEM ( ID_EST INTEGER NOT NULL, ID_PRO INTEGER, ID_TAM INTEGER, ID_GRU INTEGER, ID_COR INTEGER, QTD INTEGER, QTDTOTE INTEGER, QTDTOTR INTEGER, DT_CAD TIMESTAMP); Se alguém tiver alguma sugestão. Obrigado. Otacílio Ricardo

Estou usando o Indy que já vem instalado no Delphi, mas não estou conseguindo conectar. Alguém pode me ajudar? try Label7.Caption:='Conectando.'; Label7.Update; if IdPOP31.Connected then begin IdPOP31.Disconnect; end; IdPOP31.Host := 'pop.gmail.com'; IdPOP31.Port := 995; IdPOP31.Username := 'teste@gmail.com'; IdPOP31.Password := 'Senha'; IdSSLIOHandlerSocket1.SSLOptions.Method:=sslvSSLv2; IdSSLIOHandlerSocket1.SSLOptions.Mode:=sslmClient; IdPOP31.Connect(0); Label7.Caption:='Conectado.'; Label7.Update; except On E:Exception do Begin Label8.:='Erro : '+E.Message; Label7.Caption:='Problema ao conectar.'; Label7.Update; End; Erro: Erro : Could not load SSL library. Baixei o arquivo openssl-0.9.8e-i386-win32 do site indyproject e também baixei a versão indy_openssl096.zip, copiei as dll para o diretório system32 e dechei uma copia na pasta do projeto, mas infelizmente não funcionou. Estou usando o Indy que já vem instalado no Delphi, mas não estou conseguindo conectar. Alguém pode me ajudar? try Label7.Caption:='Conectando.'; Label7.Update; if IdPOP31.Connected then begin IdPOP31.Disconnect; end; IdPOP31.Host := 'pop.gmail.com'; IdPOP31.Port := 995; IdPOP31.Username := 'teste@gmail.com'; IdPOP31.Password := 'Senha'; IdSSLIOHandlerSocket1.SSLOptions.Method:=sslvSSLv2; IdSSLIOHandlerSocket1.SSLOptions.Mode:=sslmClient; IdPOP31.Connect(0); Label7.Caption:='Conectado.'; Label7.Update; except On E:Exception do Begin Label8.:='Erro : '+E.Message; Label7.Caption:='Problema ao conectar.'; Label7.Update; End; Erro: Erro : Could not load SSL library. Baixei o arquivo openssl-0.9.8e-i386-win32 do site indyproject e também baixei a versão indy_openssl096.zip, copiei as dll para o diretório system32 e dechei uma copia na pasta do projeto, mas infelizmente não funcionou.