[delphi-br] Emulador para MacOS
Bom dia a todos, Gostaria de saber se existe algum emulador para aplicações win32 que conseguem executar aplicações feitas em Delphi no MacOS... Para o linux tem o Wine... mas para o MacOS ainda não encontrei nada... Se alguém puder dar uma dica, eu agradeço... Att, Jhosef Marks de Carvalho Blog: http://www.jhosefmarks.com.br Jesus está voltando E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e buscar a minha face e se converter dos seus maus caminhos, então eu ouvirei dos céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) Sent from Jaraguá do Sul, Santa Catarina, Brasil [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Emulador para MacOS
Vai de wine tambem! -- José Henrique (Zote) Analista de TI Bludata Software 2009/11/10 Jhosef Marks jho...@gmail.com Bom dia a todos, Gostaria de saber se existe algum emulador para aplicações win32 que conseguem executar aplicações feitas em Delphi no MacOS... Para o linux tem o Wine... mas para o MacOS ainda não encontrei nada... Se alguém puder dar uma dica, eu agradeço... Att, Jhosef Marks de Carvalho Blog: http://www.jhosefmarks.com.br Jesus está voltando E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e buscar a minha face e se converter dos seus maus caminhos, então eu ouvirei dos céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) Sent from Jaraguá do Sul, Santa Catarina, Brasil [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] CGI com Delphi, dúvida básica sobr e atualização
2009/11/10 Joao Morais jcmorai...@gmail.com: Com PHP, se a memória não está me traindo, você pode passar o id da sessão por url ou input hidden. O processo continua (módulo Apache) mesmo depois do final do request. Isto não tem como acontecer com CGI porque a cada request a aplicação inicia, roda e encerra. Salvo engano (me corrija se eu estiver errado), você não tem como fazer um carrinho de compras em CGI, a menos que guarde tudo no browser do usuário. Com CGI é a mesma coisa, vc pode passar o ID da sessão por url ou input hidden... VC é que tem que implementar uma persistência da sessão e sabe como o PHP faz isso? Por meio de arquivos textos, para cada usuário logado. A cada requisição, o PHP abre/lê/grava/fecha este arquivo... todas as vezes, provocando muito IO. Foi uma solução muito simples, porém não é a mais performática. ISAPI = Módulo Apache? Sim, conheço. FPC tem classes excelentes pra ajudar aqui. Embora ainda não tenha usado, imagino ser um porre para fazer deploy durante o desenvolvimento, depuração e testes. ISAPI, até onde eu sei, só é implementado no IIS. Em comparação, é como se fosse um módulo no Apache, pois depois de iniciada a primeira instância, o ISAPI fica em memória; apenas um processo compartilhado entre os usuários. Sobre separar o lauout das regras, eu utilizaria o projeto ExtPascal para o frontend. Esse eu não conheço. Preciso ler um pouco mais. Dá uma lida na documentação, vc vai gostar. Ah, e o admin do projeto é brasileiro e reside em Brasília. Não entendi. Como eu vou implementar alguma coisa sem estudar ao menos a arquitetura da coisa? Vamos combinar o seguinte, descreva um cenário com os detalhes que você conseguir, apresente o que você já tem, apresente as idéias para o que não tem e também o que ainda precisa ser estudado. Acho que isso vai ser bem produtivo e divertido. Disse no sentido de ir fazendo testes práticos, demos, etc. Não sei se vc apenas está lendo sobre as tecnologias ou já sabe mais ou menos por onde começar... mas tudo bem, não vou apressá-lo. Não tenho um cenário com detalhes. Bem, os detalhes do projeto Web eu já tenho, mas diz respeito somente ao meu cliente e não posso utilizá-lo como testes aqui na lista. Acho que precisamos criar um novo projeto apenas como DEMO pra daí então colocar a tecnologia em prática. Eu só não comecei a implementar pq ainda estou em dúvida se vale a pena fazer isso com FPC ou Delphi (Object Pascal, sem .NET). Abraço Marcos Douglas
Re: [delphi-br] Emulador para MacOS
Dá para usar o Wine no MacOS??? Att, Jhosef Marks de Carvalho Blog: http://www.jhosefmarks.com.br Jesus está voltando E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e buscar a minha face e se converter dos seus maus caminhos, então eu ouvirei dos céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) Sent from Jaraguá do Sul, Santa Catarina, Brasil 2009/11/10 José Henrique (Zote) z...@bludata.com.br Vai de wine tambem! -- José Henrique (Zote) Analista de TI Bludata Software 2009/11/10 Jhosef Marks jho...@gmail.com jhosef%40gmail.com Bom dia a todos, Gostaria de saber se existe algum emulador para aplicações win32 que conseguem executar aplicações feitas em Delphi no MacOS... Para o linux tem o Wine... mas para o MacOS ainda não encontrei nada... Se alguém puder dar uma dica, eu agradeço... Att, Jhosef Marks de Carvalho Blog: http://www.jhosefmarks.com.br Jesus está voltando E se o meu povo, que se chama pelo meu nome, se humilhar, e orar, e buscar a minha face e se converter dos seus maus caminhos, então eu ouvirei dos céus, e perdoarei os seus pecados, e sararei a sua terra. (2 Cr 7:14) Sent from Jaraguá do Sul, Santa Catarina, Brasil [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
RES: [delphi-br] Ajuda Gravar Imagens
Tenta assim IF SaveDialog1.execute then Begin Image1.Picture.SaveToFile(SaveDialog1.FileName); End; Ve se roda De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em nome de Jose Newton Araujo Enviada em: segunda-feira, 9 de novembro de 2009 19:42 Para: delphi-br@yahoogrupos.com.br Assunto: [delphi-br] Ajuda Gravar Imagens Moçada, aqui estou precisando de uma força (de novo) Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O sistema carrega a imagem através de OpenDialog num Image. Agora preciso gravar esta imagem alterando o nome do arquivo. Estou tentando via SaveDialog e não estou tendo sucesso. Quem pode me dar uma força ? Obrigado, SDS, Jose Newton [As partes desta mensagem que não continham texto foram removidas] No virus found in this incoming message. Checked by AVG - www.avg.com Version: 8.5.425 / Virus Database: 270.14.58/2493 - Release Date: 11/09/09 19:40:00 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Ajuda - Dhelphi e MySql
Pessoal Estou querendo desenvolver um aplicativo que gere relatórios usando dados que estão em um bd Mysql que está na internet, mas quando insiro as informações e testo, ele acusa que a senha ou usuário estão incorreta. Porque isto acontece e como resolver isto? Atenciosamente, Junio A. Domingues Santos (31)9163-7173 (31)3368-1193 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Re: Ajuda - Dhelphi e MySql
Amigo, Verifique se realmente a senha do usuário do banco de dados está correta, não sei qual componente você está usando para fazer esta conexão, seria interessante você postar para podermos ajudar, normalmente o usuário e senha tem que ser posto no componente de conexão ao banco. Att. Mário --- Em delphi-br@yahoogrupos.com.br, Junio Domingues juniodoming...@... escreveu Pessoal Estou querendo desenvolver um aplicativo que gere relatórios usando dados que estão em um bd Mysql que está na internet, mas quando insiro as informações e testo, ele acusa que a senha ou usuário estão incorreta. Porque isto acontece e como resolver isto? Atenciosamente, Junio A. Domingues Santos (31)9163-7173 (31)3368-1193 [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Delphi6+QuickReport+Vista SP1
Caros amigos alguém já enfrentou esse problema.o Quickreport está muito lento pra abrir. Alguns relatórios nem abrem. Estou desenvolvendo em uma maquina com Delphi6+Vista SP1. Muito Obrigado [As partes desta mensagem que não continham texto foram removidas]
[delphi-br] Como faço para abrir um documento no formato Word no Del phi ?
Colegas, bom dia , gostaria de saber como faço para abrir e editar ( incluir alguns campos ) um documento feito no Word usando o Delphi ? Desde já agradeço a atenção de todos. Marco Antônio. 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] Ajuda Gravar Imagens
José,
assim como você carrego a imagem em um TImage.
Em seguida eu faço o seguinte:
BS := TBlobStream.Create((TABELA.fieldByName('imagem') as
TBlobField), BMWRITE);
IMG := TBitMap.Create;
IMG.LoadFromFile('caminhoDaImagem');
IMG.SaveToStream(BS);
Sendo BS um TBlobStream, IMG um TBitMap e o campo imagem da minha tabela do
tipo Blob.
Espero ter ajudado,
abraço,
Júlio César Santiago Guiótti
2009/11/9 Jose Newton Araujo jose.new...@jnewton.com.br
Moçada, aqui estou precisando de uma força (de novo)
Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O
sistema carrega a imagem através de OpenDialog num Image. Agora preciso
gravar esta imagem alterando o nome do arquivo. Estou tentando via
SaveDialog e não estou tendo sucesso. Quem pode me dar uma força ?
Obrigado, SDS,
Jose Newton
[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:
delphi-br-ow...@yahoogrupos.com.br
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:
delphi-br-unsubscr...@yahoogrupos.com.br
* O uso que você faz do Yahoo! Grupos está sujeito aos:
http://br.yahoo.com/info/utos.html
Re: [delphi-br] Ajuda Gravar Imagens
Você pode usar a função abaixo:
RenameFile(pathInicial, pathFinal);
---Original Message---
From: Júlio César Santiago Guiótti
Date: 10/11/2009 18:04:07
To: delphi-br@yahoogrupos.com.br
Subject: Re: [delphi-br] Ajuda Gravar Imagens
José,
assim como você carrego a imagem em um TImage.
Em seguida eu faço o seguinte:
BS := TBlobStream.Create((TABELA.fieldByName('imagem') as
TBlobField), BMWRITE);
IMG := TBitMap.Create;
IMG.LoadFromFile('caminhoDaImagem');
IMG.SaveToStream(BS);
Sendo BS um TBlobStream, IMG um TBitMap e o campo imagem da minha tabela do
tipo Blob.
Espero ter ajudado,
abraço,
Júlio César Santiago Guiótti
2009/11/9 Jose Newton Araujo jose.new...@jnewton.com.br
Moçada, aqui estou precisando de uma força (de novo)
Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O
sistema carrega a imagem através de OpenDialog num Image. Agora preciso
gravar esta imagem alterando o nome do arquivo. Estou tentando via
SaveDialog e não estou tendo sucesso. Quem pode me dar uma força ?
Obrigado, SDS,
Jose Newton
[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
[As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] Como faço para abrir um documento no formato Word no Delphi ?
segue um bom exemplo, espero que ajude:
unit protr2;
interface
uses
Windows, Messages, SysUtils, Classes, Graphics, Controls, Forms, Dialogs,
StdCtrls, Buttons, ExtCtrls, Mask,ComObj,variants;
type TWordReplaceFlags = set of (wrfReplaceAll, wrfMatchCase,
wrfMatchWildcards);
type
Tfrmprotr2 = class(TForm)
Label1: TLabel;
qrlreg: TQRLabel;
qrdbreg: TQRDBText;
QRLabel23: TQRLabel;
qrobs: TQRLabel;
BitBtn1: TBitBtn;
BitBtn2: TBitBtn;
btfim: TBitBtn;
procedure btfimClick(Sender: TObject);
procedure BitBtn1Click(Sender: TObject);
procedure BitBtn2Click(Sender: TObject);
procedure trocaparte(wstring, wtag: string);
function Word_StringReplace(ADocument: TFileName;
SearchString,
ReplaceString: string;
Flags: TWordReplaceFlags;
SendToPrint: Boolean=false): Boolean;
private
{ Private declarations }
public
{ Public declarations }
end;
const wdFindContinue = 1;
wdReplaceOne = 1;
wdReplaceAll = 2;
wdDoNotSaveChanges = 0;
var
frmprotr2: Tfrmprotr2;
wtexto:string;
wdata:string;
wdia:string;
wano:string;
wvalor:extended;
wmotivo:string;
wcnpj:string;
x:integer;
wapres:string;
wobs:string;
wmanif:string;
WordApp: OLEVariant;
ADocument:string;
implementation
uses udm, util;
{$R *.DFM}
procedure Tfrmprotr2.BitBtn1Click(Sender: TObject);
var wedital:string;
begin
ADocument:='\\servidor\c\sistemas\cartor\protg\prot2.doc';
if not FileExists(ADocument) then
begin
ShowMessage('Documento não encontrado:'+Adocument);
Exit;
end;
try
WordApp := CreateOLEObject('Word.Application');
except
on E: Exception do
begin
E.Message := 'O Word não está disponível';
raise;
end;
end;
prepara;
wedital:='';if dm.protEDITAL.asstring'' then wedital:='Edital
R$:'+formatfloat('###,###,##0.00',dm.protEDITAL.asfloat);
WordApp.Visible := false;
WordApp.Documents.Open(ADocument);
Word_StringReplace(ADocument,'dadnome',dm.dadosPROTNOME1.asstring,[wrfReplaceAll]);
Word_StringReplace(ADocument,'livro',dm.protProtes_LIVRO.asstring,[wrfReplaceAll]);
Word_StringReplace(ADocument,'folha',dm.protProtes_Folha.asstring,[wrfReplaceAll]);
//Word_StringReplace(ADocument,'texto',wtexto,[wrfReplaceAll]);
wtexto:=trocacarac(wtexto,'_',' ');
trocaparte(wtexto,'texto');
Word_StringReplace(ADocument,'dev_cnpj',wcnpj,[wrfReplaceAll]);
Word_StringReplace(ADocument,'dev_ender',dm.intDados.asstring,[wrfReplaceAll]);
trocaparte(dm.protManifest.asstring,'manif');// troca de 40 em 40
caracteres, limitação do word
Word_StringReplace(ADocument,'motivo_protesto',dm.porfaltade,[wrfReplaceAll]);
trocaparte(dm.protProtes_manifest.asstring,'manif');
Word_StringReplace(ADocument,'data',qrdata.caption,[wrfReplaceAll]);
Word_StringReplace(ADocument,'distrib',wdistrib,[wrfReplaceAll]);
Word_StringReplace(ADocument,'custas',wcustas,[wrfReplaceAll]);
Word_StringReplace(ADocument,'edital',wedital,[wrfReplaceAll]);
Word_StringReplace(ADocument,'regintim',wregintim,[wrfReplaceAll]);
wobs:=trocacarac(wobs,'_',' ');
trocaparte(wobs,'obs');
WordApp.ActiveDocument.SaveAs('c:\temp\protesto.doc');
WordApp.PrintOut(false);
while WordApp.BackgroundPrintingStatus 0 do
Application.ProcessMessages;
//WordApp.ActiveDocument.Close(wdDoNotSaveChanges);
WordApp.Quit;
WordApp := Unassigned;
freeandnil(wordapp);
end;
procedure Tfrmprotr2.btfimClick(Sender: TObject);
begin
close;
end;
function tfrmprotr2.Word_StringReplace(ADocument: TFileName;
SearchString, ReplaceString: string; Flags: TWordReplaceFlags;
SendToPrint:Boolean=False): Boolean;
begin
Result := False;
try
WordApp.Selection.Find.ClearFormatting;
WordApp.Selection.Find.Text := SearchString;
WordApp.Selection.Find.Replacement.Text := ReplaceString;
WordApp.Selection.Find.Forward := True;
WordApp.Selection.Find.Wrap := wdFindContinue;
WordApp.Selection.Find.Format := False;
WordApp.Selection.Find.MatchCase := wrfMatchCase in Flags;
WordApp.Selection.Find.MatchWholeWord := False;
WordApp.Selection.Find.MatchWildcards := wrfMatchWildcards in Flags;
WordApp.Selection.Find.MatchSoundsLike := False;
WordApp.Selection.Find.MatchAllWordForms := False;
if wrfReplaceAll in Flags then
Begin
WordApp.Selection.Find.Execute(Replace := wdReplaceAll)
End
else
Begin
WordApp.Selection.Find.Execute(Replace := wdReplaceOne);
End;
except
end;
end;
procedure tfrmprotr2.trocaparte(wstring,wtag:string);
var wparte:string;
begin
while true do
begin
wparte:=copy(wstring,1,40);
if wparte'' then
begin
wparte:=wparte+wtag;
Word_StringReplace(ADocument,wtag,wparte,[wrfReplaceAll]);
delete(wstring,1,40);
end
Re: [delphi-br] Delphi6+QuickReport+Vista SP1
veja se não é problema com a impressora padrão. //marcelo luiz stefaniak Em 10/11/2009 15:38, Daniel de Oliveira escreveu: Caros amigos alguém já enfrentou esse problema.o Quickreport está muito lento pra abrir. Alguns relatórios nem abrem. Estou desenvolvendo em uma maquina com Delphi6+Vista SP1. Muito Obrigado [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: delphi-br-ow...@yahoogrupos.com.br 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: delphi-br-unsubscr...@yahoogrupos.com.br * O uso que você faz do Yahoo! Grupos está sujeito aos: http://br.yahoo.com/info/utos.html
Re: [delphi-br] CGI com Delphi, dúvida básica sobr e atualização
As sessões do PHP, como nosso amigo Marcos falou anteriormente são por meio de arquivos mesmo. Apesar de ter alternativas(Vide APC), este é o comportamento padrão. O grande lance do PHP é que, usando sessoes, e, incluindo um objeto em sessão, o php serializa este objeto pra vc de modo transparente. O caso do módulo gerenciador que eu falei antes seria justamente pra deixar transparente sessões(preferencialmente em mem). Apesar de não ter pensado na viabilidade disso, mas, este podia manter em memória objetos serializados da sua aplicação independente da requisição, além de poder ela gerenciar o Pool. Teria realmente a necessidade de parar um servidor em caso de atualização, mas, este não seria um caso frequente, pois, poderia ser um gerenciador genérico para várias aplicações. No mais, esta poderia ter 2 sabores. ISAPI e módulo do Apache, mantendo o servidor transparente. Abs Daniel Augusto Bastos 2009/11/10 Marcos Douglas m...@delfire.net 2009/11/10 Joao Morais jcmorai...@gmail.com: Com PHP, se a memória não está me traindo, você pode passar o id da sessão por url ou input hidden. O processo continua (módulo Apache) mesmo depois do final do request. Isto não tem como acontecer com CGI porque a cada request a aplicação inicia, roda e encerra. Salvo engano (me corrija se eu estiver errado), você não tem como fazer um carrinho de compras em CGI, a menos que guarde tudo no browser do usuário. Com CGI é a mesma coisa, vc pode passar o ID da sessão por url ou input hidden... VC é que tem que implementar uma persistência da sessão e sabe como o PHP faz isso? Por meio de arquivos textos, para cada usuário logado. A cada requisição, o PHP abre/lê/grava/fecha este arquivo... todas as vezes, provocando muito IO. Foi uma solução muito simples, porém não é a mais performática. ISAPI = Módulo Apache? Sim, conheço. FPC tem classes excelentes pra ajudar aqui. Embora ainda não tenha usado, imagino ser um porre para fazer deploy durante o desenvolvimento, depuração e testes. ISAPI, até onde eu sei, só é implementado no IIS. Em comparação, é como se fosse um módulo no Apache, pois depois de iniciada a primeira instância, o ISAPI fica em memória; apenas um processo compartilhado entre os usuários. Sobre separar o lauout das regras, eu utilizaria o projeto ExtPascal para o frontend. Esse eu não conheço. Preciso ler um pouco mais. Dá uma lida na documentação, vc vai gostar. Ah, e o admin do projeto é brasileiro e reside em Brasília. Não entendi. Como eu vou implementar alguma coisa sem estudar ao menos a arquitetura da coisa? Vamos combinar o seguinte, descreva um cenário com os detalhes que você conseguir, apresente o que você já tem, apresente as idéias para o que não tem e também o que ainda precisa ser estudado. Acho que isso vai ser bem produtivo e divertido. Disse no sentido de ir fazendo testes práticos, demos, etc. Não sei se vc apenas está lendo sobre as tecnologias ou já sabe mais ou menos por onde começar... mas tudo bem, não vou apressá-lo. Não tenho um cenário com detalhes. Bem, os detalhes do projeto Web eu já tenho, mas diz respeito somente ao meu cliente e não posso utilizá-lo como testes aqui na lista. Acho que precisamos criar um novo projeto apenas como DEMO pra daí então colocar a tecnologia em prática. Eu só não comecei a implementar pq ainda estou em dúvida se vale a pena fazer isso com FPC ou Delphi (Object Pascal, sem .NET). Abraço Marcos Douglas -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM [As partes desta mensagem que não continham texto foram removidas]
Re: [delphi-br] [MAF] Criptografia AES 256Bits
Eheheh, vou chutar que deve ser o salário de peões de obra, tipo 2 salários-mínimos + vale-transporte + ticket-refeição. 2009/11/9 Marcos Ferreira m.abreuferre...@hotmail.com Ricardo, O que é não é o importante, o importante é de onde vem e de quem é. São dados de folha de pagamento Sabe quando um descobre o salário do outro e ai fica aquela fofoca na empresa. Internamente esse é um dos assuntos mais sigilosos nas empresas. Só não me perguntem que empresa é essa, mesmo por que não tenho acesso aos valores reais da folha de pagamento. Todo o desenvolvimento é feito sobre uma base de dados fictícia. Att, Marcos A. Ferreira São Paulo - Brasil MSN: maferre...@hotmail.it maferreira%40hotmail.it Google Talk: maf.decisiva Skype: m_abreuferreira Esta mensagem pode conter informação confidencial e/ou privilegiada. Se você não for o destinatário ou a pessoa autorizada a receber esta mensagem, não pode usar, copiar, ou divulgar as informações nela contidas ou tomar qualquer ação baseada nestas informações. Se você recebeu esta mensagem por engano, por favor, avise imediatamente o remetente, respondendo o email e em seguida, apague-o. Agradecemos sua cooperação. This message may contain confidential and/or privileged information. If you are not the addressee or authorized to receive this for the addressee, you must not use, copy, disclose or take any action based on this message or any information herein. If you have received this message in error, please, advise the sender immediately by reply e-mail and delete this message. Thank you for your cooperation. Antes de imprimir pense em sua responsabilidade e compromisso com o MEIO AMBIENTE. ENVIRONMENT commitment and responsibility, think about Before Printing. _ From: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br[mailto: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br] On Behalf Of Ricardo César Cardoso Sent: segunda-feira, 9 de novembro de 2009 16:08 To: delphi-br@yahoogrupos.com.br delphi-br%40yahoogrupos.com.br Subject: Re: [delphi-br] [MAF] Criptografia AES 256Bits Se ele contar, deixa de ser sigilosa ;p Abraço, Ricardo. 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 seg, 9/11/09, Dirlei Dionísio dir...@gmail. mailto:dirlei%40gmail.com dirlei%2540gmail.com com escreveu: De: Dirlei Dionísio dir...@gmail. mailto:dirlei%40gmail.comdirlei%2540gmail.com com Assunto: Re: [delphi-br] [MAF] Criptografia AES 256Bits Para: delphi...@yahoogrup mailto:delphi-br%40yahoogrupos.com.brdelphi-br%2540yahoogrupos.com.br os.com.br Data: Segunda-feira, 9 de Novembro de 2009, 0:21 Marcos, AES é um algoritmo bem popular, com implementação na maioria das linguagens. Em Delphi existe essa aqui que implementa vários algoritmos de criptografia, incluindo o Rijndael (ou AES): http://www.cityinth http://www.cityinthesky.co.uk/cryptography.html esky.co.uk/cryptography.html Se você nunca lidou com criptografia, recomendo alguma leitura para se informar. Na Wikipedia você encontrará boas informações. Mas me diga uma coisa: que tipo de informação é tão sigilosa que precise ser criptografada com um AES de 256 bits? [ ]'s Dirlei. 2009/11/8 Marcos m.abreuferreira@ mailto:m.abreuferreira%40hotmail.comm.abreuferreira%2540hotmail.com hotmail.com Pessoal, Estou precisando criar uma DLL com duas funções, uma para criptografar e outra para decriptografar seguindo o padrão AES com 256bits. Nunca mexi com criptografia, ou seja, não sei nem estimar o tempo de desenvolvimento para isso. Alguém teria algum material, componente que pudesse me ajudar? Att, Marcos A. Ferreira [As partes desta mensagem que não continham texto foram removidas] -- FAVOR REMOVER ESTA PARTE AO RESPONDER ESTA MENSAGEM Links do Yahoo! Grupos __ Veja quais são os assuntos do momento no Yahoo! +Buscados http://br.maisbusca http://br.maisbuscados.yahoo.com dos.yahoo.com [As partes desta mensagem que não continham texto foram removidas] -- Timeo hominem unius libri Cogito ergo sum - Carpe diem []s Guionardo Furlan http://guionardo.blogspot.com http://www.guionardofurlan.com.br [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: delphi-br-ow...@yahoogrupos.com.br Links do Yahoo! Grupos * Para visitar o site do seu grupo
RES: [delphi-br] Ajuda Gravar Imagens
Eh Gilvan esta é a opção que gostaria pois assim gravase a imagem na tabela
Paradox, porém no Delphi 7 não consigo configurar o campo TBlobField na
estrutura da minha tabela.
Sds
Jose Newton
De: delphi-br@yahoogrupos.com.br [mailto:delphi...@yahoogrupos.com.br] Em
nome de Gilvan Costa
Enviada em: terça-feira, 10 de novembro de 2009 18:20
Para: delphi-br@yahoogrupos.com.br
Assunto: Re: [delphi-br] Ajuda Gravar Imagens
Você pode usar a função abaixo:
RenameFile(pathInicial, pathFinal);
---Original Message---
From: Júlio César Santiago Guiótti
Date: 10/11/2009 18:04:07
To: delphi-br@yahoogrupos.com.br mailto:delphi-br%40yahoogrupos.com.br
Subject: Re: [delphi-br] Ajuda Gravar Imagens
José,
assim como você carrego a imagem em um TImage.
Em seguida eu faço o seguinte:
BS := TBlobStream.Create((TABELA.fieldByName('imagem') as
TBlobField), BMWRITE);
IMG := TBitMap.Create;
IMG.LoadFromFile('caminhoDaImagem');
IMG.SaveToStream(BS);
Sendo BS um TBlobStream, IMG um TBitMap e o campo imagem da minha tabela do
tipo Blob.
Espero ter ajudado,
abraço,
Júlio César Santiago Guiótti
2009/11/9 Jose Newton Araujo jose.new...@jnewton.com.br
mailto:jose.newton%40jnewton.com.br
Moçada, aqui estou precisando de uma força (de novo)
Tenho uma rotina que permite ao cabra escolher uma determinada imagem. O
sistema carrega a imagem através de OpenDialog num Image. Agora preciso
gravar esta imagem alterando o nome do arquivo. Estou tentando via
SaveDialog e não estou tendo sucesso. Quem pode me dar uma força ?
Obrigado, SDS,
Jose Newton
[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
[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] CGI com Delphi, dúvida básica sobr e atualização
2009/11/10 Marcos Douglas m...@delfire.net: Acho que precisamos criar um novo projeto apenas como DEMO pra daí então colocar a tecnologia em prática. Eu só não comecei a implementar pq ainda estou em dúvida se vale a pena fazer isso com FPC ou Delphi (Object Pascal, sem .NET). Penso que vale. Tendo em vista as ferramentas disponíveis para publicação (FastCGI), apresentação (ExtJS e ExtPascal) e organização da aplicação (alguma especialização de TWebApplication), acredito que falte apenas uma boa especificação ou implementação MVC para separar regras e apresentação. Vamos conversar melhor sobre esse demo, que ele seja simples suficiente para sair do papel e complexo suficiente para conseguir validar nossa arquitetura. Joao Morais
