Desculpem pelo OFF,
Essa é só pra descontrair –
[http://silvioclecio.blogspot.com/2009/10/pog-programacao-orientada-gambiarras.html].
:)
--
Silvio Clecio
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas,
troque aonde estiver pchar(xx) por pansichar(xx);
Em 09/10/2009 20:47, Samuel M. Basso escreveu:
Olá Pessoal!
Estou começando a fazer uns testes com o Delphi 2010 e estou querendo
migrar
minha aplicação feita em delphi 7 para ele. E esta ocorrendo diversos
erros
de incompatibilidade,
Olá grupo. Como disse estudo Delphi e instalei Dekphi 7. Mas quando procuro
alguma coisa na internet em relação a implementar um botão (ex o botão
cancelar( tem propriedades e eventos do botão no site que não tem no meu
Delphi. Vcs acham melhor instalar novamente ou pegar um completo?
Sobre o
[Error] Unit1.pas(63): Undeclared identifier: 'Modulo'
[Error] Unit1.pas(63): Missing operator or semicolon
Modulo seria outro form, provavelmente um datamodule, onde esteja o
cdscontatos(Tclientdataset).
[Error] Unit1.pas(69): Undeclared identifier: 'TbSupSetor'
TbSupSetor é o nome de uma
Estranho mesmo.
Mas acabei de testar e esse problema do sistema demorar sair da memória só
acontece no Windows vista, no XP não.
Alguma explicação?
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de galdariah
Enviada em: domingo, 11 de outubro de 2009 14:55
Fantastico e eu que não gostava de fluxograma
--- Em seg, 12/10/09, Silvio Clecio silviop...@yahoo.com.br escreveu:
De: Silvio Clecio silviop...@yahoo.com.br
Assunto: [delphi-br] [OFF-TOPIC] POG - Só pra descontrair
Para:
Data: Segunda-feira, 12 de Outubro de 2009, 23:35
Desculpem pelo
Por exemplo nessa funcao é onde o erro aparece:
function AbDrive(const ArchiveName : string) : AnsiChar;
var
iPos: Integer;
Path : string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
Result := 'A'
else
Result := Path[1]; //AQUI OCORRE
Como estão os seus ProviderFlags?
Marcelo Moacir Florindo escreveu:
Colegas,
Eu tenho na query master:
select * from funcionario
where codigo=:codigo
no detalhe:
SELECT f.*,d.nome
FROM funcionario_professor f
INNER JOIN disciplina d ON (d.codigo=f.codigoMateria)
where
Você pode usar TTable ou TClientDataSet
Charlestown
2009/10/8 Ricardo Rocha ricardo_r...@yahoo.com.br
Olá Moacir! Muito obrigado! Funcional perfeitamente.
Agora só uma dúvida, se eu usar o quais componentes do DBEpress eu teria
que usar para fazer uma consulta deste tipo?
Obrigado att,
Pessoal,
Tenho um sistema feito em Delphi 7 + IBX + Firebird 2.04.
Em um determinado form utilizo uma relação Master/Detail, com duas
queries, uma sendo a Master e a outra a Detail.
SQL da Querie Master: (na propriedade Strings da Querie)
select ID, ID_TAB, NIVEL,DESCRICAO, cast('G' as
Vejam a foto no meu algum web-Picasa, de um típico desgraçador de profissão,
sei que este cidadão trabalha com Delphi também, pois faz parte de um grupo
de pessoas envolvidas com delphi dentro do meu msn :
Link para a imagem :
Olá,
Estou com um probleminha com um webservice, e acredito que alguém poderia me
ajudar...
Estou enviando um arquivo para um webservice e, a princípio, parece estar
tudo bem. Porém, uma das propriedades da classe é um TByteDynArray, e é um
arquvivo (TXT, PDG ou JPG). Quando eu envio o arquivo
Galera, boa tarde
Estou com um problema
Estou desenvolvendo um projeto para empresa no qual trabalho e estou tendo
que trabalhar com chave composta no banco de dados.
Eu consigo trabalhar com o tbLookupComboBox com chaves compostas(keyfield)?
[As partes desta mensagem que não
Especifique os campos na propriedad KeyField separados por ponto-e-vírgula
(;). Boa sorte.
Sds.
To: delphi-br@yahoogrupos.com.br
From: felipearaujolo...@yahoo.com.br
Date: Tue, 13 Oct 2009 14:37:15 -0300
Subject: [delphi-br] Chave composta
Galera, boa tarde
Estou com um problema
Colegas,
Ao fazer um cds.post está aparecendo o erro:
Remote Error: Dbx.Sql is an unreconized command type.
Alguma idéia?
Abração a todos!
--
Marcelo Moacir Florindo
Analista/Desenvolvedor
http://www.gestaotec.com.br
[As partes desta mensagem que não continham texto foram removidas]
com resultado string a sua função dá certo.
function AbDrive(const ArchiveName : string) : string;
var
iPos: Integer;
Path : string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0) then
Result := 'A'
else
Result := Path[1]; //AQUI OCORRE O ERRO
end;
-
uf;cep
- Original Message -
From: Felipe Lopes
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, October 13, 2009 2:37 PM
Subject: [delphi-br] Chave composta
Galera, boa tarde
Estou com um problema
Estou desenvolvendo um projeto para empresa no qual trabalho e estou
Alguém sabe onde encontrar um exemplo bem simples de um programa de custos?
Com os fontes em Delphi7
grato
Chr() no Delphi 2009 retorna WideChar, para resolver seu problema faça um type
cast para AnsiChar
function AbDrive(const ArchiveName: string): AnsiChar;
var
iPos: Integer;
Path: string;
begin
Path := ExpandFileName(ArchiveName);
iPos := Pos(':', Path);
if (iPos = 0)
Galera, boa noite
Estou desenvolvendo um projeto e gostaria de colocar um acesso rápido.
Tenho todos os módulos do sistema cadastrados em uma tabela.
Gostaria de colocar um menu no portal onde nas permissões do usuário no qual
dou acesso ao modulo Tambem digo que aquele modulo
Para
Olá!
Eu instalei essa versão do fortes que vc enviou, mas está com os mesmos
problemas de gerar os arquivos utilizando os filtros do Word e Excell, e os
mesmos não reconhecerem.
Se vc tiver alguma outra dica, agradeço.
- Original Message -
From: stefaniak
To:
Ta ai uma coisa q também gostaria de saber ...
Vc tem um único .exe
FIOS E CABOS ENGENHARIA LTDA
CÍCERO FERNANDES
ENGENHEIRO ELETRICISTA E DE SEGURANÇA DO TRABALHO
CREA-SC 27.958-0
0xx(47) 3521-2988 - 0xx(47) 9191.6226
www.fiosecabos.ind.br http://fiosecabos.ind.br/ -
Sim
Um único exe.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Fios e Cabos
Enviada em: terça-feira, 13 de outubro de 2009 20:15
Para: delphi-br@yahoogrupos.com.br
Assunto: RES: [delphi-br] Acesso Rapido
Ta ai uma coisa q também gostaria de saber
Pelo que entendi, voce quer gerar botoes de atalho para determinadas
opcoes do seu sistema para que o usuario nao precise mavegar entre os menus
e submenus. E isso?
Voce esta falando de app desktop ou web? Pq falando em portal, da aspecto de
web.
O que a quantidade de executaveis tem a ver com
É app desktop
Agora a quantidade de executáveis não interfere em nada.
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome
de José Henrique (Zote)
Enviada em: terça-feira, 13 de outubro de 2009 21:37
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br]
Nos nossos sistemas, temos cada item do Menu cadastrado auto magicamente
no banco de dados. Nesta tabela, temos a Descricao do item (Nota Fiscal -
Emissao - Segunda via) e o nome do componente (NotaFiscal1).
Entao pra cada item que o usuario nao tem permissao, a gente desabilita ou
esconde o
Jose
Montei também estrutura no banco do dados. Tipo, nome do formulário, caminho no
menu nome da action, estou utilizando no formulário principal(Portal)
como faço para criar o botão dinamicamente?
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome
de José
Nao repara nos erros de sintaxe. Nao tenho delphi aqui e faz tempo que nao
trabalho com ele.
procedure BlaBlaBla;
var
botao: TButton;
begin
botao := TButton.Create(self);
botao.Parent := self; // Nao tenho certeza se precisa ou nao desta linha.
Acabei esquecendo isso... :p
botao.Caption
O erro está no seguinte:
No master:
select * from funcionario (O CAMPO CHAVE AQUI É CODIGO)
No Detalhe:
select * from funcionario_professor
where codigofuncionario=:codigo
O sistema está populando no campo codigo do funcionario_professor o código
do master. Ele deveria estar populando no
29 matches
Mail list logo