coloca um campo calculado no grid com parte do memo.
para mostrar o conteúdo todo, acho que tu deveria pensar em implementar algo
tipo um hint.
- Original Message -
From: Fabiano Frizzo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 28, 2006 11:39 PM
Subject:
[***]
Estou tentando trabalhar com interfaces, mas ta complicado.
Tenho
MinhaInterface=interface
function GetNome:String;
procedure SetNome(Value : String);
property nome:string read GetNome write SetNome;
end;
MeuObjeto=Class(TInterfacedObject,MinhaInterface);
end;
Implementos os
Ricardo,
Pelo código que vc mostrou, o problema não deve ser a interface, pois vc nem
utilizou ela no código. Veja se vc está construindo o objeto corretamente (no
seu código real, pois o exemplo parece estar certo) e se não está destruindo
o mesmo em algum outro lugar antes de utilizar.
Se
Tenho um master/detail onde o master são as notas e o detail são os itens da
nota, e acontece o seguinte quando mando dar um edit somente nos itens
automaticamente o cliente dataset das notas também entra em modo de edição, tem
como os dois clientdataset ficarem independente, quando mandar
Acho que ele só queria definir o exemplo, não deve ter escrito um código
completo...
--
Marcos Douglas
Mensagem Original
From: Elazar Dornelles Ceza [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Ter, Agosto 29, 2006 9:05 am
Subject: RES: [delphi-br] Problema com interfaces.
Elazar obrigado pela ajuda!
Esse código não é o meu eu coloquei ai apenas para exemplificar o meu problema,
logo abaixo eu coloquei o texto Implementos os metodos da interface, os
metodos que reclamou ai eu os implementei, mas eu ja consegui resolver, o
problema era que eu tava dando um cast
Marcos obrigado pela força.
Eu consegui resolver esse proboela, era que eu tava dando um cast de um objecto
para uma interface, e isso tava gerando os erros.
- Original Message -
From: Marcos Douglas
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 9:28 AM
Access sem chance !!!
Quando vc abre uma base access ele cria um arq temporario q é apagado
quando vc fecha a conexão.
Faca um teste crie uma base access no desktop e minimize depois.
Eduardo
Rodrigo O. Farias escreveu:
O pessoal que faz software em cd costuma usar o access
mysql vc tambem consegue
Em 29/08/06, Eduardo [EMAIL PROTECTED] escreveu:
Access sem chance !!!
Quando vc abre uma base access ele cria um arq temporario q é apagado
quando vc fecha a conexão.
Faca um teste crie uma base access no desktop e minimize depois.
Eduardo
Rodrigo O. Farias
Resaltando, caso vc trabalhe com variáveis de tipo INTERFACE no private de um
form ou datamodule, coloque no OnDestroy do seu form a atribuição NIL para a
variável, caso não fizer isso, poderão ocorrer erros muito estranhos no
fechamento do seu Form/DataModule.
Tive uma baita dor de cabeça até
Eu utilizo e nunca tive problema... 100.000 500.000... o limite é a memória
disponível... se estourar ele começa a gravar em cachê no HD... mas aí fica
muito lento...
- Original Message -
From: Cezar Moniz
To: delphi-br@yahoogrupos.com.br
Sent: Monday, August 28, 2006
Bom dia galera, blza?
To com o segte probleminha: Tenho que gerar um arquivo TXT para enviar a um
orgão publico. Cada campo deve estar previavemente formatado com os tamanhos
especificados pelo orgão. No meu Select, fiz uso da função TO_CHAR( ) para
formatar as colunas. Por exemplo:
Var
(pública)
VOLTA : string;
On exit das edits
(carga de VOLTA com a edit que a carregou)
exemplo para edit2:
VOLTA := 'Edit2.Text';
On exit de algum evento:
If VOLTA = 'Edit1.Text' then
Edit11.Text := 'Conteúdo de volta é Edit1.text');
If VOLTA =
Alguem conhece algum site bom sobre o Lazarus pra windows???
Baixei e instalei...é bem bacana...o melhor é q é grátis...compila mesmo.
Fiz umas aplicações com o mesmo código do Delphi e funcionou perfeitamente.
O executavel fica muito grande...demora um pouco...nao tem tantos
componentes...mas
Cara, qual o banco que vc está usando?
Em 29/08/06, Sérgio [EMAIL PROTECTED] escreveu:
Bom dia galera, blza?
To com o segte probleminha: Tenho que gerar um arquivo TXT para enviar a
um orgão publico. Cada campo deve estar previavemente formatado com os
tamanhos especificados pelo orgão. No
Caro Sergio,
Veja se este exemplo pode lhe ajudar.
[]'s,
Gilson
procedure TFrmPrincipal.btnExportarClick(Sender: TObject);
Var
F: TextFile;
Vcampo1, vcampo2 : String;
Begin
Query.SQL.Clear;
Query.SQL.Add('select * from tabela');
Query.Open;
memo1.Lines.Clear;
Query.First;
while not
Tente assim:
/* Sentença( SELECT LPAD(CAMPO OU TEXTO, TAMANHO FIXO, VALOR A SER
USANDO PARA PREENCHER DIFERENÇA /*
/* para inserir 0 a esqerda no caso de campos numericos */
select LPAD('1500', 10, '0') from dual
/* para inserir texto a direita no caso de campos numericos */
select
Para usar TO_CHAR Só pode ser Oracle !!!
Só mais uma ideia, se vc resolver fazer uma função no delphi, pegue os
dados dos campos da tabela com este ( SELECT * FROM SYS.COL )
Algum tempo atraz fiz algo assim, mas fiz tudo pelo delphi, no meu caso
o usuário poderia escolher os campos, mas
Bom dia Galera
Eu tenho um pequeno probleminha
Queri converter um numero de anos em um a data alguem sabe como fazer
isso??
Tipo eu tenho la 14 anos e queria saber a qual data isso equivale,
alguem poderia me ajudar
Agradeço desde ja.
Leandro
--
FAVOR REMOVER ESTA PARTE AO RESPONDER
Bom dia Galera
Eu tenho um pequeno probleminha
Queri converter um numero de anos em um a data alguem sabe como fazer
isso??
Tipo eu tenho la 14 anos e queria saber a qual data isso equivale,
alguem poderia me ajudar
Agradeço desde ja.
Leandro
--
FAVOR REMOVER ESTA PARTE AO RESPONDER
Aos que opinaram, obrigado pela dica!!!
On Tue, 29 Aug 2006 12:07:38 -0300, Eduardo wrote
Para usar TO_CHAR Só pode ser Oracle !!!
Só mais uma ideia, se vc resolver fazer uma função no delphi, pegue os
dados dos campos da tabela com este ( SELECT * FROM SYS.COL )
Algum tempo atraz
Boa tarde!
Afirmação equivocada, pois o PostGreSql também possui a função TO_CHAR().
Se está usando o PostGreSQL com Delphi, pode formatar o resultado com a função
do Delphi formatfloat('00',campo);
Boa sorte.
Ulisses
-Mensagem Original-
De: Eduardo
Para:
Bom saber, esta não é primeira vez q vejo funções semelhantes entre
Oracle e PostGreSQL, vc saberia me dizer quais as outras
Eduardo
Ps.: Não lembro qual era a outra.
Ulisses escreveu:
Boa tarde!
Afirmação equivocada, pois o PostGreSql também possui a função TO_CHAR().
Se está
Depende. Se vc quer apenas subtrair uma quantidade de anos apartir de
uma data.
function DecYear(pData : TDateTime; pQtdYear : Integer = 1) : TDateTime;
var
Year,
Month,
Day: Word;
begin
DecodeDate(pData, Year, Month, Day);
Year := Year - pQtdYear;
Result :=
Bom, se o FireBird aceita UDFs, não seria difícil implementar algo nesse
sentido, ou seria ?
- Original Message -
From: Eduardo [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 1:25 PM
Subject: Re: [delphi-br] Uso da função TO_CHAR( )
Bom saber, esta
Se vc pegar somente o ano da data e subtrair (-) a idade, você terá o ano que a
pessoa nasceu.
Ex.: 2006 - 14 = 1992
Muito simples...
- Original Message -
From: leandrorodrigodossantos
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 12:27 PM
Subject:
Elazar, obrigado pela resposta, entretanto, vc respondeu a primeira parte da
pergunta, que é carregar em VOLTA conforme o onexit de qualquer uma das edits.
Fico ainda em dúvida, como vou retornar para a edit ( a que carregou Volta) com
um resultado que foi obtido em outro evento.
Tipo
porque não tenta com um pen drive?
Daniel.
Eduardo [EMAIL PROTECTED] escreveu:
Access sem chance !!!
Quando vc abre uma base access ele cria um arq temporario q é apagado
quando vc fecha a conexão.
Faca um teste crie uma base access no desktop e minimize depois.
Eduardo
Rodrigo O.
Alguém saberia me dizer se existe alguma função no Firebird que sirva para
selecionar o último registro de uma tabele?
O que preciso fazer é um select composto por 2 tabelas relacionadas, onde a
segunda tem vários registros relacionados com a primeira. Preciso de um select
que retorne todos os
Ok Anderson.
Minha dúvida seria em colocar, (no meu caso) 5.000 registros em memória
armazenados no Firebird. Não sei qual seria o comportamento, pois eu vou
trabalhar com máquinas fracas e W98...
Mas de qualquer maneira obrigado. Vou estudar este componente e tentar pegar
exemplos de uso com o
Alou Itamar, é sua vez de ajudar nosso amigo Marcos.Olha MArcos, conheço o
Itamar Lins q conhece bem o Lazarus e o XHarbour, se ele ler a msg sabe como te
ajudar.
Espero que surta efeito minha tentativa.
DEUS É PAI.
[]'s
Allan
msn [EMAIL PROTECTED]
Skype allan_gabriel
- Original Message
uma dúvida, esse comando faz distinção de maiusculas e minusculas?
-
Você quer respostas para suas perguntas? Ou você sabe muito e quer
compartilhar seu conhecimento? Experimente o Yahoo! Respostas!
[As partes desta mensagem que não continham
Bom, acredito que isso é configurável, pq eu já vi inúmeros softwares de cd
que usam access como base de dados, talvez de pra setar onde ele cria esse
temporario
Esses cds de lista telefônica, a maioria é em access
--
Rodrigo Othávio Farias
-Mensagem original-
De:
Boa tarde pessoal !
Alguem sabe como fazer um campo memo (ou texto de tamanho grande) de um
TDataSet retornar o valor realmente armazenado nele, em vez de (MEMO) ?
Desde já, agradeço.
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para ver as mensagens antigas, acesse:
fl ae galera,
eu estou fzndo 1 pj final q envolve linguagem Delphi pra XP e Linux (através
do Kylix) só q eu num saco mto de Kylix naum, entao c alguem puder me dar
alguma dica.
Brigadão.
-
Yahoo! Acesso Grátis - Internet rápida e grátis.
Ok;
Complementando o seu codigo então.
{ Tenha declarado então duas variaveis globais }
Var
vVolta : String;
oVolta : TEdit;
{No on exit do seus Tedits; voce coloca o seguinte. }
vVolta := 'Conteudo de volta é ' + Tedit(Sender).Name + '.Text';
oVolta := Tedit(Sender);
{ no
Ok vou dar uma olhada !!!
Eduardo
Ulisses escreveu:
Boa tarde!
No Manual do PostgreSQL tem um comparativo de algumas funções do
PostgreSQL, Oracle e MS SQL Server.
Se ajudar, pode olhar aqui
http://pgdocptbr.sourceforge.net/pg80/index.html
Boa sorte.
Ulisses
-Mensagem
Pessoal,
Meu programa, feito em delphi7 acessando Firebird, executa
normalmanete nas maquinas antigas da empresa, mas em todas as novas
(marca DELL) dá erro Run-Time e nem mostra a tela inicial.Isso
acontece em todas as maquinas DELL compradas
recentemente...independente de service pack do
Elazar,
O setfocus deu certo, foi para a célula (edit) correto.
Mais o problema é que não quero o foco e sim enviar para a celula o conteúdo do
calculo
If oVolta nil then begin
// oVolta := uVolta; se eu conseguisse fazer isto, Igualar os tipos daria
certo)
// da forma que esta em
Por acaso você está usando clientdataset é não copiou o MIDAS.DLL
Qual componente para acesso ao banco de dados você está usando??
[]'s
Andreano Lanusse
System Engineer - Development Tools
blocked::BLOCKED::http://info.borland.com.br/borcon Tel.: +55 (11) 2165 -
8000 / Mobile: +55 (11)
Eu tenho máquina DELL e nada ocorre.
Qual o erro que está ocorrendo? Especifique o erro para que possamos ajudar.
- Original Message -
From: Pedro Alexandro RS [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 5:30 PM
Subject: [delphi-br] problemas em
Elazar, Deu tudo certinho,
exatamente como vc explicou, eu é que estava com os eventos mal posicionados
Grande abraço e obrigado.
Roberto
- Original Message -
From: Roberto Wazen (RJ)
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, August 29, 2006 5:35 PM
Subject: Re:
SQLConnection e TQuery não combinam...
SQLConnection = tecnologia DBExpress
TQuery = tecnologia BDE
Com SQLConection, vc utiliza mais 3 componentes nesta ordem: SQLQuery(esse aqui
é o seu TQuery) ou SQLDataSet(onde você faz os Selects), DataSetProvider,
ClientDataSet, DataSource.
Alguém aqui sabe se tem como incrementar a versão do sistema a cada compilação
do mesmo?
sem precisar ir ao menu projeto | Option | version
Att
Luis carlos
[As partes desta mensagem que não continham texto foram removidas]
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
* Para
Pessoal, no meu aplicativo Delphi reservei um DataModulo onde
coloquei os seguintes componentes:
DMRave
RvProject
TsqlQuery Select EMPRESA,ENDERECO,TELEFONE FROM EMPRESA
RvDataSetConnection APONTANDO PARA TsqlQuery
no Delphi
dmRave := TdmRave.Create(self);
45 matches
Mail list logo