coloquei o midas.dll mais não fiz o registro dela, como é que faz???
- Original Message -
From: Rubem Rocha [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Friday, December 17, 2004 4:39 PM
Subject: RES: [delphi-br] clientDataSet loadFromFile
Vc colocou a MIDAS.DLL no ..\system32, mas
Memo.Lines.Add('CODIGO = '+ClientDataSet.FieldByName('CODIGO').AsString);
Memo.Lines.Add('NOME = '+ClientDataSet.FieldByName('NOME').AsString)
Coloque a rotina acima em algum button ou coisa parecida, mude o registro
selecionado no grid e teste ...
Olá a todos,
Tenho a função:
function TDtmImportarRegistros.teste():string;
begin
result:= 'hello';
end;
e quero chamá-la a partir do conteúdo de uma variável:
procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
var, res : string;
begin
var := 'teste()';
res :=
variavel := teste;
showmessage(variavel);
ou showmessage(Teste);
---
Vitor Luiz Redes
Desenvolvimento
---
Redsystem Informática
[EMAIL PROTECTED]
---
Vai no menu Project | Options | Compiler e veja se na seção Debugging todas
as opções estão marcadas. Se não estiverem, marque elas. Se estiver, então
você vai no menu Tools | Debugger Options e vê se a checkbox Integrated
Debugging está marcada. Se não estiver, marque ela.
Feito isto tudo,
Bom Tasquim, reforçando a ajuda do amigo Demian eu fiz isso final de semana,,
Coloca isso no evento onclick do botao que vc esta utilizando para a importação;
Qualquer duvida me contate em pvt.
esse exemplo vai adicionar os municipios pelo nome, e ele vai gerando o id
automaticamente ok.
var
Acho que do jeito abaixo sai o que vc deseja
[]s
function TDtmImportarRegistros.teste :string;
begin
result:= 'hello';
end;
procedure TfrmImportarRegistros.Button1Click(Sender: TObject);
var
var : string;
begin
var := teste;
showmessage(var);
end;
_
De: Juarez
Olá pessoal,
Preciso mudar a ordem dos itens de um checklistbox e gostaria de fazer isso
arrastando os itens com o mouse de um posição para outra...
se alguém puder me ajudar agradeço
Valeu obrigado.
Fabiano.
_
Natal no MSN
Ol pessoal,
Gostaria de saber se algum dos apaixonados como eu, utiliza o PS Full
para desenvolvimento de aplicativos
para PALM (symbol).
Preciso urgente de um exemplo de acesso a banco de dados e leitura de
cdigo de barras para Palm SPT1550.
Agradeo a ajuda desde j,
Grande abrao a todos.
Bom dia companheiro. Essa é uma dica do DTDelphi. Espero que ajude :)
Exportando Relatório do QuickReport para HTML, DOC, TXT ou XLS
Na clausula uses, acrescente a unit QRExport
Exportando para HTML:
QuickReport.ExportToFilter(TQRHTMLDocumentFilter.Create
('c:\teste.html'));
Exportando
Pessoal Bom dia!
Estamos iniciando o desenvolvimento de um novo sistema em firebird, e
gostaríamos de alguns esclarecimentos. Existe um certo limite de
transações diárias segura para o banco?? Qual o tamanho disponível
seguro para armazenamento dos dados?
Obrigado,
Gustavo Mandro.
Olá pessoal !
Gostaria de saber se alguém poderia me vender algum sistema com fontes,
Pode ser para comércios e/ou serviços, com as seguintes características
:
1.Delphi 7 + Interbase ou Firebird
2.Conexão via componentes dbExpress
3.Rotinas administrativas / financeiras - contas a pagar, contas
Olá...
Estou tentando instalar um application service que fiz, só que quando tento
fazer a instalação via prompt , não aparece a tela do windows de sucesso
quando finalizado, percebo que o serviço não esta instalado também. Não
aparece erro nem nada.
O estranho é que na minha máquina
Galera, bom dia !
Estou com uma mensagem de erro que nao consegui resolver, é o seguinte:
Em um botao de minha toolbar eu estou executando o seguinte texto:
FmGerenciamento := TFmGerenciamento.Create(self);
FmGerenciamento.ShowModal;
FmGerenciamento.Release;
Na hora em que o
Talvez seja alguma instrução no OnShow do formulário ...
---
Vitor Luiz Redes
Desenvolvimento
---
Redsystem Informática
[EMAIL PROTECTED]
---
-
http://homepages.borland.com/torry/mapi.htm
Até.
Alexandre Oliveira Campioni
RURAL COM PREST SERV COMP LTDA
( (16) 3818-0388 - (16) 9998-6438
+ [EMAIL PROTECTED]
-Mensagem original-
De: info.Desenvolvimento [mailto:[EMAIL PROTECTED]
Enviada em: segunda-feira, 20 de dezembro de
Estou tentando fazer um somatorio, mas esta dando o seguinte
erro: '1.1' is not valid floating point value.
Quero somar o 1.1 +1 (ficaria 1.2), estou fazendo assim:
lCod := FloatToStr(StrToFloat(lCod) + StrToFloat(lSoma));
onde lcod = 1.1 e lsoma = 1
Fernanda.
--
FAVOR REMOVER ESTA
Um form ShowModal não pode estar com o visible = true ... como pode ver na
mensagem de erro.
Marcelo Silva
Cel. 11 9693-4251
ICQ - 49224093
MSN [EMAIL PROTECTED]
- Original Message -
From: Listas - Giratto Sistemas
To: [EMAIL PROTECTED]
Sent: Monday, December 20, 2004 12:45
Amigo,
Qual versão vc esta usando?
Na pasta demos tem exemplo de utilização de codigo de barras e acesso
a dados é mais complicado um pouco
[]'s
On Mon, 20 Dec 2004 10:51:08 -0200, Jorge Ericsson Silva PInheiro
[EMAIL PROTECTED] wrote:
Olá pessoal,
Gostaria de saber se alguém dos
Emanuel,
uma vez eu tava tentando usar o BLinker para compilar um projeto do Delphi.
As versões mais novas permitiam compilação para ambiente Windows (Windows
3.11).
Chegou a gerar o executável, mas o programa ficou numa lentidão
hiperestranha! Talvez seria algum parâmetro, mas como eu tava sem
O que ocorre é que o nome da função está numa tabela no banco de dados.
Preciso fazer uma consulta para trazer o nome da função, que vem como string, e
a partir dessa string chamar a funcão.
function TfrmImportarRegistros.teste() :string;
begin
result:= 'hello';
end;
procedure
Amigos
ao executar o OpenDialog para escolha de um arquivo, tudo ocorre normalmente
mas, se executado novamente apresenta um erro de Access violation at
address... Ou seja ele somente executa uma vez.
Onde estou errando? No final ainda libero a memoria atravez do metodo Destroy.
Se saio do
Olá...
Estou tentando instalar um application service que fiz, só que quando tento
fazer a instalação via prompt , não aparece a tela do windows de sucesso
quando finalizado, percebo que o serviço não esta instalado também. Não
aparece erro nem nada.
O estranho é que na minha máquina
Manda o código Zé!Fica mais fácil de ajudar
- Original Message -
From: Wagner Nery [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, December 20, 2004 12:48 PM
Subject: [delphi-br] OpenDialog
Amigos
ao executar o OpenDialog para escolha de um arquivo, tudo ocorre normalmente
Preciso fazer select com case insensitive, como faço?
Tentei o usar o contaning. Ele funciona para o caso do case insensitive, mas
faz a busca parcial. Preciso que a busca seja case insensitive e integral.
Agradeço qq ajuda.
_
Luis Alberto P. Lopes
o seu problema é no separador decimal
tente o seguinte
lCod := FloatToStr(StrToFloat(StringReplace(lCod,'.',DecimalSeparator) +
StrToFloat(StringReplace(lSoma,'.',DecimalSeparator));
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
Amigos,
Uso o TNMSMTP para envio de e-mail's e desde o inicio de Dezembro
estou tendo problemas para autenticar o usuario no servidor de SMTP
(smtp.vix.terra.com.br). Retorna o erro 554.
Alguem sabe como fazer isso usando esse componente?
[]'s
--
MSN: [EMAIL PROTECTED]
--
FAVOR REMOVER
O problema deve estar exatamente no Destroy. Vc cria o objeto antes de
chamá-lo? 2 opções: ou vc não destroi ele ou cria ele antes de chamar.
- Original Message -
From: Wagner Nery [EMAIL PROTECTED]
To: [EMAIL PROTECTED]
Sent: Monday, December 20, 2004 12:48 PM
Subject: [delphi-br]
Olá Pessoal,
Estou tentando trabalhar com arquivo texto, mas está começando a
ficar difícil, vejam só:
Preciso ler/alterar um arquivo de configuração e estou com a duvida
de como fazer este acesso/alteração.
Pensei em tentar localizar uma referência no arquivo para que eu
possa
Boa tarde,
Quero capturar o pressionamento de teclas,
Por exemplo: pressionar a tecla F11 utilizo no KeyDown do Form
If Key = VK_F11 then
O que quero fazer.
Porém não estou conseguindo capturar o presionamento de Alt + F12. Alguém
sabe como fazer?
Grato.
Marcos Esteves Simão
Leandro já pensou em utilizar o TInifiles nativo do próprio Delphi?
Só uma idéia vai ver você precisa de alguma coisa mais específica mas
estou utilizando TInifile para criar meus aquivos de configuração sem
maiores problemas e ainda criptografo tudo.
Qualquer coisa pode mandar um e-mail
Alguem pode me dizer onde posso encontrar este componente?
AfQuickMail1
--
No virus found in this outgoing message.
Checked by AVG Anti-Virus.
Version: 7.0.296 / Virus Database: 265.6.0 - Release Date: 17/12/2004
[As partes desta mensagem que não continham texto foram removidas]
Se eu não me engano o que você que é passar uma função
como referência:
Seria assim:
type
TFuncao = function () : string;
function mostra1 : string;
begin
result := 'mostra1';
end;
function mostra2 : string;
begin
result := 'mostra1';
end;
function mostra(f : TFuncao) : string;
begin
Tem uma versão já disponivel para uso em Windows, ainda é RC1, mas já dá
pra brincar legal, sem emulação.
E sobre o componente a usar procure o SQLDirect, eu recomendo, acessa
nativamente diversos banco sem necessidade de Dlls.
Maciel Listas wrote:
Olá Giovane, pretendo usar o
Pessoal, preciso de ajuda!
Meu Delphi 6 do meu micro lá de casa ñ compila mais nenhum projeto. Vice sempre
dizendo que ñ encontrou System.pas, e eu já setei o caminho pra procurar em
{$DELPHI32}\Source\Rtl\Sys, mas nada! Ele não compila mais!
Por favor, me ajudem!
O que pode estar errado?
Pessoal
Ainda não consegui me livra do meu problema:
Tenho dois campos time inicio e final;
primeiro preciso descobrir o período: periodo := final - inicio;
depois preciso fazer um somatório dos periodos.
Como fazer. Até consegui caminhar mas, sempre que a soma chega a 24 ela
reinicia;
executa no prompt do DOS
regsvr32 midas.dll
hene william [EMAIL PROTECTED] wrote:
coloquei o midas.dll mais não fiz o registro dela, como é que faz???
- Original Message -
From: Rubem Rocha
To:
Sent: Friday, December 17, 2004 4:39 PM
Subject: RES: [delphi-br] clientDataSet
No Delphi, não faz. A não ser que você utilize:
#1) compilação com arquivo de mapa e saiba traduzir nome - endereço e,
além disso, montar a pilha de chamada da rotina dinamicamente;
#2) um motor de script para interpretar e executar seu código de forma
independente, externamente
Pessoal, estou com um problema que não estou conseguindo resolver:
Criei uma aplicação Web(websnap D7), que quando rodo em qualquer
navegador que não seja o Internet Explorer (Qualquer versão) roda
tranquilissimo, mas quando uso o IE5x ou superior da o seguinte
erro ao ativar o post de um
Thiago,
A diferença entre dois TDateTime é dada em dias (e fração de dias). Para
obter o resultado em horas é preciso multiplicar por 24h/dia para ter o
resultado em horas (e fração de horas); a soma de intervalos correrá sem
problemas, sempre em horas e fração de horas.
function
Amigo,
Naum compreendi bem a sua Obs, mas do listbox para o edit ve se eh isto q vc
quer:
for x:=1 to ListBox.Count - 1 do begin
edit.text := ListBox.Items.Strings[X];
end;
[]s
Nilson Chagas
E Jesus, respondendo, disse-lhes: Porventura não errais vós em razão de não
saberdes as
Boa tarde gente boa ...
Faz dessa maneira que vai dar certo ...
if (ssAlt in Shift) and (key = vk_f11) then
begin
showmessage('as teclas ALT + F11 foram pressionadas');
end;
Qualquer dúvida pergunte ...
Att.
Hélder
Marcos Esteves Simao (GERIN) escreveu:
Boa tarde,
Quero capturar o
Solicito informação de onde conseguir imagens e/ou icones para colocar em meus
projetos.
Atenciosamente,
Marcelo Carvalho
[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:
43 matches
Mail list logo