Re: [Notes2-team] shell extension
Brought to you by:
andersonrb
Menu
▾
▴
Re: [Notes2-team] shell extension
|
From: Daniel R. <dan...@ya...> - 2003-11-21 19:20:27
|
Fora de cogita=E7=E3o usar a Unit Clpibrd... 250Kb!!!
E fazendo o c=F3digo na unha n=E3o ta funcionando... fiz esse c=F3digo =
baseado no clipbrd.pas, trocando todas as fun=E7=F5es internas por APIs, =
e ele n=E3o copia direito... algu=E9m se habilita a dar uma olhada?
procedure SetClipboardText(aText:PChar);
var Data: THandle;
DataPtr: Pointer;
begin
OpenClipboard(GetDesktopWindow);
try
Data :=3D GlobalAlloc(GMEM_MOVEABLE+GMEM_DDESHARE, length(aText));
try
DataPtr :=3D GlobalLock(Data);
try
Move(aText^, DataPtr^, length(aText));
EmptyClipboard;
SetClipboardData(CF_TEXT, Data);
finally
GlobalUnlock(Data);
end;
except
GlobalFree(Data);
raise;
end;
finally
CloseClipboard;
end;
end;
[]=B4s
Daniel Roma
#Equipe do Notes - Desenvolvimento
----- Original Message -----=20
From: Anderson R. Barbieri=20
To: not...@li...=20
Sent: Thursday, November 20, 2003 3:53 PM
Subject: Re: [Notes2-team] shell extension
Adicione a unit "Clipbrd" no uses e
depois basta usar
--------------------
clipboard.Open;
Clipboard.SetTextBuf(PChar(S));
clipboard.Close;
--------------------
Onde S =E9 uma vari=E1vel do tipo String. Voc=EA n=E3o precisa
criar/destruir a classe Clipboard, isto =E9 feito automaticamente pelo =
delphi...
Tem outros m=E9todos interessantes nesta classe...
Quanto a avisar, sei l=E1. De repente para arquivos com mais de 100KB
seja uma boa... e quanto a se =E9 o caminho inteiro, sim, o caminho
inteiro (pois convenhamos que d=E1 trabalho pegar o caminho inteiro
de um arquivo, =E9 preciso escrever manualmente ou usar algum =
utilit=E1rio...)
Tu acha que devemos ter um checkbox para ativar/desativar a shell
extension nas prefer=EAncias do Notes?
Mais arguma coisa?
Abra=E7o,
Anderson
Daniel Roma wrote:
Preciso copiar texto pra =E1rea de transfer=EAncia, para as =
op=E7=F5es de copiar conte=FAdo do arquivo e copiar nome do arquivo.
S=F3 pra confirmar, no copiar nome, =E9 com caminho completo n=E9?
E outra coisa, n=E3o seria legal avisar caso o cara queira copiar o =
conte=FAdo de um arquivo meio grandinho??
[]=B4s
Daniel Roma
#Equipe do Notes: Desenvolvimento
----- Original Message -----=20
From: Anderson R. Barbieri=20
To: not...@li...=20
Sent: Thursday, November 20, 2003 3:04 PM
Subject: Re: [Notes2-team] shell extension
Eu tenho... o c=F3digo do Notes 1.5.4 manipula a =E1rea de =
transfer=EAncia=20
no bra=E7o :)
Me diga o que tu quer fazer que eu te mando prontinho...
Ab.
Anderson
Daniel Roma wrote:
N=C3O TO ESTRESSADO!!! QUEM FALOU QUE EU TO ESTRESSADO, =
$#%$%#&??
:)
Desculpem se pareceu que eu tava bravo... s=F3 tava lembrando =
voc=EAs do Shell Ext... achei que vcs tinham esquecido de mim... :(
(nesse instante =E9 a transi=E7=E3o entre o Muito Irritado pro =
Profundamente Magoado)
:)
Chega de boiolice...=20
Espero at=E9 o final da semana mandar algo funcional do =
ShellExt.. estou tendo um pouco de problemas em manipular a =C1rea de =
Transfer=EAncia na unha... algu=E9m tem alguma coisa ai disso??
Quanto aos =EDcones, devo testar ainda hoje se o iconezinho que =
vc fez fica melhor Alan, ai reporto pra voc=EAs.
Abra=E7os a todos,
Daniel Roma
#Equipe do Notes - Desenvolvimento e Lamenta=E7=F5es em Geral
"N=E3o importa onde voc=EA esteja, voc=EA sempre estar=E1 l=E1!"
----- Original Message -----=20
From: Allan Rodrigo=20
To: not...@li...=20
Sent: Thursday, November 20, 2003 12:13 AM
Subject: [Notes2-team] shell extension
T=E1 estressado, homi (Daniel)? :)
Sinceramente, eu realmente n=E3o discuti sobre Shell Extension =
na reuni=E3o e
nem iria...
Geralmente a gente provoca uma discuss=E3o quando algo melhor =
pode ser feito
ou quando temos d=FAvidas sobre a verdadeira vantagem de uma =
determinada coisa.
J=E1 o que voc=EA fez est=E1 =F3timo, s=F3 faz enriquecer =
ainda mais o programa e n=E3o
vejo nada melhor a ser feito.
Desculpe por n=E3o ter mandado o =EDcone antes... teste e me =
diga como ficou
Com rela=E7=E3o aos outros =EDcones se Moraes, Andrei ou Leite =
puderem me ajudar,
seria =F3timo At=E9 porque, estou com a patinha direita =
doendo bastante :-)
Parece-me que falta os =EDcones para templates, informa=E7=E3o =
de arquivo e
comprimir HTML
Sds,
Allan Rodrigo
all...@gm...
--=20
NEU F=DCR ALLE - GMX MediaCenter - f=FCr Fotos, Musik, =
Dateien...
Fotoalbum, File Sharing, MMS, Multimedia-Gru=DF, GMX =
FotoService
Jetzt kostenlos anmelden unter http://www.gmx.net
+++ GMX - die erste Adresse f=FCr Mail, Message, More! +++
---
Verifica=E7=E3o de V=EDrus executada:
Nenhum v=EDrus encontrado!
Sudeste Seguran=E7a e Transporte de Valores
Departamento de Tecnologia e Informa=E7=F5es
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.538 / Virus Database: 333 - Release Date: =
11/11/2003
=20
---
Verifica=E7=E3o de V=EDrus executada:
Nenhum v=EDrus encontrado!
Sudeste Seguran=E7a e Transporte de Valores
Departamento de Tecnologia e Informa=E7=F5es
Checked by AVG anti-virus system (http://www.grisoft.com).
Version: 6.0.538 / Virus Database: 333 - Release Date: 11/11/2003
--=20
Anderson Rodrigues Barbieri
--------------------------------------------
#Equipe do Notes - Coordenador/Desenvolvedor
{ TAndInfo }
ICQ #149391850 / no...@ig...
Notes - http://notes.codigolivre.org.br
NotesDev - http://notes2.sf.net/dev
F=F3rum - http://notes2.sf.net/forum
---Verifica=E7=E3o de V=EDrus executada:Nenhum v=EDrus =
encontrado!Sudeste Seguran=E7a e Transporte de ValoresDepartamento de =
Tecnologia e Informa=E7=F5esChecked by AVG anti-virus system =
(http://www.grisoft.com).Version: 6.0.538 / Virus Database: 333 - =
Release Date: 10/11/2003 |
