Alguém poderia me ajudar a converter esta função?
VB
Public Function binret(s1 As String, i1 As Integer) As Double
Dim l1 As Double
Dim i2 As Integer
Dim i3 As Integer
l1 = 0
For i2 = 1 To i1
i3 = Asc(Mid$(s1, i2, 1))
l1 = l1 + (i3 * (256 ^ (i1 - i2)))
Next
binret
Eu tenho um banco de dados assim:
Tabela de montadoras relacionados a tabela de veículos, relacionados a tabela
de modelos, relacionado a tabela de caracteristicas técnicas (potencia, motor,
etc).
Se interessar me chame em PVT (private).
Um abraço
--- Em dom, 17/5/09, iran_uesb
Olá pessoal tenho uma dúvida em quais componentes usar para inserir/atualizar e
deletar utilizando o mercury (componente acesso ao firebird). Estou usando
procedure no banco de dados. Gostaria de uma idéia.
Atenciosamente,
Ricardo Messias da Silva Rocha
Ciência da Computação - 2009 -
Amigos, estou tendo um problema com um SimpleDataSet e não descubro o erro:
Em uma determinado momento do sistema eu faço uma consulta por data e tudo
corre muito bem, como neste exemplo abaixo:
FrmDm.SdsCadEventos1.Close;
FrmDm.SdsCadEventos1.DataSet.CommandText := 'SELECT CDEVENTO FROM
Valdir,
Tive uma situação parecida com a sua e resolvi criando um procedure.
Veja o código abaixo:
SET TERM ^ ;
CREATE OR ALTER PROCEDURE GEN_EMPRESA (
cod integer = 1)
as
declare variable qtd integer = 0;
begin
select count(RDB$GENERATOR_NAME) from RDB$GENERATORS where
Bom dia a todos, estou tentando instalar o Jedi 3.36 no delphi 2009 nao estou
conseguindo. Alguem tem um tutorial ou como fazer segui os mesmos passos para o
D7 e nao ta dando certo, e o d2009 é o trial que baixei da codegear.
Desde ja agradeço a todos.
Geraldo
bom dia
criei uma splash screeen para meu sistema, ta funcionando porem na
barra de tarefas do windows aparece como se estivesse 2 sistemas abertos.
to utilizando esse codigo:
begin
frmSplash := TfrmSplash.Create(Application) ;
frmSplash.Show;
Application.Initialize;
Salve Geraldo .
O Instalador não funcionou? Dá alguma mensagem? Ou vc ta tentando instalar
manualmente?
O ùnico lugar que tive problemas (E faz muuito tempo, hoje em dia não sei se
ainda da problema) foi num windows 2003, ma s de resto tudo funcionou
beleza.
Se estiver usando o instalador que vem
Bom dia
Gostaria de desenvolver um sistema para Campeonatos de Futebol ..
tipo o campeonato brasileiro 2009, só que não sei nem por onde começar ..
alguem ja desenvolveu um programa assim... gostaria de informações com criar as
tabelas ...
Luciano Angelini
Prefeitura de Lupionópolis-Pr
Creio que será muito difícil alguém te responder, na net, escrever em
caixa alta é GRITAR com quem está lendo!
iran_uesb escreveu:
TENHO UM WEBSERVICE - ISAPI,NELE TEM UM SOAPDATAMODULE E CONSIGO
CONSUMIR OS DADOS DELE NORMALMENTE POREM GOSTARIA DE ACESSAR DADOS
DIRETAMENTE DA
begin
frmSplash := TfrmSplash.Create(Nil);
frmSplash.Show;
Application.Initialize;
Application.CreateForm(TfrmPrincipal, frmPrincipal);
Application.CreateForm(TDMGeral, DMGeral);
Application.CreateForm(TfrmM_Prima, frmM_Prima);
Application.CreateForm(TfrmProdutos, frmProdutos);
ja tentou Utilizar paramByName
--- Em seg, 18/5/09, Vinicius da Silva Pinto vinic...@cnen.gov.br escreveu:
De: Vinicius da Silva Pinto vinic...@cnen.gov.br
Assunto: [delphi-br] Ajuda
Para: delphi-br@yahoogrupos.com.br
Data: Segunda-feira, 18 de Maio de 2009, 9:14
Amigos, estou tendo
Um pequeno aviso: é falta de educação escrever tudo em caixa de alta. Pelas
regras da Netiqueta, isto quer dizer que vc está gritando com o destinatário
da sua mensagem.
Sds.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de iran_uesb
Enviada em: domingo, 17
Que pergunta mais genérica! Assim fica difícil alguém ajudar. Como é esse
programa? Qual a finalidade dele?
O que ele vai controlar? Quem vai usar? Você deve definir o que realmente
quer fazer.
__
Faça ligações para outros computadores com o
Caro Alisson .
Talvez vc não entendeu o que eu quiz dizer
o sistema seria pra gerar a classificação do campéonato ...
tipo o Campeonato brasileiro tem os jogos ... o sistema faz os
calculo dos pontos ...
dos jogos realizados
Alisson escreveu:
Que pergunta mais
é pontos corridos? tem oitavas-de-final?
2009/5/18 Alisson alss...@yahoo.com.br
Que pergunta mais genérica! Assim fica difícil alguém ajudar. Como é esse
programa? Qual a finalidade dele?
O que ele vai controlar? Quem vai usar? Você deve definir o que realmente
quer fazer.
Caro Marcio ...
Como é pra mim ter uma base
vou começar com pontos corridos
Marcio F. Cruz escreveu:
é pontos corridos? tem oitavas-de-final?
2009/5/18 Alisson alss...@yahoo.com.br mailto:alssnco%40yahoo.com.br
Que pergunta mais genérica! Assim fica difícil alguém
O sistema terá 3 funções principais:
1) Cadastro de equipes;
2) Cadastro de jogos e resultados;
3) Relatório de classificação.
Cada jogo, vai poder ter 3 possibilidades... empate, derrota ou empate...
E, deve ser colocado sempre o placar...
Na hora de emitir relatório, calcula-se dinamicamente
é nesta linha
FrmDm.SimpleDataSet1.Params[1].AsDate := MCevento.Date;
FrmDm.SimpleDataSet1.Open;
Agradeço qualquer dica ou ajuda...
Vinicius
__ Informação do NOD32 IMON 4082 (20090518) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
nesta linha
FrmDm.SimpleDataSet1.Params[1].AsDate := MCevento.Date;
FrmDm.SimpleDataSet1.Open;
Agradeço qualquer dica ou ajuda...
Vinicius
__ Informação do NOD32 IMON 4082 (20090518) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset.com.br
].AsDate := MCevento.Date;
FrmDm.SimpleDataSet 1.Open;
Agradeço qualquer dica ou ajuda...
Vinicius
__ Informação do NOD32 IMON 4082 (20090518) __
Esta mensagem foi verificada pelo NOD32 sistema antivírus
http://www.eset. com.br
[As partes desta mensagem que não continham
De: ruberval-bol [mailto:ruber...@bol.com.br]
Enviada em: segunda-feira, 18 de maio de 2009 16:10
Para: 'delphi-br@yahoogrupos.com.br'
Assunto: CARREGAR RESOLUÇÃO DE VIDEO
Boa tarde Galera, tudo bom, espero que sim, é o seguinte estou precisando de
uma ajuda sobre como carregar a
agradeço mas nao resolveu, continua a mesa coisa.
2009/5/18 EmbarcaDelphi embarcadel...@yahoo.com.br
begin
frmSplash := TfrmSplash.Create(Nil);
frmSplash.Show;
Application.Initialize;
Application.CreateForm(TfrmPrincipal, frmPrincipal);
Application.CreateForm(TDMGeral, DMGeral);
descobri
foi so tirar o:
Application.MainFormOnTaskbar := True;
2009/5/18 felipe govoni govoni.fel...@gmail.com
agradeço mas nao resolveu, continua a mesa coisa.
2009/5/18 EmbarcaDelphi embarcadel...@yahoo.com.br
begin
frmSplash := TfrmSplash.Create(Nil);
frmSplash.Show;
Olá,
Esta mensagem é uma notificação para informá-lo que um novo arquivo foi
adicionado no grupo delphi-br.
Arquivo : /facHTMLReport.zip
Carregado por : silvioprog silviop...@yahoo.com.br
Descrição : Componente para gerar relatório (com templates HTML)
Contrib.:
Amigos
alguem pode dar uma dica de onde conseguir boas images para botões e icones
mais modernos ( futuristas)
Tenho muitos aqui mais são antiguinhos.
Agradeço a dica dos amigos
Abraços a todos
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
Olá galera,
--- Em delphi-br@yahoogrupos.com.br, alessandra porto alessandraport...@...
escreveu
Amigos
alguem pode dar uma dica de onde conseguir boas images para botões e icones
mais modernos ( futuristas)
Alessandra, tem 1.000 (no formato .png):
Link -
27 matches
Mail list logo