[delphi-br] HELP
Galera to precisando de uma ajuda se puderem me ajudar, a situacao é a seguinte:to fazendo uma pesquisa num banco de determinados campos so que um vem em branco, mas quando seleciono para o form ele aparece, alguem tem alguma ajuda [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] HELP
Não entendi... pode especificar melhor? -- Eny Trova Urias Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, mas um hábito- Aristóteles De: OLIVAL CRISTIANO DA SILVA olival.c...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 11 de Junho de 2010 15:59:35 Assunto: [delphi-br] HELP Galera to precisando de uma ajuda se puderem me ajudar, a situacao é a seguinte:to fazendo uma pesquisa num banco de determinados campos so que um vem em branco, mas quando seleciono para o form ele aparece, alguem tem alguma ajuda [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] HELP
A questao é:to fazendo uma consulta em uma tabela atraves de um campo para puxar os campos restantes.Exemplo:pesquisar por cpf trazendo todos os dados restantes, quando pesquiso fica um campo sem informaçoes, quando clico no ok para voltar ao form esse campo que ta em branco reaparece --- Em sex, 11/6/10, Eny Urias enyur...@yahoo.com.br escreveu: De: Eny Urias enyur...@yahoo.com.br Assunto: Res: [delphi-br] HELP Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 11 de Junho de 2010, 17:02 Não entendi... pode especificar melhor? -- Eny Trova Urias Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, mas um hábito- Aristóteles De: OLIVAL CRISTIANO DA SILVA olival.c...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 11 de Junho de 2010 15:59:35 Assunto: [delphi-br] HELP Galera to precisando de uma ajuda se puderem me ajudar, a situacao é a seguinte:to fazendo uma pesquisa num banco de determinados campos so que um vem em branco, mas quando seleciono para o form ele aparece, alguem tem alguma ajuda [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] HELP
Certo vamos por partes... vctá fazendo uma consulta de que forma? com locate, com find, com select E em que momento? Numa tela a parte, no gerenciador do banco E esse quando clico no ok pra voltar ao form... vc esta em outro form? o resultado dessa consulta aparece onde? num grid? vc tá usando datacontrols? -- Eny Trova Urias Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, mas um hábito- Aristóteles De: OLIVAL CRISTIANO DA SILVA olival.c...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 11 de Junho de 2010 17:48:58 Assunto: Re: Res: [delphi-br] HELP A questao é:to fazendo uma consulta em uma tabela atraves de um campo para puxar os campos restantes.Exemplo:pesquisar por cpf trazendo todos os dados restantes, quando pesquiso fica um campo sem informaçoes, quando clico no ok para voltar ao form esse campo que ta em branco reaparece --- Em sex, 11/6/10, Eny Urias enyur...@yahoo.com.br escreveu: De: Eny Urias enyur...@yahoo.com.br Assunto: Res: [delphi-br] HELP Para: delphi-br@yahoogrupos.com.br Data: Sexta-feira, 11 de Junho de 2010, 17:02 Não entendi... pode especificar melhor? -- Eny Trova Urias Somos o que repetitivamente fazemos, portanto, a excelência não é um feito, mas um hábito- Aristóteles De: OLIVAL CRISTIANO DA SILVA olival.c...@yahoo.com.br Para: delphi-br@yahoogrupos.com.br Enviadas: Sexta-feira, 11 de Junho de 2010 15:59:35 Assunto: [delphi-br] HELP Galera to precisando de uma ajuda se puderem me ajudar, a situacao é a seguinte:to fazendo uma pesquisa num banco de determinados campos so que um vem em branco, mas quando seleciono para o form ele aparece, alguem tem alguma ajuda [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: Res: [delphi-br] HELP
;
qryPesqFornec.SQL.Add('select vr.*, ir.*, mr.*, f.matr_func');
qryPesqFornec.SQL.Add('from tr_verificacao_radar vr,
tr_instrumento_radar ir, tr_modelo_radar mr, funcionario f');
qryPesqFornec.SQL.Add('where vr.cod_radar = ir.cod_radar');
qryPesqFornec.SQL.Add('and ir.cod_modelo = mr.cod_modelo');
qryPesqFornec.SQL.Add('and vr.cod_func = f.cod_func');
qryPesqFornec.SQL.Add('and ir.num_inmetro like '+
#39+'%'+EdtPesquisa.Text+'%'+ #39);
qryPesqFornec.Prepare;
qryPesqFornec.Open;
if not qryPesqFornec.IsEmpty then
begin
qryPesqFornec.First;
bbtnEditar.Enabled := true;
selecionou:=true;
end
else
begin
MostrarCxDialogo('Nenhum registro foi encontrado',4);
dbgDivisoes.SelectedIndex:=-1;
bbtnEditar.Enabled := false;
selecionou:=false;
end;
end; // FIM DO CASE SE = 3
end // FIM DO CASE
end;
end;
--- Em sex, 11/6/10, Eny Urias enyur...@yahoo.com.br escreveu:
De: Eny Urias enyur...@yahoo.com.br
Assunto: Res: [delphi-br] HELP
Para: delphi-br@yahoogrupos.com.br
Data: Sexta-feira, 11 de Junho de 2010, 17:02
Não entendi... pode especificar melhor?
--
Eny Trova Urias
Somos o que repetitivamente fazemos, portanto, a excelência não é um feito,
mas um hábito- Aristóteles
De: OLIVAL CRISTIANO DA SILVA olival.c...@yahoo.com.br
Para: delphi-br@yahoogrupos.com.br
Enviadas: Sexta-feira, 11 de Junho de 2010 15:59:35
Assunto: [delphi-br] HELP
Galera to precisando de uma ajuda se puderem me ajudar,
a situacao é a seguinte:to fazendo uma pesquisa num banco de determinados
campos so que um vem em branco, mas quando seleciono para o form ele aparece,
alguem tem alguma ajuda
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [help funcao com record]
Humm .. bom ideia , mas na utilizacao o delphi pede para eu passar o parametro REC. o que eu informo ? if leXML_ReciboLoteEnviado(arquivo,REC) then .
[delphi-br] HELP Sobre HELP
Boa noite a todos, Nesta noite de sexta-feira, dia internacional da cerva, tem alguma alma que possa me dar um dica sobre um aplicativo para montar um help. Muito agradecido fico. Jose Newotn [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] HELP Sobre HELP
Jose Newton Araujo escreveu: Boa noite a todos, Nesta noite de sexta-feira, dia internacional da cerva, tem alguma alma que possa me dar um dica sobre um aplicativo para montar um help. Muito agradecido fico. Jose Newotn HelpMaker - [http://www.vizacc.com/]; -- Silvio Clecio -- A vida é um intercâmbio de boa vontade mútua, em que recebemos aquilo que damos.
RES: [delphi-br] HELP Sobre HELP
Help Scribble é excelente, e a versão Trial/Free dele é o suficiente pra se montar um help razoável De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Jose Newton Araujo Enviada em: sexta-feira, 2 de outubro de 2009 20:59 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] HELP Sobre HELP Boa noite a todos, Nesta noite de sexta-feira, dia internacional da cerva, tem alguma alma que possa me dar um dica sobre um aplicativo para montar um help. Muito agradecido fico. Jose Newotn [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [help funcao com record]
Marcio, Espero ter entendido bem: sua função retorna um record, mas você também precisa também de um outro valor de retorno, um booleano. Se for isso, aqui vai a minha sugestão para o seu problema: function TfrmEnvio.leXML_ReciboLoteEnviado(ArquivoEnder:String; var rec: TDadosRecibo): boolean; O retorno da função passa a ser o booleano. Se o retorno for TRUE é porque o record foi preenchido corretamente (teve resultado), ou seja, nenhum erro entre os previstos foi encontrado. [ ]'s Dirlei. Marcio Luis escreveu: Pessoal , tenho algumas funcoes aqui que utilizo o retorno como Record. Gostaria de uma ajuda dos mais experientes no assunto, se é correto isso , ou tem forma mais pratica de usar. o mais esquisito é qundo quero tratar se teve resultado . numa funcao normal faria assim if minhaFuncao(valor) then agora com um recorde é mais complicado tenho que passar um valor . teria outro jeito de usar isso ?? att. Marcio TDadosRecibo = record cStat : String; xMotivo: String; nRec: String; end; function TfrmEnvio.leXML_ReciboLoteEnviado(ArquivoEnder:String): TDadosRecibo; var achou : Boolean; begin achou := FAlse; if achou = false then begin result.cStat := 'ERRO_404'; Result.nRec := 'ERRO_404'; Result.xMotivo := 'Arquivo nao encontrado' + ArquivoEnder; end else begin result.cStat := cStat; Result.nRec := nRec; Result.xMotivo := xMotivo; end; end; if
[delphi-br] [help funcao com record]
Pessoal , tenho algumas funcoes aqui que utilizo o retorno como Record. Gostaria de uma ajuda dos mais experientes no assunto, se é correto isso , ou tem forma mais pratica de usar. o mais esquisito é qundo quero tratar se teve resultado . numa funcao normal faria assim if minhaFuncao(valor) then agora com um recorde é mais complicado tenho que passar um valor . teria outro jeito de usar isso ?? att. Marcio TDadosRecibo = record cStat : String; xMotivo: String; nRec: String; end; function TfrmEnvio.leXML_ReciboLoteEnviado(ArquivoEnder:String): TDadosRecibo; var achou : Boolean; begin achou := FAlse; if achou = false then begin result.cStat:= 'ERRO_404'; Result.nRec := 'ERRO_404'; Result.xMotivo := 'Arquivo nao encontrado' + ArquivoEnder; end else begin result.cStat:= cStat; Result.nRec := nRec; Result.xMotivo := xMotivo; end; end; if
Re: [delphi-br] [help funcao com record]
Correto até que é. Mas eu daria preferência a trabalhar não com um record, mas
com um tipo personalizado e tratar um conjunto de itens desse tipo como uma
coleção, algo descrito nos links {1} e {2} ambos com exemplos, que utiliza
tipos já existentes no Delphi para essas ocasiões como TList, TObjectList,
TCollection e outros menos votados, mas não menos uteis, e aplicáveis as mais
variadas situações.
Referências:
{1} - http://www.atug.com/andypatterns/collections.htm - em inglês, consultado
em 29.09.2009
{2} - http://tocadoelfo.blogspot.com/2007/08/usando-colees-no-delphi.html - em
português, consultado em 29.09.2009
1) Evite escrever suas mensagens usando somente LETRAS MAIÚSCULAS.
2) Revise o texto de sua mensagem. Uma mensagem bem escrita é melhor
compreendida.
3) Vamos ajudar o Grupo e o Yahoo! Apague o conteúdo irrelevante!
--- Em ter, 29/9/09, Marcio Luis mar...@sulfabril.com.br escreveu:
De: Marcio Luis mar...@sulfabril.com.br
Assunto: [delphi-br] [help funcao com record]
Para: delphi-br@yahoogrupos.com.br
Data: Terça-feira, 29 de Setembro de 2009, 13:06
Pessoal , tenho algumas funcoes aqui que utilizo o retorno
como Record.
Gostaria de uma ajuda dos mais experientes no assunto, se é correto isso ,
ou tem forma mais pratica de usar.
o mais esquisito é qundo quero tratar se teve resultado .
numa funcao normal faria assim
if minhaFuncao( valor) then
agora com um recorde é mais complicado
tenho que passar um valor .
teria outro jeito de usar isso ??
att. Marcio
TDadosRecibo = record
cStat : String;
xMotivo: String;
nRec: String;
end;
function TfrmEnvio.leXML_ ReciboLoteEnviad o(ArquivoEnder: String):
TDadosRecibo;
var
achou : Boolean;
begin
achou := FAlse;
if achou = false then
begin
result.cStat:= 'ERRO_404';
Result.nRec := 'ERRO_404';
Result.xMotivo := 'Arquivo nao encontrado' + ArquivoEnder;
end
else
begin
result.cStat:= cStat;
Result.nRec := nRec;
Result.xMotivo := xMotivo;
end;
end;
if
Veja quais são os assuntos do momento no Yahoo! +Buscados
http://br.maisbuscados.yahoo.com
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] HELP!!! LISTBOX (index out off bounds (-1)), meio sem noção...
2008/11/8 Luiz Escobar [EMAIL PROTECTED]: Certo até ai eu sei, mas porque cargas dágua, funcionava antes e parou agora (não tem item vazio, quando chega nesta linha...) e com o debug incluido na aplicação ele funciona normalmente, basta eu incluir o debug e pronto ta tudo certo... sem ele da o erro e antes de mudar o icone da aplicação funcionava... é de deixar qualquer um louco Podem haver vários fatores, ainda mais em se tratando de componente visual, que pode responder a algum evento de uma forma enquanto está em execução, e de outra quando você acompanha pelo debug. Eu por exemplo tenho algumas bibliotecas impossíveis de debugar porque o passo-a-passo entra em loop por causa de eventos como o invalidate. A propósito minha dica ficou errada. Ao invés de Count = 0, é ItemIndex = 0, que significa você ler um item apenas quando *houver* um item selecionado. -- Joao Morais - Original Message - From: Joao Morais Sent: Friday, November 07, 2008 6:28 PM 2008/11/7 Luiz ESCobar [EMAIL PROTECTED]: L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); --- aqui da o erro... // POREM repito, com o debug incluido não da o erro... // e só deu o problema depois que troquei o icone da aplicação, vai entender. Você não pode ler o item atual de uma lista vazia. Portanto: if LB_CC.Count = 0 then L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); -- Joao Morais -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Re: [delphi-br] HELP!!! LISTBOX (index out off bou nds (-1)), meio sem noção...
Certo até ai eu sei, mas porque cargas dágua, funcionava antes e parou agora (não tem item vazio, quando chega nesta linha...) e com o debug incluido na aplicação ele funciona normalmente, basta eu incluir o debug e pronto ta tudo certo... sem ele da o erro e antes de mudar o icone da aplicação funcionava... é de deixar qualquer um louco []s Luiz Escobar - Original Message - From: Joao Morais Sent: Friday, November 07, 2008 6:28 PM 2008/11/7 Luiz ESCobar [EMAIL PROTECTED]: L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); --- aqui da o erro... // POREM repito, com o debug incluido não da o erro... // e só deu o problema depois que troquei o icone da aplicação, vai entender. Você não pode ler o item atual de uma lista vazia. Portanto: if LB_CC.Count = 0 then L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); -- Joao Morais
Re: [delphi-br] HELP!!! LISTBOX (index out off bou nds (-1)), meio sem noção...
OK, deu pra entender.. Mas agora ficou melhor ainda... Fui na outra empresa que trabalho levei os fontes no pendrive e compilei.. e BINGO... o problema sumiu.. k vai entender. Com o D6 da o problema que não existia, agora com o D7 ta normal... []s Luiz Escobar - Original Message - From: Joao Morais To: delphi-br@yahoogrupos.com.br Sent: Saturday, November 08, 2008 2:04 PM Subject: Re: [delphi-br] HELP!!! LISTBOX (index out off bounds (-1)), meio sem noção... 2008/11/8 Luiz Escobar [EMAIL PROTECTED]: Certo até ai eu sei, mas porque cargas dágua, funcionava antes e parou agora (não tem item vazio, quando chega nesta linha...) e com o debug incluido na aplicação ele funciona normalmente, basta eu incluir o debug e pronto ta tudo certo... sem ele da o erro e antes de mudar o icone da aplicação funcionava... é de deixar qualquer um louco Podem haver vários fatores, ainda mais em se tratando de componente visual, que pode responder a algum evento de uma forma enquanto está em execução, e de outra quando você acompanha pelo debug. Eu por exemplo tenho algumas bibliotecas impossíveis de debugar porque o passo-a-passo entra em loop por causa de eventos como o invalidate. A propósito minha dica ficou errada. Ao invés de Count = 0, é ItemIndex = 0, que significa você ler um item apenas quando *houver* um item selecionado. -- Joao Morais - Original Message - From: Joao Morais Sent: Friday, November 07, 2008 6:28 PM 2008/11/7 Luiz ESCobar [EMAIL PROTECTED]: L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); --- aqui da o erro... // POREM repito, com o debug incluido não da o erro... // e só deu o problema depois que troquei o icone da aplicação, vai entender. Você não pode ler o item atual de uma lista vazia. Portanto: if LB_CC.Count = 0 then L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); -- Joao Morais -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] HELP!!! LISTBOX (index out off bounds (-1)), m eio sem noção...
Uso D6-PRO
Vejão só, troquei um icone na aplicação e começou a dar o erro acima, POREM
quando incluo o DEBUG para achar a linha o erro simplesmente some...
ai debugando no SHOWMESSAGE, hehehe, achei a linha mas não acredito que tenha
erro, será que ALLguem pode dar uma olhadinha no código abaixo.
procedure TForm1.ReadAllChannel;
var
ini : tinifile;
x : Integer;
cc : string;
begin
LB_CC.Items.Clear;
Ini := TIniFile.Create('./APPFILE.INI');
ini.ReadSections(LB_CC.Items);
ini.Free;
x := 0;
while x LB_CC.Count do begin
cc := UpperCase(LB_CC.Items[x]);
if (Pos('C1-',cc)0) and (Pos('--C2-',cc)0) then // sempre vai
sobrar de 5 à 100 itens...
Inc(x) else LB_CC.Items.Delete(x);
end;
LB_CC.ItemIndex := 0;
end;
procedure TForm1.FormCreate(Sender: TObject);
begin
Timer0.Enabled := true;
end;
procedure TForm1.Timer0Timer(Sender: TObject);
var
Ini: TIniFile;
CNL_, CNL_CDC : string;
pathok : Boolean;
begin
timer0.enabled := false;
pathok := False;
posicao := 'pri';
if ((LB_CC.ItemIndex+1) (LB_CC.Items.Count)) then begin
LB_CC.ItemIndex := LB_CC.ItemIndex+1
end else begin
ReadAllChannel;
end;
L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); --- aqui da o
erro...
// POREM repito, com o debug incluido não da o erro...
// e só deu o problema depois que troquei o icone da aplicação, vai
entender.
Obrigado...
[]s
Luiz Escobar - Analista/Desenvolvedor:
WEB - HTML/JavaScript/PHP/MySQL
WINDOWS - Delphi/ASSEMBLY/MySQL/xBase
SERVIDORES - CNA IntraNetWare4.11, LINUX-(RedHat9/Suse11), Windows 2K/XP
HARBOUR
--
Borland C++ 5.5.1 (32 bit)
Harbour 1.0.1 Intl. (Rev. 9429)
xHarbour Compile build 1.1.0 (Simplex)
Harbour MiniGUI 1.5 Extended Edition (Build 57d) - 2008.10.10
---
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] HELP!!! LISTBOX (index out off bounds (-1)), meio sem noção...
2008/11/7 Luiz ESCobar [EMAIL PROTECTED]: L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); --- aqui da o erro... // POREM repito, com o debug incluido não da o erro... // e só deu o problema depois que troquei o icone da aplicação, vai entender. Você não pode ler o item atual de uma lista vazia. Portanto: if LB_CC.Count = 0 then L_CC.Caption := Trim(LB_CC.Items[ LB_CC.itemindex ]); -- Joao Morais
[delphi-br] help - urgente
alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
Salve... Para impressão matricial (inclusive com etiquetas) eu utilizo o VDO de uma procurada, ele eh FREE ok! abraço Marcos Bernardo 2008/9/17 Leonardo Baldino [EMAIL PROTECTED] eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] emerson%40pyxisweb.com.br Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
alguma ideia de onde eu posso achar esse VDO 2008/9/17 Marcos Bernardo [EMAIL PROTECTED] Salve... Para impressão matricial (inclusive com etiquetas) eu utilizo o VDO de uma procurada, ele eh FREE ok! abraço Marcos Bernardo 2008/9/17 Leonardo Baldino [EMAIL PROTECTED]portaldoinferno%40gmail.com eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] emerson%40pyxisweb.com.bremerson% 40pyxisweb.com.br Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
Cara.. heheh Google http://www.google.com.br/search?hl=pt-BRq=VDOPrintmeta= abraço! 2008/9/17 Leonardo Baldino [EMAIL PROTECTED] alguma ideia de onde eu posso achar esse VDO 2008/9/17 Marcos Bernardo [EMAIL PROTECTED] xmarcos.aab%40gmail.com Salve... Para impressão matricial (inclusive com etiquetas) eu utilizo o VDO de uma procurada, ele eh FREE ok! abraço Marcos Bernardo 2008/9/17 Leonardo Baldino [EMAIL PROTECTED]portaldoinferno%40gmail.com portaldoinferno%40gmail.com eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] emerson%40pyxisweb.com.bremerson% 40pyxisweb.com.bremerson% 40pyxisweb.com.br Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] help - urgente
Olá pessoal, O VDO-Print está disponível para download no site oficial do componente ou no link: http://www.4shared.com/dir/5679510/48848609/Uploads.html Um abraço a todos! Silvio Clécio - Mensagem original De: Leonardo Baldino [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Quarta-feira, 17 de Setembro de 2008 17:32:38 Assunto: Re: [delphi-br] help - urgente alguma ideia de onde eu posso achar esse VDO 2008/9/17 Marcos Bernardo xmarcos.aab@ gmail.com Salve... Para impressão matricial (inclusive com etiquetas) eu utilizo o VDO de uma procurada, ele eh FREE ok! abraço Marcos Bernardo 2008/9/17 Leonardo Baldino portaldoinferno@ gmail.comportaldoinferno% 40gmail.com eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] com.br emerson%40pyxisweb .com.br emerson% 40pyxisweb.com. br Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] help - urgente
Pode usar o Fortes, inclua o componente rldraft e ajuste o tamanho do relatório (fpcustom). - Original Message - From: Leonardo Baldino To: delphi-br@yahoogrupos.com.br Sent: Wednesday, September 17, 2008 5:28 PM Subject: Re: [delphi-br] help - urgente eu estou testando em uma impressora matricial, em especifico numa epson LX-300+ 2008/9/17 Emerson [EMAIL PROTECTED] Em que tipo de Impressora vc está tentando? - Original Message - From: Leonardo Baldino To: Grupo_Delphi Sent: Wednesday, September 17, 2008 5:01 PM Subject: [delphi-br] help - urgente alguem sabe se algum componente que eu possa usar para imprimir etiquetas para mala direta com o endereço de um cliente por exemplo porque eu estou tentando com o fortes mas naum ta dando certo -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] -- Leonardo Carlos Baldino - The Highlander [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help Delphi x Word
Bom dia Pessoal, Por gentileza, pesquisei muito na internet e encontrei vários códigos que exemplificam como gravar um documento no Word através de comandos em Delphi. Gostaria de me aprofundar no assunto para poder aproveitar melhor seus recursos. A forma que estou usando é criar uma variável Doc do tipo Variant e em seguida defino: Doc := Word.Documents; Com isso posso usar: Doc.Open(Arquivo); //Para abrir o arquivo no Word Só que não consigo visualizar quais outros métodos eu poderia usar com este objeto. Por exemplo: Preciso saber qual o método para salvar como e não consigo visualizar para saber como usar. No Help do Delphi também não encontro nada disso. Alguém poderia me ajudar por gentileza. Grato, Ricardo.
RE: [delphi-br] Help Delphi x Word
Primeiro, vc precisa entender dois conceitos referentes à utilização de automação OLE: early-binding e late-binding. O conceito early-binding está relacionado à vc já ter conhecimento das classes e respectivos métodos existentes em um servidor OLE¹. Para entender esse conhecimento prévio, vamos tomar como exemplo o Delphi. Pra vc usar early-binding em Delphi vc tem que importar as definições de sua type-library² para uma unit onde nela vc terá todas as classes e seus respectivos métodos devidamente identificados. Com essa unit criada, basta fazer um uses para ela e o IDE do Delphi, por meio do seu recurso de code completion, já poderá auxiliar vc a saber quais as classes e respectivos métodos estão disponíveis. Em Visual Basic, vc adiciona uma referência à type library do servidor OLE e o IDE da ferramenta já 'enxerga' as definições de classes e métodos, como acontece tb no Delphi. O conceito late-binding diz respeito à vc fazer uso de um servidor OLE mas não ter conhecimento prévio sobre quais os métodos que uma determinada classe disponibiliza. Por isso que o Delphi não possui essa quiessência de saber, num passe de mágica, quais os métodos que uma determinada classe tem quando vc usa Variant para fazer automação OLE. O help do Delphi não irá lhe ajudar nesta tarefa inglória, pois a documentação das classes e métodos dos aplicativos do pacote MS Office fogem ao propósito do seu escopo, que é documentar o Delphi, e não o MS Office. Vc vai ter mesmo que pesquisar sobre isso na Internet. Uma ótima referência é o site MSDN da Microsoft (http://msdn.microsoft.com). Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 3 Jul 2008 12:32:35 + Subject: [delphi-br] Help Delphi x Word Bom dia Pessoal, Por gentileza, pesquisei muito na internet e encontrei vários códigos que exemplificam como gravar um documento no Word através de comandos em Delphi. Gostaria de me aprofundar no assunto para poder aproveitar melhor seus recursos. A forma que estou usando é criar uma variável Doc do tipo Variant e em seguida defino: Doc := Word.Documents; Com isso posso usar: Doc.Open(Arquivo); //Para abrir o arquivo no Word Só que não consigo visualizar quais outros métodos eu poderia usar com este objeto. Por exemplo: Preciso saber qual o método para salvar como e não consigo visualizar para saber como usar. No Help do Delphi também não encontro nada disso. Alguém poderia me ajudar por gentileza. Grato, Ricardo. _ Receba GRÁTIS as mensagens do Messenger no seu celular quando você estiver offline. Conheça o MSN Mobile! http://mobile.live.com/signup/signup2.aspx?lc=pt-br
RE: [delphi-br] Help Delphi x Word
P.S.: (1) Entenda com o servidor OLE como uma aplicação ou DLL baseada na tecnologia COM e que, por este motivo, possui subsídios para disponibilizar suas classes e respectivos métodos para que outras aplicações possam com ela interagir; (2) type-library é uma biblioteca de tipos. Consulta http://pt.wikipedia.org/wiki/Component_Object_Model pra saber pra que serve isso. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 3 Jul 2008 12:55:07 + Subject: RE: [delphi-br] Help Delphi x Word Primeiro, vc precisa entender dois conceitos referentes à utilização de automação OLE: early-binding e late-binding. O conceito early-binding está relacionado à vc já ter conhecimento das classes e respectivos métodos existentes em um servidor OLE¹. Para entender esse conhecimento prévio, vamos tomar como exemplo o Delphi. Pra vc usar early-binding em Delphi vc tem que importar as definições de sua type-library² para uma unit onde nela vc terá todas as classes e seus respectivos métodos devidamente identificados. Com essa unit criada, basta fazer um uses para ela e o IDE do Delphi, por meio do seu recurso de code completion, já poderá auxiliar vc a saber quais as classes e respectivos métodos estão disponíveis. Em Visual Basic, vc adiciona uma referência à type library do servidor OLE e o IDE da ferramenta já 'enxerga' as definições de classes e métodos, como acontece tb no Delphi. O conceito late-binding diz respeito à vc fazer uso de um servidor OLE mas não ter conhecimento prévio sobre quais os métodos que uma determinada classe disponibiliza. Por isso que o Delphi não possui essa quiessência de saber, num passe de mágica, quais os métodos que uma determinada classe tem quando vc usa Variant para fazer automação OLE. O help do Delphi não irá lhe ajudar nesta tarefa inglória, pois a documentação das classes e métodos dos aplicativos do pacote MS Office fogem ao propósito do seu escopo, que é documentar o Delphi, e não o MS Office. Vc vai ter mesmo que pesquisar sobre isso na Internet. Uma ótima referência é o site MSDN da Microsoft (http://msdn.microsoft.com). Boa sorte. Sds. To: delphi-br@yahoogrupos.com.br From: [EMAIL PROTECTED] Date: Thu, 3 Jul 2008 12:32:35 + Subject: [delphi-br] Help Delphi x Word Bom dia Pessoal, Por gentileza, pesquisei muito na internet e encontrei vários códigos que exemplificam como gravar um documento no Word através de comandos em Delphi. Gostaria de me aprofundar no assunto para poder aproveitar melhor seus recursos. A forma que estou usando é criar uma variável Doc do tipo Variant e em seguida defino: Doc := Word.Documents; Com isso posso usar: Doc.Open(Arquivo); //Para abrir o arquivo no Word Só que não consigo visualizar quais outros métodos eu poderia usar com este objeto. Por exemplo: Preciso saber qual o método para salvar como e não consigo visualizar para saber como usar. No Help do Delphi também não encontro nada disso. Alguém poderia me ajudar por gentileza. Grato, Ricardo. _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdomessenger.com.br/
RE: [delphi-br] Help Delphi x Word
Comece dando uma olhada nesses links: [ http://delphi.about.com/od/kbcontrolole/OLE_Automation_using_Delphi.htm ] [ http://www.djpate.freeserve.co.uk/Automation.htm ] E também aproveite e siga o conselho do Rubem para dar embasamento ao seu conhecimento. Atte, Ricardo. To: [EMAIL PROTECTED] os.com.br From: [EMAIL PROTECTED] com Date: Thu, 3 Jul 2008 12:32:35 + Subject: [delphi-br] Help Delphi x Word Bom dia Pessoal, Por gentileza, pesquisei muito na internet e encontrei vários códigos que exemplificam como gravar um documento no Word através de comandos em Delphi. Gostaria de me aprofundar no assunto para poder aproveitar melhor seus recursos. A forma que estou usando é criar uma variável Doc do tipo Variant e em seguida defino: Doc := Word.Documents; Com isso posso usar: Doc.Open(Arquivo) ; //Para abrir o arquivo no Word Só que não consigo visualizar quais outros métodos eu poderia usar com este objeto. Por exemplo: Preciso saber qual o método para salvar como e não consigo visualizar para saber como usar. No Help do Delphi também não encontro nada disso. Alguém poderia me ajudar por gentileza. Grato, Ricardo. _ _ _ _ _ _ Conheça o Windows Live Spaces, a rede de relacionamentos do Messenger! http://www.amigosdo messenger. com.br/ Novos endereços, o Yahoo! que você conhece. Crie um email novo com a sua cara @ymail.com ou @rocketmail.com. http://br.new.mail.yahoo.com/addresses [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Help Delphi x Word
Ricardo,
Fiz uma integração Delphi x Word há algum tempo. Dá uma olhada nos
trechos de código abaixo e veja se te ajuda. Lembro que a programação
prá isso era baseada no VBA. Você pode achar mais alguma coisa se
procurar por VBA word no google
MsWord := CreateOleObject('Word.Basic');
MsWord.AppShow;
MsWord.FileOpen( NomeCompleto );
{ Formata página }
MsWord.FilePageSetup( RightMargin := '2 cm', LeftMargin := '2 cm' );
{ Localiza o texto, seleciona as linhas e converte para tabela }
MsWord.EditFind( aTabela[A] );
MsWord.StartOfLine;
MsWord.LineDown( aLinha[A], 1 );
{ Converte o texto para tabela }
MsWord.TextToTable( ConvertFrom := 1, NumColumns := aColuna[A] );
MsWord.TableAutoFormat( Format := 16 );
{ Formata as colunas }
Coluna := aTamColuna[A];
Alinhamento := aAlinColuna[A];
{ Vai para primeira coluna }
MsWord.NextCell;
MsWord.TableSelectColumn;
for B := 0 to VarArrayHighBound( Coluna, 1 ) do begin
MsWord.FormatParagraph( Alignment := Alinhamento[B] );
MsWord.TableColumnWidth( ColumnWidth := Coluna[B], NextColumn
:= 1 );
end;
MsWord.LineDown( 1, 0 );
MsWord.EditFind('PATRIMÔNIO BRUTO');
MsWord.StartOfLine;
MsWord.LineDown( 1, 1 );
MsWord.FormatFont( Size := 12, Style := 'Bold' );
MsWord.EditFind( Find := 'ANEXO I', Direction := 1 ); { 1 - Acima }
MsWord.StartOfLine;
MsWord.InsertPageBreak;
MsWord.FileSave;
Abraço
[]'s
Malomar Alex Seminotti
Erechim - RS
Bom dia Pessoal,
Por gentileza, pesquisei muito na internet e encontrei vários códigos
que exemplificam como gravar um documento no Word através de comandos
em Delphi. Gostaria de me aprofundar no assunto para poder aproveitar
melhor seus recursos.
A forma que estou usando é criar uma variável Doc do tipo Variant e
em seguida defino:
Doc := Word.Documents;
Com isso posso usar:
Doc.Open(Arquivo) ; //Para abrir o arquivo no Word
Só que não consigo visualizar quais outros métodos eu poderia usar
com este objeto. Por exemplo: Preciso saber qual o método
para salvar como e não consigo visualizar para saber como usar. No
Help do Delphi também não encontro nada disso.
Alguém poderia me ajudar por gentileza.
Grato,
Ricardo.
[delphi-br] Help! Loucura da impressora Matricial x Rave
Boa tarde pipow Se alguem puder me ajudar, tenho um sistema em Windows XP e um sistema em Delphi onde imprimo NFs em folha solta em uma impressora matricial LX-810 feita em Rave Reports. Na mesma maquina tenho ligada na saida USB uma impressora Deskjet para todos os outros relatorios do sistema. O que acontece: - inicio da impressão começa uns 2 cm abaixo da posicao inicial da impressora. Ela tem que avançar umas 2 linhas e começar a imprimir - em toda 1a. impressão da matricial, seja pelo recarregamento do sistema ou troca para a impressora deskjet, ela nao pula os tais 2 cm, começando a imprimir direto onde o carro esta (e consequentemente bagunçando tudo). Eu tenho que cancelar a impressão, retirar o papel e religar a impressora. A partir dai sai tudo perfeito, desde que, como disse, não troque a impressora para deskjet ou feche o programa. Alguma ideia? Desje ja agradeço. Marô [As partes desta mensagem que não continham texto foram removidas]
Res: [delphi-br] Help
Tá faltando um datasource aí...rss De que forma vc tá linkando o ClientDataSet ao DataSetProvider? - Mensagem original De: dhsb [EMAIL PROTECTED] Para: delphi-br@yahoogrupos.com.br Enviadas: Segunda-feira, 17 de Setembro de 2007 15:46:44 Assunto: [delphi-br] Help Pessoal desculpe a insistencia mas voes poderiam me auxiliar na configuração dos componetes do DBexpress para consultar, inserir, editar, ecluir? Eu sei que os componentes são estes: SQLConnection SQLDataSet; DataSetProvider; ClientDataSet; Tentei gravar registros em uma tabela mas simplismente nao grava acho que esta faltando alguma configuração de algum componente. Valeu Flickr agora em português. Você clica, todo mundo vê. http://www.flickr.com.br/ [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help
Pessoal desculpe a insistencia mas voes poderiam me auxiliar na configuração dos componetes do DBexpress para consultar, inserir, editar, ecluir? Eu sei que os componentes são estes: SQLConnection SQLDataSet; DataSetProvider; ClientDataSet; Tentei gravar registros em uma tabela mas simplismente nao grava acho que esta faltando alguma configuração de algum componente. Valeu
[delphi-br] Help - Kernell32
Amigos, Como resolver o erro de Kernel32.dll quando executo o programa, em outra maquina ou na mesma com outro HD? Utilizo Delphi 2006, e firebird 1.54 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help - Erro ao fechar sistema
constantemente estou tendo um erro de acess violation ao fechar o sistema, nao eh sempre, talvez possa ser na impressao de ordem de serviço, como o QRP as vezes n mostrar o erro pode ser ele, mas tenho duvidas pq ao acessar o endereço do erro sempre esta caindo na unit do imagelist no procedimento: procedure TCustomImageList.UnRegisterChanges(Value: TChangeLink); var I: Integer; begin if Assigned(FClients) then for I := 0 to FClients.Count - 1 do if FClients[I] = Value then begin Value.Sender := nil; FClients.Delete(I); Break; end; end; alguem tem alguma ideia doque seja: ja tentei tirar os image list e recolocar Novo Yahoo! Cadê? - Experimente uma nova busca. http://yahoo.com.br/oqueeuganhocomisso [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help - Duvida conversão de delphi para csh arp
Pessoal E possivel converter uma aplicação windows feita em delphi para c# para web ? Existe alguma ferramenta ? Atenciosamente Stuart - Novo Yahoo! Cadê? - Experimente uma nova busca. [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help
Desculpa mais eu estou querendo configurar o GMail no meu outlook alguma pode me ajudar.
RES: [delphi-br] Help
No Site do GMail tem as instruções de como fazer isto, nada que uma boa procurada lá não vá resolver. []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8217 Fax: (31) 3389-8215 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de alan_adolfo2 Enviada em: quinta-feira, 15 de março de 2007 08:33 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help Desculpa mais eu estou querendo configurar o GMail no meu outlook alguma pode me ajudar. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos
Re: [delphi-br] Help
Creio q vc está disvirtuando o foco da lista.. caso queira fazer perguntas off topic mande emails para uma pessoa não para toda a lista. - Original Message - From: alan_adolfo2 To: delphi-br@yahoogrupos.com.br Sent: Thursday, March 15, 2007 8:33 AM Subject: [delphi-br] Help Desculpa mais eu estou querendo configurar o GMail no meu outlook alguma pode me ajudar. -- No virus found in this incoming message. Checked by AVG Free Edition. Version: 7.5.446 / Virus Database: 268.18.11/721 - Release Date: 13/3/2007 16:51 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help, pau do Report Builder
Preciso imprimir um livro de producao e estoque que contem 1102 paginas, ele esta dividido por Grupo (Group), porem em algumas paginas, ele usa somente meia pagina e salta para a proxima e preenche ela pagina totalmente,sendo isto intermitente, me socorram por favor. sds Auriston __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Help, pau do Report Builder
Verifique se na configuração do Grupo está para mudar de página. se estiver basta desmarcar. Verifique tbm, seu select... tipo, ordene ele pelo grupo seu... vamos supor: seu grupo é por CodBAR select * from produto where... order by codbar isso facilita a vida do ReportBuilder.. :o) []s Em 12/01/07, Auriston Lopes [EMAIL PROTECTED] escreveu: Preciso imprimir um livro de producao e estoque que contem 1102 paginas, ele esta dividido por Grupo (Group), porem em algumas paginas, ele usa somente meia pagina e salta para a proxima e preenche ela pagina totalmente,sendo isto intermitente, me socorram por favor. sds Auriston __ Fale com seus amigos de graça com o novo Yahoo! Messenger http://br.messenger.yahoo.com/ [As partes desta mensagem que não continham texto foram removidas] -- _ Fellipe Henrique [EMAIL PROTECTED] Venham até a borda, ele disse. Eles disseram: Nós temos medo. Venham até a borda, ele insistiu. Eles foram, Ele os empurrou... E eles voaram. (Guillaume Apollinaire) [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Help em Interfaces ...
E ai galera, seguinte. Estou querendo implementar algumas features no meu sistema e estou precisando manipular uma coleção de objetos com um TList por exemplo e em determinados momentos percorrer esta lista executando métodos destes objetos pelas interfaces que implementam. Por exemplo. Supondo que eu tenha a Interface A, e um monte de objetos que implementam esta interface que tem o método DoSomething. Em algum momento do meu código eu gostaria de correr esta lista de Objetos (que pode ser de qualuqer tipo, desde que implemente a Interface A) e executar seu método DoSomething sem nem me importar de que tipo é o objeto, chamando o método somente pela interface que implementa. Alguém tem um código similiar ou dica de como fazer ??? Anderson [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Help em Interfaces ...
anderson wrote: E ai galera, seguinte. Estou querendo implementar algumas features no meu sistema e estou precisando manipular uma coleção de objetos com um TList por exemplo e em determinados momentos percorrer esta lista executando métodos destes objetos pelas interfaces que implementam. Por exemplo. Supondo que eu tenha a Interface A, e um monte de objetos que implementam esta interface que tem o método DoSomething. Em algum momento do meu código eu gostaria de correr esta lista de Objetos (que pode ser de qualuqer tipo, desde que implemente a Interface A) e executar seu método DoSomething sem nem me importar de que tipo é o objeto, chamando o método somente pela interface que implementa. Alguém tem um código similiar ou dica de como fazer ??? Você pode fazer um wrapper para um TInterfaceList, colocar métodos Add(ISuaInterface) em seu wrapper, dentro dele fazer um cast dos itens para ISuaInterface, e então chamar o método. Não sou fã de interface e não conheço bem sua sintaxe, talvez você precise fazer um cast ou modificá-lo em um canto ou outro, mas a estrutura fica mais ou menos assim: TIntfAWrapper = class() private FList: IInterfaceList; public constructor Create; function Add(AItem: IIntfA): Integer; procedure Execute; end; function TIntfAWrapper.Add(AItem: IIntfA): Integer; begin FList.Add(AItem); end; constructor TIntfAWrapper.Create; begin inherited; FList := TInterfaceList.Create; end; procedure TIntfAWrapper.Execute; var I: Integer; begin for I := 0 to Pred(FList.Count) do (FList as IIntfA).Execute; end; -- João Morais
RES: [delphi-br] Help em Interfaces ...
Funcionou como uma luva, valeu mesmo, a única coisa que tive que mudar foi o tipo de TypeCast como segue abaixo Antes: for I := 0 to Pred(FList.Count) do (FList as IIntfA).Execute; Depois: for I := 0 to Pred(FList.Count) do IIntfA (FList[I]).Execute; Muito Obrigado, Anderson _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Joao Morais Enviada em: quarta-feira, 27 de dezembro de 2006 11:22 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Help em Interfaces ... anderson wrote: E ai galera, seguinte. Estou querendo implementar algumas features no meu sistema e estou precisando manipular uma coleção de objetos com um TList por exemplo e em determinados momentos percorrer esta lista executando métodos destes objetos pelas interfaces que implementam. Por exemplo. Supondo que eu tenha a Interface A, e um monte de objetos que implementam esta interface que tem o método DoSomething. Em algum momento do meu código eu gostaria de correr esta lista de Objetos (que pode ser de qualuqer tipo, desde que implemente a Interface A) e executar seu método DoSomething sem nem me importar de que tipo é o objeto, chamando o método somente pela interface que implementa. Alguém tem um código similiar ou dica de como fazer ??? Você pode fazer um wrapper para um TInterfaceList, colocar métodos Add(ISuaInterface) em seu wrapper, dentro dele fazer um cast dos itens para ISuaInterface, e então chamar o método. Não sou fã de interface e não conheço bem sua sintaxe, talvez você precise fazer um cast ou modificá-lo em um canto ou outro, mas a estrutura fica mais ou menos assim: TIntfAWrapper = class() private FList: IInterfaceList; public constructor Create; function Add(AItem: IIntfA): Integer; procedure Execute; end; function TIntfAWrapper.Add(AItem: IIntfA): Integer; begin FList.Add(AItem); end; constructor TIntfAWrapper.Create; begin inherited; FList := TInterfaceList.Create; end; procedure TIntfAWrapper.Execute; var I: Integer; begin for I := 0 to Pred(FList.Count) do (FList as IIntfA).Execute; end; -- João Morais [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Help codigo sobre Leitor Biometrico
Na revista Clube Delphi edição 76 saiu uma matéria muito boa sobre biometria e com alguns exemplos.Valeu... JESUS TE AMA !!! - Original Message - From: Wagner Loebel To: delphi-br@yahoogrupos.com.br Sent: Tuesday, October 03, 2006 1:54 AM Subject: Re: [delphi-br] Help codigo sobre Leitor Biometrico Alan Todos os leitores biométricos do mercado possuem uma placa processadora com algoritmos (firmware) super avançados que cada fabricante guarda à 7 chaves, isso porque ao longo dos anos a concorrência desse mercado vem pressionando os fabricantes a desenvolver produtos que proporcionem maior precisão e ao mesmo tempo maior velocidade para tratar uma leitura biométrica. Lá no começo com os primeiros modelos, se vc tivesse um pequeno arranhão no dedo, o equipamento já não reconhecia mais seu dedo. Hoje em dia melhorou muito e continua melhorando cada vez mais. Se vc quer ler a imagem da digital e criar seu próprio algoritmo p/ tratar a informação, desista. Ao redor do mundo, 24 horas por dia, há empresas investindo pesado e contratanto matemáticos e cientistas malucos p/ criar esses algoritmos cada vez mais perfeitos e todos fazem isso há muito tempo. O caminho para o pequeno desenvolvedor é escolher um fabricante (uma boa opção: www.nitgen.com.br ), adquirir uma SDK e aí sim, ter todo o material, documentação, protocolos, suporte e etc p/ poder fazer a integração com o leitor biométrico rapidamente sem ficar escovando bit adoidado Boa sorte, Wagner Loebel - Original Message - From: Alan Adolfo2 da Silva Pereira To: delphi-boleto ; Delphi-br Sent: Monday, October 02, 2006 5:27 PM Subject: [delphi-br] Help codigo sobre Leitor Biometrico Caros amigo do Delhpi. Estou a procura se um código, caso eu não acha gostaria de um auxilio do grupo pois este código será liberados para todos ao termino de meu desenvolvimento. Estou para desenvolver um sistema de capiturda de impreção digital com um equipamento de Leitor Biometrico, Gostaria de saber se alguem já utilizou algum código e se alguem poderia dar alguma dica de componentes para este tipo de programação. - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] [As partes desta mensagem que não continham texto foram removidas] [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help codigo sobre Leitor Biometrico
Alan uma vez eu conversei com uma rapaz que usava esses leitores e ele me falou q o leitor retorna um numero estilo código de barras, e vc validaria esse numero na sua base de dados. Eu acho que não tem segredo. -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Alan Adolfo2 da Silva Pereira Enviada em: segunda-feira, 2 de outubro de 2006 17:27 Para: delphi-boleto; Delphi-br Assunto: [delphi-br] Help codigo sobre Leitor Biometrico Caros amigo do Delhpi. Estou a procura se um código, caso eu não acha gostaria de um auxilio do grupo pois este código será liberados para todos ao termino de meu desenvolvimento. Estou para desenvolver um sistema de capiturda de impreção digital com um equipamento de Leitor Biometrico, Gostaria de saber se alguem já utilizou algum código e se alguem poderia dar alguma dica de componentes para este tipo de programação. - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help codigo sobre Leitor Biometrico
Caros amigo do Delhpi. Estou a procura se um código, caso eu não acha gostaria de um auxilio do grupo pois este código será liberados para todos ao termino de meu desenvolvimento. Estou para desenvolver um sistema de capiturda de impreção digital com um equipamento de Leitor Biometrico, Gostaria de saber se alguem já utilizou algum código e se alguem poderia dar alguma dica de componentes para este tipo de programação. - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help codigo sobre Leitor Biometrico
Alan Todos os leitores biométricos do mercado possuem uma placa processadora com algoritmos (firmware) super avançados que cada fabricante guarda à 7 chaves, isso porque ao longo dos anos a concorrência desse mercado vem pressionando os fabricantes a desenvolver produtos que proporcionem maior precisão e ao mesmo tempo maior velocidade para tratar uma leitura biométrica. Lá no começo com os primeiros modelos, se vc tivesse um pequeno arranhão no dedo, o equipamento já não reconhecia mais seu dedo. Hoje em dia melhorou muito e continua melhorando cada vez mais. Se vc quer ler a imagem da digital e criar seu próprio algoritmo p/ tratar a informação, desista. Ao redor do mundo, 24 horas por dia, há empresas investindo pesado e contratanto matemáticos e cientistas malucos p/ criar esses algoritmos cada vez mais perfeitos e todos fazem isso há muito tempo. O caminho para o pequeno desenvolvedor é escolher um fabricante (uma boa opção: www.nitgen.com.br ), adquirir uma SDK e aí sim, ter todo o material, documentação, protocolos, suporte e etc p/ poder fazer a integração com o leitor biométrico rapidamente sem ficar escovando bit adoidado Boa sorte, Wagner Loebel - Original Message - From: Alan Adolfo2 da Silva Pereira To: delphi-boleto ; Delphi-br Sent: Monday, October 02, 2006 5:27 PM Subject: [delphi-br] Help codigo sobre Leitor Biometrico Caros amigo do Delhpi. Estou a procura se um código, caso eu não acha gostaria de um auxilio do grupo pois este código será liberados para todos ao termino de meu desenvolvimento. Estou para desenvolver um sistema de capiturda de impreção digital com um equipamento de Leitor Biometrico, Gostaria de saber se alguem já utilizou algum código e se alguem poderia dar alguma dica de componentes para este tipo de programação. - Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! [As partes desta mensagem que não continham texto foram removidas] [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help Please
Pessoal... boa noite... Preciso da ajuda de vocês. Faz um ano que não trabalhava mais com delphi, voltei a estudar agora... e tem muita coisa que não lembro... Aos poucos vou lembrando e pedindo ajuda Estou com problema no Data Module... eu tinha salvo o form como dmescola, e a unit outro nome(data module2)... agora esta me dando branco, renomei o data module2 para dmescola, mais mesmo assim continua dando erro. Identifier redeclared 'DMEscola.' , ou então que o DMEscola não pode ser utilizado... Alguém pode me ajudar? O que eu devo fazer Obrigada - Yahoo! Search Música para ver e ouvir: You're Beautiful, do James Blunt [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help Please
Pessoal... boa noite... Preciso da ajuda de vocês. Faz um ano que não trabalhava mais com delphi, voltei a estudar agora... e tem muita coisa que não lembro... Aos poucos vou lembrando e pedindo ajuda Estou com problema no Data Module... eu tinha salvo o form como dmescola, e a unit outro nome(data module2)... agora esta me dando branco, renomei o data module2 para dmescola, mais mesmo assim continua dando erro. Identifier redeclared 'DMEscola.' , ou então que o DMEscola não pode ser utilizado... Alguém pode me ajudar? O que eu devo fazer Obrigada Emilene - Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help Please
Pessoal... boa noite... Preciso da ajuda de vocês. Faz um ano que não trabalhava mais com delphi, voltei a estudar agora... e tem muita coisa que não lembro... Aos poucos vou lembrando e pedindo ajuda Estou com problema no Data Module... eu tinha salvo o form como dmescola, e a unit outro nome(data module2)... agora esta me dando branco, renomei o data module2 para dmescola, mais mesmo assim continua dando erro. Identifier redeclared 'DMEscola.' , ou então que o DMEscola não pode ser utilizado... Alguém pode me ajudar? O que eu devo fazer Obrigada Emilene - Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help Please
Verifique o seu arquivo ... ele se chama dmescola.pas ?? ... verifique tb dentro do arquivo a primeira linha deve estar: unit dmescola; Att. Hélder Emi Monzani [EMAIL PROTECTED] escreveu: Pessoal... boa noite... Preciso da ajuda de vocês. Faz um ano que não trabalhava mais com delphi, voltei a estudar agora... e tem muita coisa que não lembro... Aos poucos vou lembrando e pedindo ajuda Estou com problema no Data Module... eu tinha salvo o form como dmescola, e a unit outro nome(data module2)... agora esta me dando branco, renomei o data module2 para dmescola, mais mesmo assim continua dando erro. Identifier redeclared 'DMEscola.' , ou então que o DMEscola não pode ser utilizado... Alguém pode me ajudar? O que eu devo fazer Obrigada Emilene - Novidade no Yahoo! Mail: receba alertas de novas mensagens no seu celular. Registre seu aparelho agora! [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos - 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 texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help para delphi 7
Alguém conhece algum software gratuito de gerar help para delphi 7? [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
RES: [delphi-br] Help para delphi 7
O proprio Help Workshop que vem com o Delphi. Procure no diretório \Help\Tools []s Walter Alves Chagas Junior Projeto e desenvolvimento de sistemas Telemont Engenharia de telecomunicações S/A Belo Horizonte - MG - Brasil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Adenes I. Freire Junior Enviada em: segunda-feira, 29 de maio de 2006 08:56 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help para delphi 7 Alguém conhece algum software gratuito de gerar help para delphi 7? [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
Re: [delphi-br] HELP PLEASE
Cara Jeanne, Para realizar o que vc quer vc tem a opção de utilizar-se da propriedade Handle, com ela vc conseguirá capturar o valor que esta contido em seu código, ou seja, 'TESTE A'. Espero ter ajudado, Cordialmente, Markos Suni Programador Delphi Instituto Damone [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: PUBLICIDADE Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[delphi-br] HELP PLEASE
Existe alguma forma de converter o conteúdo de uma string num atributo do objeto?
Tenho a seguinte Classe (Exemplo):
type
TTeste = class
private
FVa : String;
FVb : String;
FVc : String;
public
constructor Create; overload;
property Va : String read FVa write FVa;
property Vb: String read FVb write FVb;
property Vc: String read FVc write FVc;
end;
A classe q estou utilizando tem varios atributos, esse eh so um exemplo. O que tou querendo eh o seguinte... como eh que eu faço para encontrar dinamicamente o nome dessas propriedades (Va, Vb, Vc) e retornar seus valores? Tem como fazer isso? Espero que vcs entendam oq quero com o exemplo abaixo:
var
Software : TTeste; // Software eh instanciado no OnCreate do Form
constructor TTeste.Create;
begin
inherited Create;
FVa := 'Teste A';
FVb := 'Teste B';
FVc := 'Teste C';
end;
function getDescricaoCampo(Sender: TObject): String;
var
campo : String;
begin
// essa variavel CAMPO recebe o caminho de acesso ao atributo
// exemplo do resultado: campo := 'Software.Va';
campo := 'Software..'+ copy(TEdit(Sender).Name, 4, Length(TEdit(Sender).Name));
// Aqui eh que nao to sabendo fazer:
// A função está retornando a valor de CAMPO (Software.Va) e nao o conteudo de SOFTWARE.VA ('Teste A')
// Alguem sabe como devo fazer??
result := campo;
end;
Abraço
[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:
http://br.groups.yahoo.com/group/delphi-br/messages
* Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED]
Yahoo! Grupos, um serviço oferecido por:
PUBLICIDADE
Links do Yahoo! Grupos
Para visitar o site do seu grupo na web, acesse:http://br.groups.yahoo.com/group/delphi-br/
Para sair deste grupo, envie um e-mail para:[EMAIL PROTECTED]
O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!.
[delphi-br] Help
Pessoal, O help do Delphi 6 parou de funcionar, não tenho certeza se fiz algo de errado, só sei que a partir de agora quando tento entrar no help apareçe a mensagem: Não foi possível localizar o ponto de entrada do procedimento SetObjectOwner na biblioteca de vínculo dinâmico GDI32.dll Eu encontrei o arquivo GDI32.dll ele não foi apagado. Grato. Luciano [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help
Pessoal, O help do Delphi 6 parou de funcionar, não tenho certeza se fiz algo de errado, só sei que a partir de agora quando tento entrar no help apareçe a mensagem: Não foi possível localizar o ponto de entrada do procedimento SetObjectOwner na biblioteca de vínculo dinâmico GDI32.dll Eu encontrei o arquivo GDI32.dll ele não foi apagado. Grato. Luciano [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help
Por favor, gostaria de saber qual a melhor maneira de colocar um arquivo de ajuda em uma aplicação delphi, andei procurando pela internet, achei algumas, mas gostaria de saber a opinião dos membros deste grupo. Se alguem poder me ajudar ficaria muito grato. Desde já agradeço e que Deus os abençõem. Ps.: Utilizo delphi 7. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help do Delphi 5 em port uguês
Não existe. Não adianta nem tentar procurar. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] nome de Lipe Enviada em: domingo, 27 de novembro de 2005 02:53 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help do Delphi 5 em português Olá pessoal alguém tem os arquivos de help do delphi 5 em português? []'s -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos [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: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RE: [delphi-br] Help do Delphi 5 em portug uês
Não existem versões do help do Delphi 5 em português. O produto sempre vem com toda a sua documentação em inglês. Sds From: Lipe [EMAIL PROTECTED] Reply-To: delphi-br@yahoogrupos.com.br To: delphi-br@yahoogrupos.com.br Subject: [delphi-br] Help do Delphi 5 em português Date: Sun, 27 Nov 2005 03:53:11 -0200 Olá pessoal alguém tem os arquivos de help do delphi 5 em português? []'s _ MSN Hotmail, o maior webmail do Brasil. http://www.hotmail.com -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help do Delphi 5 em português
Olá pessoal alguém tem os arquivos de help do delphi 5 em português? []'s -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM * Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages * Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help Contex Popup
Alguém já conseguiu fazer aparecer PopUps de help na aplicação? (Help Contex Popup) Consegui fazer atravéz de um exemplo mas quando clico no componente, além do Popup, abre também o arquivo.hlp do meu programa. Quero que abra só o PopUp... e não o .HLP todo. Alguem ja conseguiu isso? Agradeço desde já a atenção de todos. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help .chm em delphi 7
Boa tarde a todos, Sou de uma empresa de lages, sc e estamos desenvolvendo o Help em chm do nosso sistema, e queremos fazer o help sensivel a cada janela, isto é , em cada janela que for chamado o arquivo de ajuda abrir o topico dessa janela, so que nao estou conseguindo chamar pelo topico, alguem sabe como fazer isso? seria de grande ajuda. Obrigado Akauam Pitrez Westphal __ Converse com seus amigos em tempo real com o Yahoo! Messenger http://br.download.yahoo.com/messenger/ [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help .chm em delphi 7
Boa tarde a todos, Sou de uma empresa de lages, sc e estamos desenvolvendo o Help em chm do nosso sistema, e queremos fazer o help sensivel a cada janela, isto é , em cada janela que for chamado o arquivo de ajuda abrir o topico dessa janela, so que nao estou conseguindo chamar pelo topico, alguem sabe como fazer isso? seria de grande ajuda. Obrigado Akauam Pitrez Westphal - Yahoo! Acesso Grátis: Internet rápida e grátis. Instale o discador agora! [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help Formulário
Ola! Estou com um problema, e pesso a ajuda do Grupo. Tenho um form Principal, de onde chamo um segundo form, nesse segundo form tenho um botão com a função de gerar um arquivo texto e exibir com o write do windows. O problema é o seguinte: quando ele gera esse arquivo e exibe com o write apos fechar o write percebo que o segundo form fechou. Como faço para o form continuar aberto. Grato. Genario. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
Ae Jéferson e Felippe Nagato,
Consegui resolver e ficou assim:
x := 1;
while x = Length(dbmemo3.Text) do
begin
if (Copy(dbmemo3.Text, x, 1) = ' ') or (x = 1) then
begin
table1.edit;
table1parcelas_data.AsDateTime:=strtodate(Copy(dbmemo3.Text, x,
9));
table1ano_final.Asfloat := table1ano_final.asfloat + 1;
table1parcelas_mes.AsString:= AnsiUpperCase(FormatDateTime('',
table1parcelas_Data.asdatetime));
table1parcelas_ano.AsFloat:= strtofloat(formatdatetime('',
table1parcelas_Data.asdatetime));
if table1parcelas_ano.asfloat = strtofloat(combobox1.Text) then
begin
if memo1.text = '' then
memo1.Text := table1ano_final.AsString + '/' +
table1nr_parcelas.AsString + ' - ' + table1parcelas_data.AsString
else
memo1.text := memo1.text + ' ' + table1ano_final.asstring +
'/' + table1nr_parcelas.asstring + ' - ' + table1parcelas_data.AsString;
end;
table1.Post;
end;
x := x + 1;
end;
Anderson
Rio Claro-SP
- Original Message -
From: Jéferson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 3:13 PM
Subject: Re: [delphi-br] Help
Estou querendo retirar a data do dbmemo3.text e atribuir a um campo da
table(parcelas_data) para verificação do ano.
Se o ano conferir com aquele pedido quero copiar a data para o
**Memo1.text**.
=
Não precisa atribuir o valor a um campo da tabela só para conferir se a
data
eh igual!
=
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 1:22 PM
Subject: Re: [delphi-br] Help
| Jéferson,
|
| O padrão sempre vai ser DD/MM/AA ...
| Estou querendo retirar a data do dbmemo3.text e atribuir a um campo da
| table(parcelas_data) para verificação do ano. Se o ano conferir com
aquele
| pedido quero copiar a data para o **Memo1.text**.
|
| Anderson
| Rio Claro-SP
| - Original Message -
| From: Jéferson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 10:32 AM
| Subject: Re: [delphi-br] Help
|
|
|
| O formato das datas no campo dbmemo3.text seguirá sempre o mesmo
padrao?
| (DD/MM/AA DD/MM/AA DD/MM/AA ...) ?
|
| Pq vc está atribuindo valores a **table1**? Se a cada entrada no if
vc
| substitui estes valores?
|
| Pelo q entendi vc quer copiar as datas de determinado ano do
| **dbmemo3.text** para o **Memo1.text**.
|
| É isto q vc quer?
|
| --
| Jéferson Mehlecke
| Porto Alegre - RS
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 10:16 AM
| Subject: Re: [delphi-br] Help
|
|
| | Jéferson,
| |
| | Mandei Código errado, na verdade o código é esse abaixo. Estou
tentando
| | retirar as datas gravadas no dbmemo3.text (neste formato 10/10/05
| 10/10/06
| | 10/10/07 11/04/05), pelo ano desejado, mas ele verifica a primeira
data
| | corretamente e no segundo loop ele retira duas datas de uma só vez
para
| | comparação. A saber:
| |
| |x := 1;
| |while x = Length(dbmemo3.Text) do // dbmemo3 : onde estao
gravadas
| as
| | datas
| |begin
| | if Copy(dbmemo3.Text, x, 1) = ' ' then
| | begin
| | table1.edit;
| | table1parcelas_data.Asstring:=Copy(dbmemo3.Text, x-8, x-1);
| | table1parcelas_mes.AsString:=
| AnsiUpperCase(FormatDateTime('',
| | table1parcelas_Data.asdatetime));
| | table1parcelas_ano.AsFloat:=
strtofloat(formatdatetime('',
| | table1parcelas_Data.asdatetime));
| | if table1parcelas_ano.asfloat = strtofloat(AnoPedido.Text)
then
| | begin
| | if memo1.text = '' then
| |memo1.Text := table1parcelas_data.AsString
| | else
| |memo1.text := memo1.text + ' ' +
| | table1parcelas_data.asstring;
| | end;
| | table1.Post;
| | end;
| | x := x + 1;
| | end;
| |
| |
| | Anderson
| | Rio Claro-SP
| |
| |
| | - Original Message -
| | From: Jéferson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Thursday, July 28, 2005 7:54 AM
| | Subject: Re: [delphi-br] Help
| |
| |
| |
| | Anderson,
| |
| | Como diria o Jack, vamos por partes...
| |
| | Porque vc está fazendo um laço em **Edit1.text**?
| |
| | Copiando a data de **dbmemo3.Text**?
| |
| | E concatenando o resultado em **edit2.text**?
| |
| | O que **Table1.edit e Table1.post** estão fazendo fora do if?
| |
| |
| | Tente explicar melhor qual resultado vc deseja obter?
| |
| | --
| | Jéferson Mehlecke
| | Porto Alegre - RS
Re: [delphi-br] Help!!!!
Anderson,
Como diria o Jack, vamos por partes...
Porque vc está fazendo um laço em **Edit1.text**?
Copiando a data de **dbmemo3.Text**?
E concatenando o resultado em **edit2.text**?
O que **Table1.edit e Table1.post** estão fazendo fora do if?
Tente explicar melhor qual resultado vc deseja obter?
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Wednesday, July 27, 2005 4:18 PM
Subject: Re: [delphi-br] Help
| Jéferson, eu tentei assim, mas na primeira data ele retorna certo, só que
na
| segunda ele dá mensagem de erro pois esta retornando duas datas de uma só
| vez.
|
|x:=1;
|while x = Length(Edit1.Text) do
|begin
| table1.edit;
| if Copy(edit1.Text, x, 1) = ' ' then
| begin
| editData.Asstring:=Copy(dbmemo3.Text, x-8, x-1); //recebe data
| editAno.AsFloat:= strtofloat(formatdatetime('',
| table1parcelas_Data.asdatetime)); //retira ano de data
| if editAno.asfloat = '2005' then
|edit2.text := edit2.text + ' ' + editData.asstring;
| end;
| x := x + 1;
| table1.post;
|end;
|
|
| - Original Message -
| From: Jéferson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Tuesday, July 26, 2005 2:38 PM
| Subject: Re: [delphi-br] Help
|
|
|
| Seguindo o teu próprio raciocínio
|
| ==
| Edit2.Text := '';
| X := 1;
| while X = Length(Edit1.Text) do
| begin
| if Copy(Edit1.Text, X+6,2) = '05' then//vê se eh o ano
desejado
| 05
| begin
| Edit2.Text := Edit2.Text + Copy(Edit1.Text, X,9); //
| copia
| a data inteia
| end;
| X := X + 9;
| end;
|
|
| --
| Jéferson Mehlecke
| Porto Alegre - RS
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Tuesday, July 26, 2005 2:07 PM
| Subject: Re: [delphi-br] Help
|
|
| | E como seria o código? Abaixo eu consigo retirar a primeira data
| |
| | X := 1;
| |while X = Length(Edit1.Text) do
| |begin
| | if Copy(Edit1.Text, X, 8) = ' ' then
| | begin
| | ShowMessage(Copy(Edit1.Text, 1, X));
| | Exit;
| | end;
| | X := X + 1;
| |end;
| |
| | - Original Message -
| | From: FILIPE - GURU [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 10:27 AM
| | Subject: Re: [delphi-br] Help
| |
| |
| | procura por um espaço, vai voltando ateh achar um /, depois copia
o
| | conteudo ateh chegar um espaço, e assim por diante...
| |
| |
| | - Original Message -
| | From: Anderson [EMAIL PROTECTED]
| | To: Grupo Delphi delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 10:07 AM
| | Subject: [delphi-br] Help
| |
| |
| | Aes galera...
| |
| | Se alguem poder me ajudar, naum aguento mais ver este programinha
que
| | estou
| | desenvolvendo
| |
| | Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28
| datas.
| | Ex:
| | 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em
| branco.
| | Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um
| outro
| | campo de 252 de tamanho...
| | Eu teria que percorrer todo o campo e comparando as datas? como faço
| isso?
| | Tô ficando louco!!
| |
| | Se alguem me ajudar, vlw
| | Anderson
___
Yahoo! Acesso Grátis - Internet rápida e grátis.
Instale o discador agora! http://br.acesso.yahoo.com/
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
O formato das datas no campo dbmemo3.text seguirá sempre o mesmo padrao?
(DD/MM/AA DD/MM/AA DD/MM/AA ...) ?
Pq vc está atribuindo valores a **table1**? Se a cada entrada no if vc
substitui estes valores?
Pelo q entendi vc quer copiar as datas de determinado ano do
**dbmemo3.text** para o **Memo1.text**.
É isto q vc quer?
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 10:16 AM
Subject: Re: [delphi-br] Help
| Jéferson,
|
| Mandei Código errado, na verdade o código é esse abaixo. Estou tentando
| retirar as datas gravadas no dbmemo3.text (neste formato 10/10/05
10/10/06
| 10/10/07 11/04/05), pelo ano desejado, mas ele verifica a primeira data
| corretamente e no segundo loop ele retira duas datas de uma só vez para
| comparação. A saber:
|
|x := 1;
|while x = Length(dbmemo3.Text) do // dbmemo3 : onde estao gravadas as
| datas
|begin
| if Copy(dbmemo3.Text, x, 1) = ' ' then
| begin
| table1.edit;
| table1parcelas_data.Asstring:=Copy(dbmemo3.Text, x-8, x-1);
| table1parcelas_mes.AsString:=
AnsiUpperCase(FormatDateTime('',
| table1parcelas_Data.asdatetime));
| table1parcelas_ano.AsFloat:= strtofloat(formatdatetime('',
| table1parcelas_Data.asdatetime));
| if table1parcelas_ano.asfloat = strtofloat(AnoPedido.Text) then
| begin
| if memo1.text = '' then
|memo1.Text := table1parcelas_data.AsString
| else
|memo1.text := memo1.text + ' ' +
| table1parcelas_data.asstring;
| end;
| table1.Post;
| end;
| x := x + 1;
| end;
|
|
| Anderson
| Rio Claro-SP
|
|
| - Original Message -
| From: Jéferson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 7:54 AM
| Subject: Re: [delphi-br] Help
|
|
|
| Anderson,
|
| Como diria o Jack, vamos por partes...
|
| Porque vc está fazendo um laço em **Edit1.text**?
|
| Copiando a data de **dbmemo3.Text**?
|
| E concatenando o resultado em **edit2.text**?
|
| O que **Table1.edit e Table1.post** estão fazendo fora do if?
|
|
| Tente explicar melhor qual resultado vc deseja obter?
|
| --
| Jéferson Mehlecke
| Porto Alegre - RS
|
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Wednesday, July 27, 2005 4:18 PM
| Subject: Re: [delphi-br] Help
|
|
| | Jéferson, eu tentei assim, mas na primeira data ele retorna certo, só
| que
| na
| | segunda ele dá mensagem de erro pois esta retornando duas datas de uma
| só
| | vez.
| |
| |x:=1;
| |while x = Length(Edit1.Text) do
| |begin
| | table1.edit;
| | if Copy(edit1.Text, x, 1) = ' ' then
| | begin
| | editData.Asstring:=Copy(dbmemo3.Text, x-8, x-1); //recebe
data
| | editAno.AsFloat:= strtofloat(formatdatetime('',
| | table1parcelas_Data.asdatetime)); //retira ano de data
| | if editAno.asfloat = '2005' then
| |edit2.text := edit2.text + ' ' + editData.asstring;
| | end;
| | x := x + 1;
| | table1.post;
| |end;
| |
| |
| | - Original Message -
| | From: Jéferson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 2:38 PM
| | Subject: Re: [delphi-br] Help
| |
| |
| |
| | Seguindo o teu próprio raciocínio
| |
| | ==
| | Edit2.Text := '';
| | X := 1;
| | while X = Length(Edit1.Text) do
| | begin
| | if Copy(Edit1.Text, X+6,2) = '05' then//vê se eh o ano
| desejado
| | 05
| | begin
| | Edit2.Text := Edit2.Text + Copy(Edit1.Text, X,9);
//
| | copia
| | a data inteia
| | end;
| | X := X + 9;
| | end;
| |
| |
| | --
| | Jéferson Mehlecke
| | Porto Alegre - RS
| | - Original Message -
| | From: Anderson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 2:07 PM
| | Subject: Re: [delphi-br] Help
| |
| |
| | | E como seria o código? Abaixo eu consigo retirar a primeira
data
| | |
| | | X := 1;
| | |while X = Length(Edit1.Text) do
| | |begin
| | | if Copy(Edit1.Text, X, 8) = ' ' then
| | | begin
| | | ShowMessage(Copy(Edit1.Text, 1, X));
| | | Exit;
| | | end;
| | | X := X + 1;
| | |end;
| | |
| | | - Original Message -
| | | From: FILIPE - GURU [EMAIL PROTECTED]
| | | To: delphi-br@yahoogrupos.com.br
| | | Sent: Tuesday, July 26, 2005 10:27 AM
| | | Subject: Re: [delphi-br] Help
| | |
| | |
| | | procura por um espaço, vai voltando ateh achar um /, depois
| copia
| o
| | | conteudo ateh chegar um espaço, e assim por diante
Re: [delphi-br] Help!!!!
Jéferson,
O padrão sempre vai ser DD/MM/AA ...
Estou querendo retirar a data do dbmemo3.text e atribuir a um campo da
table(parcelas_data) para verificação do ano. Se o ano conferir com aquele
pedido quero copiar a data para o **Memo1.text**.
Anderson
Rio Claro-SP
- Original Message -
From: Jéferson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 10:32 AM
Subject: Re: [delphi-br] Help
O formato das datas no campo dbmemo3.text seguirá sempre o mesmo padrao?
(DD/MM/AA DD/MM/AA DD/MM/AA ...) ?
Pq vc está atribuindo valores a **table1**? Se a cada entrada no if vc
substitui estes valores?
Pelo q entendi vc quer copiar as datas de determinado ano do
**dbmemo3.text** para o **Memo1.text**.
É isto q vc quer?
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 10:16 AM
Subject: Re: [delphi-br] Help
| Jéferson,
|
| Mandei Código errado, na verdade o código é esse abaixo. Estou tentando
| retirar as datas gravadas no dbmemo3.text (neste formato 10/10/05
10/10/06
| 10/10/07 11/04/05), pelo ano desejado, mas ele verifica a primeira data
| corretamente e no segundo loop ele retira duas datas de uma só vez para
| comparação. A saber:
|
|x := 1;
|while x = Length(dbmemo3.Text) do // dbmemo3 : onde estao gravadas
as
| datas
|begin
| if Copy(dbmemo3.Text, x, 1) = ' ' then
| begin
| table1.edit;
| table1parcelas_data.Asstring:=Copy(dbmemo3.Text, x-8, x-1);
| table1parcelas_mes.AsString:=
AnsiUpperCase(FormatDateTime('',
| table1parcelas_Data.asdatetime));
| table1parcelas_ano.AsFloat:= strtofloat(formatdatetime('',
| table1parcelas_Data.asdatetime));
| if table1parcelas_ano.asfloat = strtofloat(AnoPedido.Text) then
| begin
| if memo1.text = '' then
|memo1.Text := table1parcelas_data.AsString
| else
|memo1.text := memo1.text + ' ' +
| table1parcelas_data.asstring;
| end;
| table1.Post;
| end;
| x := x + 1;
| end;
|
|
| Anderson
| Rio Claro-SP
|
|
| - Original Message -
| From: Jéferson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 7:54 AM
| Subject: Re: [delphi-br] Help
|
|
|
| Anderson,
|
| Como diria o Jack, vamos por partes...
|
| Porque vc está fazendo um laço em **Edit1.text**?
|
| Copiando a data de **dbmemo3.Text**?
|
| E concatenando o resultado em **edit2.text**?
|
| O que **Table1.edit e Table1.post** estão fazendo fora do if?
|
|
| Tente explicar melhor qual resultado vc deseja obter?
|
| --
| Jéferson Mehlecke
| Porto Alegre - RS
|
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Wednesday, July 27, 2005 4:18 PM
| Subject: Re: [delphi-br] Help
|
|
| | Jéferson, eu tentei assim, mas na primeira data ele retorna certo,
só
| que
| na
| | segunda ele dá mensagem de erro pois esta retornando duas datas de
uma
| só
| | vez.
| |
| |x:=1;
| |while x = Length(Edit1.Text) do
| |begin
| | table1.edit;
| | if Copy(edit1.Text, x, 1) = ' ' then
| | begin
| | editData.Asstring:=Copy(dbmemo3.Text, x-8, x-1); //recebe
data
| | editAno.AsFloat:= strtofloat(formatdatetime('',
| | table1parcelas_Data.asdatetime)); //retira ano de data
| | if editAno.asfloat = '2005' then
| |edit2.text := edit2.text + ' ' + editData.asstring;
| | end;
| | x := x + 1;
| | table1.post;
| |end;
| |
| |
| | - Original Message -
| | From: Jéferson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 2:38 PM
| | Subject: Re: [delphi-br] Help
| |
| |
| |
| | Seguindo o teu próprio raciocínio
| |
| | ==
| | Edit2.Text := '';
| | X := 1;
| | while X = Length(Edit1.Text) do
| | begin
| | if Copy(Edit1.Text, X+6,2) = '05' then//vê se eh o ano
| desejado
| | 05
| | begin
| | Edit2.Text := Edit2.Text + Copy(Edit1.Text, X,9);
//
| | copia
| | a data inteia
| | end;
| | X := X + 9;
| | end;
| |
| |
| | --
| | Jéferson Mehlecke
| | Porto Alegre - RS
| | - Original Message -
| | From: Anderson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Tuesday, July 26, 2005 2:07 PM
| | Subject: Re: [delphi-br] Help
| |
| |
| | | E como seria o código? Abaixo eu consigo retirar a primeira
data
| | |
| | | X := 1;
| | |while X = Length(Edit1.Text) do
| | |begin
Re: [delphi-br] Help!!!!
Estou querendo retirar a data do dbmemo3.text e atribuir a um campo da
table(parcelas_data) para verificação do ano.
Se o ano conferir com aquele pedido quero copiar a data para o
**Memo1.text**.
=
Não precisa atribuir o valor a um campo da tabela só para conferir se a data
eh igual!
=
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Thursday, July 28, 2005 1:22 PM
Subject: Re: [delphi-br] Help
| Jéferson,
|
| O padrão sempre vai ser DD/MM/AA ...
| Estou querendo retirar a data do dbmemo3.text e atribuir a um campo da
| table(parcelas_data) para verificação do ano. Se o ano conferir com aquele
| pedido quero copiar a data para o **Memo1.text**.
|
| Anderson
| Rio Claro-SP
| - Original Message -
| From: Jéferson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 10:32 AM
| Subject: Re: [delphi-br] Help
|
|
|
| O formato das datas no campo dbmemo3.text seguirá sempre o mesmo padrao?
| (DD/MM/AA DD/MM/AA DD/MM/AA ...) ?
|
| Pq vc está atribuindo valores a **table1**? Se a cada entrada no if vc
| substitui estes valores?
|
| Pelo q entendi vc quer copiar as datas de determinado ano do
| **dbmemo3.text** para o **Memo1.text**.
|
| É isto q vc quer?
|
| --
| Jéferson Mehlecke
| Porto Alegre - RS
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Thursday, July 28, 2005 10:16 AM
| Subject: Re: [delphi-br] Help
|
|
| | Jéferson,
| |
| | Mandei Código errado, na verdade o código é esse abaixo. Estou
tentando
| | retirar as datas gravadas no dbmemo3.text (neste formato 10/10/05
| 10/10/06
| | 10/10/07 11/04/05), pelo ano desejado, mas ele verifica a primeira
data
| | corretamente e no segundo loop ele retira duas datas de uma só vez
para
| | comparação. A saber:
| |
| |x := 1;
| |while x = Length(dbmemo3.Text) do // dbmemo3 : onde estao gravadas
| as
| | datas
| |begin
| | if Copy(dbmemo3.Text, x, 1) = ' ' then
| | begin
| | table1.edit;
| | table1parcelas_data.Asstring:=Copy(dbmemo3.Text, x-8, x-1);
| | table1parcelas_mes.AsString:=
| AnsiUpperCase(FormatDateTime('',
| | table1parcelas_Data.asdatetime));
| | table1parcelas_ano.AsFloat:=
strtofloat(formatdatetime('',
| | table1parcelas_Data.asdatetime));
| | if table1parcelas_ano.asfloat = strtofloat(AnoPedido.Text)
then
| | begin
| | if memo1.text = '' then
| |memo1.Text := table1parcelas_data.AsString
| | else
| |memo1.text := memo1.text + ' ' +
| | table1parcelas_data.asstring;
| | end;
| | table1.Post;
| | end;
| | x := x + 1;
| | end;
| |
| |
| | Anderson
| | Rio Claro-SP
| |
| |
| | - Original Message -
| | From: Jéferson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Thursday, July 28, 2005 7:54 AM
| | Subject: Re: [delphi-br] Help
| |
| |
| |
| | Anderson,
| |
| | Como diria o Jack, vamos por partes...
| |
| | Porque vc está fazendo um laço em **Edit1.text**?
| |
| | Copiando a data de **dbmemo3.Text**?
| |
| | E concatenando o resultado em **edit2.text**?
| |
| | O que **Table1.edit e Table1.post** estão fazendo fora do if?
| |
| |
| | Tente explicar melhor qual resultado vc deseja obter?
| |
| | --
| | Jéferson Mehlecke
| | Porto Alegre - RS
| |
| | - Original Message -
| | From: Anderson [EMAIL PROTECTED]
| | To: delphi-br@yahoogrupos.com.br
| | Sent: Wednesday, July 27, 2005 4:18 PM
| | Subject: Re: [delphi-br] Help
| |
| |
| | | Jéferson, eu tentei assim, mas na primeira data ele retorna certo,
| só
| | que
| | na
| | | segunda ele dá mensagem de erro pois esta retornando duas datas de
| uma
| | só
| | | vez.
| | |
| | |x:=1;
| | |while x = Length(Edit1.Text) do
| | |begin
| | | table1.edit;
| | | if Copy(edit1.Text, x, 1) = ' ' then
| | | begin
| | | editData.Asstring:=Copy(dbmemo3.Text, x-8, x-1); //recebe
| data
| | | editAno.AsFloat:= strtofloat(formatdatetime('',
| | | table1parcelas_Data.asdatetime)); //retira ano de data
| | | if editAno.asfloat = '2005' then
| | |edit2.text := edit2.text + ' ' + editData.asstring;
| | | end;
| | | x := x + 1;
| | | table1.post;
| | |end;
| | |
| | |
| | | - Original Message -
| | | From: Jéferson [EMAIL PROTECTED]
| | | To: delphi-br@yahoogrupos.com.br
| | | Sent: Tuesday, July 26, 2005 2:38 PM
| | | Subject: Re: [delphi-br] Help
| | |
| | |
| | |
| | | Seguindo o teu próprio raciocínio
| | |
| | | ==
| | | Edit2.Text := '';
| | | X := 1
Re: [delphi-br] Help!!!!
Jéferson, eu tentei assim, mas na primeira data ele retorna certo, só que na
segunda ele dá mensagem de erro pois esta retornando duas datas de uma só
vez.
x:=1;
while x = Length(Edit1.Text) do
begin
table1.edit;
if Copy(edit1.Text, x, 1) = ' ' then
begin
editData.Asstring:=Copy(dbmemo3.Text, x-8, x-1); //recebe data
editAno.AsFloat:= strtofloat(formatdatetime('',
table1parcelas_Data.asdatetime)); //retira ano de data
if editAno.asfloat = '2005' then
edit2.text := edit2.text + ' ' + editData.asstring;
end;
x := x + 1;
table1.post;
end;
- Original Message -
From: Jéferson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, July 26, 2005 2:38 PM
Subject: Re: [delphi-br] Help
Seguindo o teu próprio raciocínio
==
Edit2.Text := '';
X := 1;
while X = Length(Edit1.Text) do
begin
if Copy(Edit1.Text, X+6,2) = '05' then//vê se eh o ano desejado
05
begin
Edit2.Text := Edit2.Text + Copy(Edit1.Text, X,9); //
copia
a data inteia
end;
X := X + 9;
end;
--
Jéferson Mehlecke
Porto Alegre - RS
- Original Message -
From: Anderson [EMAIL PROTECTED]
To: delphi-br@yahoogrupos.com.br
Sent: Tuesday, July 26, 2005 2:07 PM
Subject: Re: [delphi-br] Help
| E como seria o código? Abaixo eu consigo retirar a primeira data
|
| X := 1;
|while X = Length(Edit1.Text) do
|begin
| if Copy(Edit1.Text, X, 8) = ' ' then
| begin
| ShowMessage(Copy(Edit1.Text, 1, X));
| Exit;
| end;
| X := X + 1;
|end;
|
| - Original Message -
| From: FILIPE - GURU [EMAIL PROTECTED]
| To: delphi-br@yahoogrupos.com.br
| Sent: Tuesday, July 26, 2005 10:27 AM
| Subject: Re: [delphi-br] Help
|
|
| procura por um espaço, vai voltando ateh achar um /, depois copia o
| conteudo ateh chegar um espaço, e assim por diante...
|
|
| - Original Message -
| From: Anderson [EMAIL PROTECTED]
| To: Grupo Delphi delphi-br@yahoogrupos.com.br
| Sent: Tuesday, July 26, 2005 10:07 AM
| Subject: [delphi-br] Help
|
|
| Aes galera...
|
| Se alguem poder me ajudar, naum aguento mais ver este programinha que
| estou
| desenvolvendo
|
| Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28
datas.
| Ex:
| 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em
branco.
| Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um
outro
| campo de 252 de tamanho...
| Eu teria que percorrer todo o campo e comparando as datas? como faço
isso?
| Tô ficando louco!!
|
| Se alguem me ajudar, vlw
| Anderson
|
| [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:
| http://br.groups.yahoo.com/group/delphi-br/messages
|
| Para falar com o moderador, envie um e-mail para:
| [EMAIL PROTECTED] ou [EMAIL PROTECTED]
|
| Links do Yahoo! Grupos
|
|
|
|
|
|
|
|
|
|
|
|
|
| --
| FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
|
| Para ver as mensagens antigas, acesse:
| http://br.groups.yahoo.com/group/delphi-br/messages
|
| Para falar com o moderador, envie um e-mail para:
| [EMAIL PROTECTED] ou [EMAIL PROTECTED]
|
| Links do Yahoo! Grupos
|
|
|
|
|
|
|
|
|
|
|
|
| --
| FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
|
| Para ver as mensagens antigas, acesse:
| http://br.groups.yahoo.com/group/delphi-br/messages
|
| Para falar com o moderador, envie um e-mail para:
| [EMAIL PROTECTED] ou [EMAIL PROTECTED]
|
| Links do Yahoo! Grupos
|
|
|
|
|
|
|
|
___
Yahoo! Acesso Grátis - Internet rápida e grátis.
Instale o discador agora! http://br.acesso.yahoo.com/
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
[delphi-br] Help!!!!
Aes galera... Se alguem poder me ajudar, naum aguento mais ver este programinha que estou desenvolvendo Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28 datas. Ex: 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em branco. Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um outro campo de 252 de tamanho... Eu teria que percorrer todo o campo e comparando as datas? como faço isso? Tô ficando louco!! Se alguem me ajudar, vlw Anderson [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
procura por um espaço, vai voltando ateh achar um /, depois copia o conteudo ateh chegar um espaço, e assim por diante... - Original Message - From: Anderson [EMAIL PROTECTED] To: Grupo Delphi delphi-br@yahoogrupos.com.br Sent: Tuesday, July 26, 2005 10:07 AM Subject: [delphi-br] Help Aes galera... Se alguem poder me ajudar, naum aguento mais ver este programinha que estou desenvolvendo Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28 datas. Ex: 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em branco. Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um outro campo de 252 de tamanho... Eu teria que percorrer todo o campo e comparando as datas? como faço isso? Tô ficando louco!! Se alguem me ajudar, vlw Anderson [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
E como seria o código? Abaixo eu consigo retirar a primeira data X := 1; while X = Length(Edit1.Text) do begin if Copy(Edit1.Text, X, 1) = ' ' then begin ShowMessage(Copy(Edit1.Text, 1, X)); Exit; end; X := X + 1; end; - Original Message - From: FILIPE - GURU [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 26, 2005 10:27 AM Subject: Re: [delphi-br] Help procura por um espaço, vai voltando ateh achar um /, depois copia o conteudo ateh chegar um espaço, e assim por diante... - Original Message - From: Anderson [EMAIL PROTECTED] To: Grupo Delphi delphi-br@yahoogrupos.com.br Sent: Tuesday, July 26, 2005 10:07 AM Subject: [delphi-br] Help Aes galera... Se alguem poder me ajudar, naum aguento mais ver este programinha que estou desenvolvendo Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28 datas. Ex: 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em branco. Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um outro campo de 252 de tamanho... Eu teria que percorrer todo o campo e comparando as datas? como faço isso? Tô ficando louco!! Se alguem me ajudar, vlw Anderson [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
Seguindo o teu próprio raciocínio == Edit2.Text := ''; X := 1; while X = Length(Edit1.Text) do begin if Copy(Edit1.Text, X+6,2) = '05' then//vê se eh o ano desejado 05 begin Edit2.Text := Edit2.Text + Copy(Edit1.Text, X,9); // copia a data inteia end; X := X + 9; end; -- Jéferson Mehlecke Porto Alegre - RS - Original Message - From: Anderson [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Tuesday, July 26, 2005 2:07 PM Subject: Re: [delphi-br] Help | E como seria o código? Abaixo eu consigo retirar a primeira data | | X := 1; |while X = Length(Edit1.Text) do |begin | if Copy(Edit1.Text, X, 8) = ' ' then | begin | ShowMessage(Copy(Edit1.Text, 1, X)); | Exit; | end; | X := X + 1; |end; | | - Original Message - | From: FILIPE - GURU [EMAIL PROTECTED] | To: delphi-br@yahoogrupos.com.br | Sent: Tuesday, July 26, 2005 10:27 AM | Subject: Re: [delphi-br] Help | | | procura por um espaço, vai voltando ateh achar um /, depois copia o | conteudo ateh chegar um espaço, e assim por diante... | | | - Original Message - | From: Anderson [EMAIL PROTECTED] | To: Grupo Delphi delphi-br@yahoogrupos.com.br | Sent: Tuesday, July 26, 2005 10:07 AM | Subject: [delphi-br] Help | | | Aes galera... | | Se alguem poder me ajudar, naum aguento mais ver este programinha que | estou | desenvolvendo | | Eu tenho um campo alfha de 252 de tamanho, no qual guardo até 28 datas. | Ex: | 20/05/05 20/06/05 20/07/05 . Entre as datas ha um espaço em branco. | Eu preciso ao escolhar um ano, colocar as datas do ano pedido em um outro | campo de 252 de tamanho... | Eu teria que percorrer todo o campo e comparando as datas? como faço isso? | Tô ficando louco!! | | Se alguem me ajudar, vlw | Anderson | | [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: | http://br.groups.yahoo.com/group/delphi-br/messages | | Para falar com o moderador, envie um e-mail para: | [EMAIL PROTECTED] ou [EMAIL PROTECTED] | | Links do Yahoo! Grupos | | | | | | | | | | | | | | -- | FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM | | Para ver as mensagens antigas, acesse: | http://br.groups.yahoo.com/group/delphi-br/messages | | Para falar com o moderador, envie um e-mail para: | [EMAIL PROTECTED] ou [EMAIL PROTECTED] | | Links do Yahoo! Grupos | | | | | | | | | | | | | -- | FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM | | Para ver as mensagens antigas, acesse: | http://br.groups.yahoo.com/group/delphi-br/messages | | Para falar com o moderador, envie um e-mail para: | [EMAIL PROTECTED] ou [EMAIL PROTECTED] | | Links do Yahoo! Grupos | | | | | | | | ___ Yahoo! Acesso Grátis - Internet rápida e grátis. Instale o discador agora! http://br.acesso.yahoo.com/ -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!!!
Poderia ser feito assim, desde que as datas sigam um padrão do tipo:
01/01/05 (ou seja, 8 caracteres por data)
No caso, seria interessante desativar Stop on Delphi Exceptions em
Debugger Options.
uses DateUtils;
function PegaDatas (Datas : String; Ano : Word) : String;
var
i : integer;
t : TDate;
function DataEhValida(Data : String) : Boolean;
begin
Result := True;
try
strtodate(Data);
except
Result := False;
end;
end;
begin
i := 1;
while DataEhValida(copy(Datas, i, 8)) do
begin
t := strtodate(copy(Datas, i, 8));
if YearOf(t) = Ano then
Result := Result + ' ' + formatdatetime('dd/mm/yy', t);
inc(i, 9);
end;
Result := copy(Result, 2, length(Result));
end;
Usaria assim:
edit2.Text := PegaDatas(Edit1.text, 2005);
Edit1 teria algo como 20/04/06 25/05/05 01/01/01
Edit2 ficaria como resposta 25/05/05
Se tiver algum erro aí, faças as correções...
Atenciosamente,
Felippe.
--
FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM
Para ver as mensagens antigas, acesse:
http://br.groups.yahoo.com/group/delphi-br/messages
Para falar com o moderador, envie um e-mail para:
[EMAIL PROTECTED] ou [EMAIL PROTECTED]
Links do Yahoo! Grupos
* Para visitar o site do seu grupo na web, acesse:
http://br.groups.yahoo.com/group/delphi-br/
* Para sair deste grupo, envie um e-mail para:
[EMAIL PROTECTED]
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
[delphi-br] HELP COM TREEVIEW
Oi pessoal. Estou trabalhando com o Treeview e precisava de algumas dicas. Vou tentar explicar o sistema para ficar mais fácil. Eu tenho um treeview com o nome de todas as tabelas. Tenho uma lista de produtos que são imagens (TImages) em que para inserir o usuário clica sobre elas e arrasta. Então, o usuário clica em uma tabela no treeview que deseja inserir um produto e depois arrasta a imagem para o DBGrid e o produto é inserido na tabela. PRIMEIRA QUESTÃO: eu queria clicar sobre a imagem e soltar ela em um nó do treeview e inserir na tabela. Como faço para pegaro foco do treeview sem precisar clicar sobre ele (já que estarei usando o mouse para arrastar a imagem) SEGUNDA QUESTÃO: se eu tiver uma árvore da seguinte forma: PAI A - FILHO DE A - FILHO DE A PAI B - FILHO DE B - FILHO DE B Tenho como arrastar o filho de B para o PAI A ??? Espero ter conseguido me expressar! Estou aguardando a ajuda de vcs! Obrigado --- Erika* -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help no Delphi
Dentro do delphi vem um sistema para vc criar seus help, C:\Arquivos de programas\Borland\Delphi7\Help\Tools\HCRTF.exe mas no Word vc tem que salvar seu arquivo.doc para .RTF , entre em contato comigo que te mando o meu para você ter uma idéia ai é só vc colocar os parâmetro do seu sistema e mandar compilar... Adriano [EMAIL PROTECTED] - Original Message - From: Wesley Costa To: delphi-br@yahoogrupos.com.br Sent: Friday, June 24, 2005 12:27 PM Subject: [delphi-br] Help no Delphi Gostaria de saber como faço para converter um arquivo .doc para .hlp e chamar na minha aplicação. Já tenho o manual do meu sistema completo em .doc. Grato pela atenção, Wesley Costa -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help no Delphi
Use o Help Workshop que vem com o Delphi, ele fica na pasta \Help\tools E quanto ao tutorial, este daqui é o melhor que conheço: http://www.macoratti.net/win_hlp.htm []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Wesley Costa [mailto:[EMAIL PROTECTED] Enviada em: sexta-feira, 24 de junho de 2005 12:27 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help no Delphi Gostaria de saber como faço para converter um arquivo .doc para .hlp e chamar na minha aplicação. Já tenho o manual do meu sistema completo em .doc. Grato pela atenção, Wesley Costa -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Acrescente a unit Math.pas no form e utilize Result := IfThen(Valor0, Valor*-1, Valor); Mauricio. _ De: delphi-br@yahoogrupos.com.br [mailto:[EMAIL PROTECTED] Em nome de Shally Enviada em: quarta-feira, 01 de junho de 2005 15:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Que tal a função Abs ? Em 01/06/05, Francisco Thiago[EMAIL PROTECTED] escreveu: A função * -1 VariavelPositiva := -1000.5458 * -1; :D Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] Skype: enterplug_thiago - Original Message - From: Shally [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis! http://mail.yahoo.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- João Paulo L.G. [EMAIL PROTECTED] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
É... se os helps da borland são ruins, quero saber qual é bom --- Maurício Chiarato Vaglieri [EMAIL PROTECTED] escreveu: Caros Amigos, Para finalizar, essa é pra quem diz que o HELP do DELPHI é ruimme digam qual HELP é bom então Até Mais, Mauricio - Original Message - From: Vinicius Dalvi To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 5:16 PM Subject: Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? A função é ABS - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.323 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.322 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis! http://mail.yahoo.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
O Help do Delphi é muito bom sim, algumas coisas traz até exemplos. Depende de quem o interpreta se sabe inglês e principalmente se conhece de lógica de programação para entender os exemplos e tudo mais. []s Walter Alves Chagas Junior Projeto e desenvolvimento Telemont Engenharia de telecomunicações Belo Horizonte - MG - Brazil [EMAIL PROTECTED] Fone: (31) 3389-8215 Fax: (31) 3389-8200 -Mensagem original- De: Valfrid-Ly Silva Couto [mailto:[EMAIL PROTECTED] Enviada em: quinta-feira, 2 de junho de 2005 08:46 Para: delphi-br@yahoogrupos.com.br Assunto: Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? É... se os helps da borland são ruins, quero saber qual é bom --- Maurício Chiarato Vaglieri [EMAIL PROTECTED] escreveu: Caros Amigos, Para finalizar, essa é pra quem diz que o HELP do DELPHI é ruimme digam qual HELP é bom então Até Mais, Mauricio - Original Message - From: Vinicius Dalvi To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 5:16 PM Subject: Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? A função é ABS - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.323 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.322 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos http://br.yahoo.com/info/utos.html Valfrid-Ly Silva Couto [EMAIL PROTECTED] [EMAIL PROTECTED] [EMAIL PROTECTED] ICQ 15114646 Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis! http://mail.yahoo.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos [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
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
A função * -1 VariavelPositiva := -1000.5458 * -1; :D Francisco Thiago de Almeida EnterPlug Informática Divisão: Desenvolvimento e Banco de dados MSN: [EMAIL PROTECTED] Skype: enterplug_thiago - Original Message - From: Shally [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos Yahoo! Mail, cada vez melhor: agora com 1GB de espaço grátis! http://mail.yahoo.com.br -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Se vc multiplicar por -1 tb resolve. - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Fun??o para retornar n? positivo - Como se faz?
cara, simples... if numero 0 then numero := numero * -1; ok? - Original Message - From: Shally [EMAIL PROTECTED] To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Tudo que vocês falaram funciona mas acho que o que ele quer seria isso: Valor := ABS(-1.453); Serve pra Negativos e Positivos Celso Lorenzetti - GMail escreveu: Se vc multiplicar por -1 tb resolve. - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] *Links do Yahoo! Grupos* * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] mailto:[EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo! http://br.yahoo.com/info/utos.html. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
A função é ABS - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.323 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Se voce multiplicar um valor negativo por -1 terá um valor Positivo... -2,58 * -1 = 2,58 - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz?
Caros Amigos, Para finalizar, essa é pra quem diz que o HELP do DELPHI é ruimme digam qual HELP é bom então Até Mais, Mauricio - Original Message - From: Vinicius Dalvi To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 5:16 PM Subject: Re: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? A função é ABS - Original Message - From: Shally To: delphi-br@yahoogrupos.com.br Sent: Wednesday, June 01, 2005 3:40 PM Subject: [delphi-br] Help!!! Função para retornar nº positivo - Como se faz? Qual a função do Delphi que transforma um número negativo para positivo? Exemplo: tenho o número -2,58 e quero 2,58, qual a função que uso? Conheço a função Floor que retorna o maior inteiro, exemplo: Floor(-1,0) = -1 Floor(2.8) = 2 E para retornar POSITIVO?? -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- No virus found in this incoming message. Checked by AVG Anti-Virus. Version: 7.0.323 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- Nenhum virus encontrado nesta mensagem. Checked by AVG Anti-Virus. Version: 7.0.322 / Virus Database: 267.4.0 - Release Date: 01/06/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help apostila delphi
Pessoal, sou novato no delphi assim que peço ajuda a voces, gostaria saber se alguem tem ou sabe onde posso baixar uma apostila de delphi que ensine sobre as propriedades basicas dos componentes, to com problemas para adicionar o conteudo de um data picker a um banco de dados, agradesço se alguem puder enviar pode fazer-lo ao email [EMAIL PROTECTED] Miguel Villacorta 4446-4100 ramal 4126 [EMAIL PROTECTED] www.dpfautopecas.com.br -- No virus found in this outgoing message. Checked by AVG Anti-Virus. Version: 7.0.300 / Virus Database: 266.5.2 - Release Date: 28/2/2005 [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
[delphi-br] Help! Exclusão em cascata
Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help! Exclusão em cascata
vc pode fazer por query desde que tenha um campo no cadastro de sócios que esteja relacionado ao de dependentes. -Mensagem original- De: lyanagomes [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 15 de fevereiro de 2005 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Help! Exclusão em cascata
e se você usa o Paradox, na estrutura da tabela tem uma opção Referential Integrity, mas nunca usei... -Mensagem original- De: lyanagomes [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 15 de fevereiro de 2005 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help! Exclusão em cascata
Bom dia..!! bom... se vc utiliza um banco relacional como o firebird vc adiciona uma constraint e coloca as tags delete on cascade. Agora se vc utiliza um banco como o Paradox vc deve, antes de efetuar a exclusao do sócio, localizar quais são os dependentes, exluir eles e em seguida excluir o socio mas cada processo depende do banco q vc esta utilizando. []s Nicholas Eduardo Lopes dos Santos Analista/Programador - Desenvolvimento E-mail: [EMAIL PROTECTED] Msn: [EMAIL PROTECTED] Datapar - S.R.L. Ciudad del Este - Py - Original Message - From: lyanagomes To: delphi-br@yahoogrupos.com.br Sent: Tuesday, February 15, 2005 8:39 AM Subject: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: RES: [delphi-br] Help! Exclusão em cascata
Mas q comandos poderei usar para fazer isso!!! Valeu! --- Em delphi-br@yahoogrupos.com.br, Fernanda Prado [EMAIL PROTECTED] escreveu vc pode fazer por query desde que tenha um campo no cadastro de sócios que esteja relacionado ao de dependentes. -Mensagem original- De: lyanagomes [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 15 de fevereiro de 2005 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help! Exclusão em cascata
Como vc está excluindo? pode me dizer? On Tue, 15 Feb 2005 12:39:58 -, lyanagomes [EMAIL PROTECTED] wrote: Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- []'s Emerson Moreno Mascate Automação Desenvolvedor -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: RES: [delphi-br] Help! Exclusão em cascata
p.ex: DELETE FROM DEPENDENTE WHERE COD_SOCIO = X mas isso se esse campo COD_SOCIO garantir um relacionamento entre as tabelas. -Mensagem original- De: lyanagomes [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 15 de fevereiro de 2005 09:57 Para: delphi-br@yahoogrupos.com.br Assunto: Re: RES: [delphi-br] Help! Exclusão em cascata Mas q comandos poderei usar para fazer isso!!! Valeu! --- Em delphi-br@yahoogrupos.com.br, Fernanda Prado [EMAIL PROTECTED] escreveu vc pode fazer por query desde que tenha um campo no cadastro de sócios que esteja relacionado ao de dependentes. -Mensagem original- De: lyanagomes [mailto:[EMAIL PROTECTED] Enviada em: terça-feira, 15 de fevereiro de 2005 09:40 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] Help! Exclusão em cascata
Com paradox tb da pra fazer isso, usando o Database Desktop vc faz os relacionamentos todos []´s Rodrigo O. Farias - Original Message - From: Nicholas Eduardo To: delphi-br@yahoogrupos.com.br Sent: Tuesday, February 15, 2005 10:50 AM Subject: Re: [delphi-br] Help! Exclusão em cascata Bom dia..!! bom... se vc utiliza um banco relacional como o firebird vc adiciona uma constraint e coloca as tags delete on cascade. Agora se vc utiliza um banco como o Paradox vc deve, antes de efetuar a exclusao do sócio, localizar quais são os dependentes, exluir eles e em seguida excluir o socio mas cada processo depende do banco q vc esta utilizando. []s Nicholas Eduardo Lopes dos Santos Analista/Programador - Desenvolvimento E-mail: [EMAIL PROTECTED] Msn: [EMAIL PROTECTED] Datapar - S.R.L. Ciudad del Este - Py - Original Message - From: lyanagomes To: delphi-br@yahoogrupos.com.br Sent: Tuesday, February 15, 2005 8:39 AM Subject: [delphi-br] Help! Exclusão em cascata Bom dia pessoal.. Tenho um cadastro de sócios de um clube e seus dependentes e eu queria que auando o usuário excluisse o sócio automaticamente os dependentes tbém, mas não consegui fazer isso no delphi 3. Se alguém puder me ajudar agradeço.. Um abraço! -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: -- Links do Yahoo! Grupos a.. Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ b.. Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] c.. O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. [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: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Yahoo! Grupos, um serviço oferecido por: Links do Yahoo! Grupos Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] O uso que você faz do Yahoo! Grupos está sujeito aos Termos do Serviço do Yahoo!. -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Para ver as mensagens antigas, acesse: http://br.groups.yahoo.com/group/delphi-br/messages Para falar com o moderador, envie um e-mail para: [EMAIL PROTECTED] ou [EMAIL PROTECTED] Links do Yahoo! Grupos * Para visitar o site do seu grupo na web, acesse: http://br.groups.yahoo.com/group/delphi-br/ * Para sair deste grupo, envie um e-mail para: [EMAIL PROTECTED] * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
